aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/g-trasym.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2009-04-24 16:35:21 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2009-04-24 16:35:21 +0200
commit3563739bcd2982f43e3c9c5818c8e0d2ad971394 (patch)
treefb3fc87fa6c935ed02ccd6b3f65c3a662b29c471 /gcc/ada/g-trasym.adb
parent806b956fed0026c5431340ee15e770dd513684a8 (diff)
downloadgcc-3563739bcd2982f43e3c9c5818c8e0d2ad971394.zip
gcc-3563739bcd2982f43e3c9c5818c8e0d2ad971394.tar.gz
gcc-3563739bcd2982f43e3c9c5818c8e0d2ad971394.tar.bz2
[multiple changes]
2009-04-24 Emmanuel Briot <briot@adacore.com> * prj-proc.adb, make.adb, mlib-prj.adb, prj.adb, prj.ads, clean.adb, prj-nmsc.adb, prj-env.adb (Project_List_Table, Project_Element): removed. Lists of projects are now implemented via standard malloc rather than through the table. 2009-04-24 Thomas Quinot <quinot@adacore.com> * sem_ch12.adb: Minor reformatting * g-trasym.adb: Minor reformatting * exp_ch6.adb: Minor reformatting 2009-04-24 Robert Dewar <dewar@adacore.com> * layout.adb (Layout_Type): For packed array type, copy unset size/alignment fields from the referenced Packed_Array_Type. 2009-04-24 Bob Duff <duff@adacore.com> * lib-load.adb (Make_Instance_Unit): Revert previous change, no longer needed after sem_ch12 changes. * sem.adb (Walk_Library_Items): Include with's in some debugging printouts. From-SVN: r146727
Diffstat (limited to 'gcc/ada/g-trasym.adb')
-rw-r--r--gcc/ada/g-trasym.adb12
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/ada/g-trasym.adb b/gcc/ada/g-trasym.adb
index a402d57..105001d 100644
--- a/gcc/ada/g-trasym.adb
+++ b/gcc/ada/g-trasym.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 1999-2008, AdaCore --
+-- Copyright (C) 1999-2009, AdaCore --
-- --
-- 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- --
@@ -74,7 +74,7 @@ package body GNAT.Traceback.Symbolic is
buf : System.Address;
len : System.Address);
pragma Import (C, convert_addresses, "convert_addresses");
- -- This is the procedure version of the Ada aware addr2line. It places
+ -- This is the procedure version of the Ada-aware addr2line. It places
-- in BUF a string representing the symbolic translation of the N_ADDRS
-- raw addresses provided in ADDRS, looked up in debug information from
-- FILENAME. LEN points to an integer which contains the size of the
@@ -100,8 +100,8 @@ package body GNAT.Traceback.Symbolic is
use type System.Address;
begin
- -- The symbolic translation of an empty set of addresses is the
- -- the empty string.
+ -- The symbolic translation of an empty set of addresses is an empty
+ -- string.
if Traceback'Length = 0 then
return "";
@@ -111,8 +111,8 @@ package body GNAT.Traceback.Symbolic is
-- libaddr2line service to symbolize it all.
-- Compute, cache and provide the absolute path to our executable file
- -- name as the binary file where the relevant debug information is to
- -- be found. If the executable file name resolution fails, we have no
+ -- name as the binary file where the relevant debug information is to be
+ -- found. If the executable file name resolution fails, we have no
-- sensible basis to invoke the symbolizer at all.
-- Protect all this against concurrent accesses explicitly, as the