aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/gnatmem.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2005-02-10 14:57:01 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2005-02-10 14:57:01 +0100
commit448f26107e8e11cb4ff0c24e53c9c96a2cc14042 (patch)
tree65d8819c164cc64fb71d4de5f7c9131d9a859059 /gcc/ada/gnatmem.adb
parentf5da72ceabb971f5ee389e7679845af3f4abddbd (diff)
downloadgcc-448f26107e8e11cb4ff0c24e53c9c96a2cc14042.zip
gcc-448f26107e8e11cb4ff0c24e53c9c96a2cc14042.tar.gz
gcc-448f26107e8e11cb4ff0c24e53c9c96a2cc14042.tar.bz2
usage.adb: Add line for switch -gnat05 (allow Ada 2005 extensions) Slight fix to...
* usage.adb: Add line for switch -gnat05 (allow Ada 2005 extensions) Slight fix to documentation of -gnaty with no parameters * xr_tabls.ads: Add ??? comment for missing overall comment * xsinfo.adb: Make default file name be sinfo.h, since this is what we now use by default. * xsnames.adb: Adjust end of file test to look for five space followed by '#' instead of six spaces. The format of xsnames.adb was modified in the last update. * a-numeri.ads: Add reference to AI-388 for greek letter pi identifier. * clean.adb: Minor reformatting. * gnat1drv.adb, gnatfind.adb, gnatlink.adb, gnatmem.adb, gnatname.adb: Minor reformatting Add 2005 to copyright output when utility is run * csets.adb: Eliminate obsolete comment * debug.adb, g-socket.ads, i-cobol.adb: Minor reformatting throughout Update comments. * sem_eval.ads (Eval_Integer_Literal): Do not inline this, not useful. From-SVN: r94825
Diffstat (limited to 'gcc/ada/gnatmem.adb')
-rw-r--r--gcc/ada/gnatmem.adb10
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/gnatmem.adb b/gcc/ada/gnatmem.adb
index f2a1377..1957594 100644
--- a/gcc/ada/gnatmem.adb
+++ b/gcc/ada/gnatmem.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 1997-2004, Ada Core Technologies, Inc. --
+-- Copyright (C) 1997-2005, Ada Core Technologies, 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- --
@@ -37,9 +37,9 @@
-- The running my_prog will produce a file named gmem.out that will be
-- parsed by gnatmem.
--- - Record a reference to the allocated memory on each allocation call.
+-- - Record a reference to the allocated memory on each allocation call
--- - Suppress this reference on deallocation.
+-- - Suppress this reference on deallocation
-- - At the end of the program, remaining references are potential leaks.
-- sort them out the best possible way in order to locate the root of
@@ -89,7 +89,7 @@ procedure Gnatmem is
-- These need comments, and should be on separate lines ???
function Read_Next return Storage_Elmt;
- -- Reads next dynamic storage operation from the log file.
+ -- Reads next dynamic storage operation from the log file
function Mem_Image (X : Storage_Count) return String;
-- X is a size in storage_element. Returns a value
@@ -233,7 +233,7 @@ procedure Gnatmem is
New_Line;
Put ("GNATMEM ");
Put_Line (Gnat_Version_String);
- Put_Line ("Copyright 1997-2004 Free Software Foundation, Inc.");
+ Put_Line ("Copyright 1997-2005 Free Software Foundation, Inc.");
New_Line;
Put_Line ("Usage: gnatmem switches [depth] exename");