aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/a-except.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/a-except.adb')
-rw-r--r--gcc/ada/a-except.adb15
1 files changed, 2 insertions, 13 deletions
diff --git a/gcc/ada/a-except.adb b/gcc/ada/a-except.adb
index 3ffd0a1..9d5acee 100644
--- a/gcc/ada/a-except.adb
+++ b/gcc/ada/a-except.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 1992-2014, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2015, Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -29,17 +29,6 @@
-- --
------------------------------------------------------------------------------
--- This version of Ada.Exceptions is a full Ada 95 version, and Ada 2005
--- features such as the additional definitions of Exception_Name returning
--- Wide_[Wide_]String.
-
--- It is used for building the compiler and the basic tools, since these
--- builds may be done with bootstrap compilers that cannot handle these
--- additions. The full version of Ada.Exceptions can be found in the files
--- a-except-2005.ads/adb, and is used for all other builds where full Ada
--- 2005 functionality is required. In particular, it is used for building
--- run times on all targets.
-
pragma Compiler_Unit_Warning;
pragma Style_Checks (All_Checks);
@@ -130,7 +119,7 @@ package body Ada.Exceptions is
--
-- Exception_Name: <exception name> (as in Exception_Name)
-- Message: <message> (only if Exception_Message is empty)
- -- PID=nnnn (only if != 0)
+ -- PID=nnnn (only if nonzero)
-- Call stack traceback locations: (only if at least one location)
-- <0xyyyyyyyy 0xyyyyyyyy ...> (is recorded)
--