OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [libstdc++-v3/] [testsuite/] [18_support/] [uncaught_exception/] [14026.cc] - Blame information for rev 742

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 742 jeremybenn
// Copyright (C) 2004, 2007, 2009 Free Software Foundation, Inc.
2
//
3
// This file is part of the GNU ISO C++ Library.  This library is free
4
// software; you can redistribute it and/or modify it under the
5
// terms of the GNU General Public License as published by the
6
// Free Software Foundation; either version 3, or (at your option)
7
// any later version.
8
 
9
// This library is distributed in the hope that it will be useful,
10
// but WITHOUT ANY WARRANTY; without even the implied warranty of
11
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12
// GNU General Public License for more details.
13
 
14
// You should have received a copy of the GNU General Public License along
15
// with this library; see the file COPYING3.  If not see
16
// <http://www.gnu.org/licenses/>.
17
 
18
// PR 14026
19
// 18.6.4 uncaught_exception
20
 
21
#include <cstdlib>
22
#include <exception>
23
#include <testsuite_hooks.h>
24
 
25
static void
26
no_uncaught ()
27
{
28
  if (std::uncaught_exception())
29
    abort();
30
}
31
 
32
int
33
main()
34
{
35
  try
36
    {
37
      throw 1;
38
    }
39
  catch (...)
40
    {
41
      try
42
        {
43
          throw;
44
        }
45
      catch (...)
46
        {
47
          no_uncaught ();
48
        }
49
    }
50
  no_uncaught();
51
 
52
  return 0;
53
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.