diff options
| author | Arnaud Charlet <charlet@adacore.com> | 2021-11-29 10:04:36 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-01-05 11:32:33 +0000 |
| commit | 1fc93860a54772c3302ba755eed504d3b00c88ef (patch) | |
| tree | 2077aa1486a3713a9efba5df5fccabfae743a450 /gcc/ada/targparm.adb | |
| parent | 1021b72bf6542f3c08e5404b65063216ee1b06f7 (diff) | |
| download | gcc-1fc93860a54772c3302ba755eed504d3b00c88ef.zip gcc-1fc93860a54772c3302ba755eed504d3b00c88ef.tar.gz gcc-1fc93860a54772c3302ba755eed504d3b00c88ef.tar.bz2 | |
[Ada] Reduce runtime dependencies on stage1
gcc/ada/
* osint.adb (File_Names_Equal): Declare To_Lower locally.
* osint.ads (Null_FD): New.
* fmap.adb, sinput-l.adb, targparm.adb: Adapt to changes above.
* switch-b.adb (Scan_Debug_Switches): Use Is_Regular_File to
simplify the bootstrap dependencies.
Diffstat (limited to 'gcc/ada/targparm.adb')
| -rw-r--r-- | gcc/ada/targparm.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/targparm.adb b/gcc/ada/targparm.adb index 4390c0e..ade05c2 100644 --- a/gcc/ada/targparm.adb +++ b/gcc/ada/targparm.adb @@ -165,7 +165,7 @@ package body Targparm is if Null_Source_Buffer_Ptr (Text) then Write_Line ("fatal error, run-time library not installed correctly"); - if FD = Null_FD then + if FD = Osint.Null_FD then Write_Line ("cannot locate file system.ads"); else Write_Line ("no read access for file system.ads"); |