diff options
| author | Robert Dewar <dewar@adacore.com> | 2006-10-31 18:50:47 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2006-10-31 18:50:47 +0100 |
| commit | db89aef26f919982e402fcd7733dbe719173341c (patch) | |
| tree | 8a87360456dfa94fb3c45bc6bebb13d1a2339f88 /gcc/ada/bindusg.ads | |
| parent | bd8b9b1eae48aaa4350ab55e3175c4394b9e30c9 (diff) | |
| download | gcc-db89aef26f919982e402fcd7733dbe719173341c.zip gcc-db89aef26f919982e402fcd7733dbe719173341c.tar.gz gcc-db89aef26f919982e402fcd7733dbe719173341c.tar.bz2 | |
bindusg.ads, [...]: Change to package and rename procedure as Display...
2006-10-31 Robert Dewar <dewar@adacore.com>
* bindusg.ads, bindusg.adb:
Change to package and rename procedure as Display, which
now ensures that it only outputs usage information once.
From-SVN: r118246
Diffstat (limited to 'gcc/ada/bindusg.ads')
| -rw-r--r-- | gcc/ada/bindusg.ads | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/gcc/ada/bindusg.ads b/gcc/ada/bindusg.ads index 7c73bd0..e56852b 100644 --- a/gcc/ada/bindusg.ads +++ b/gcc/ada/bindusg.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2006, 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- -- @@ -26,4 +26,9 @@ -- Procedure to generate screen of usage information if no file name present -procedure Bindusg; +package Bindusg is + + procedure Display; + -- Display binder usage if not already displayed + +end Bindusg; |