diff options
| author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-27 12:45:13 +0000 |
|---|---|---|
| committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-27 12:45:13 +0000 |
| commit | 268b9e9e95f56a59a8817b28ad59b53f40fc668d (patch) | |
| tree | 5e9529982daf11d5b3ab800d4c58bc3fbee99d28 /gcc/ada/osint.ads | |
| parent | e1910362719612f58bd1ea5050fa7a5175036abc (diff) | |
| download | gcc-268b9e9e95f56a59a8817b28ad59b53f40fc668d.tar.gz | |
2009-04-27 Basile Starynkevitch <basile@starynkevitch.net>
MERGED WITH TRUNK r146824::
* gcc/basilys.h: all GTY goes before the identifiers.
* gcc/basilys.c: removed errors.h include.
* gcc/run-basilys.h: ditto.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@146839 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/osint.ads')
| -rw-r--r-- | gcc/ada/osint.ads | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/gcc/ada/osint.ads b/gcc/ada/osint.ads index 897779b178e..4d82c86a5a2 100644 --- a/gcc/ada/osint.ads +++ b/gcc/ada/osint.ads @@ -121,11 +121,11 @@ package Osint is -- Writes name of program as invoked to the current output (normally -- standard output). - procedure Fail (S1 : String; S2 : String := ""; S3 : String := ""); + procedure Fail (S : String); pragma No_Return (Fail); - -- Outputs error messages S1 & S2 & S3 preceded by the name of the - -- executing program and exits with E_Fatal. The output goes to standard - -- error, except if special output is in effect (see Output). + -- Outputs error message S preceded by the name of the executing program + -- and exits with E_Fatal. The output goes to standard error, except if + -- special output is in effect (see Output). function Is_Directory_Separator (C : Character) return Boolean; -- Returns True if C is a directory separator @@ -344,7 +344,6 @@ package Osint is -- -- CR -- CR/LF - -- LF/CR -- LF -- The source is terminated by an EOF (16#1A#) character, which is the last |