diff options
Diffstat (limited to 'gcc/ada/lib.ads')
-rw-r--r-- | gcc/ada/lib.ads | 17 |
1 files changed, 4 insertions, 13 deletions
diff --git a/gcc/ada/lib.ads b/gcc/ada/lib.ads index f20a18f..c4ace09 100644 --- a/gcc/ada/lib.ads +++ b/gcc/ada/lib.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2019, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2020, 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- -- @@ -537,7 +537,7 @@ package Lib is function Get_Compilation_Switch (N : Pos) return String_Ptr; -- Return the Nth stored compilation switch, or null if less than N - -- switches have been stored. Used by ASIS and back ends written in Ada. + -- switches have been stored. Used by back ends written in Ada. function Generic_May_Lack_ALI (Unum : Unit_Number_Type) return Boolean; -- Generic units must be separately compiled. Since we always use @@ -755,14 +755,6 @@ package Lib is -- important to keep the serial numbers synchronized in the two cases (e.g. -- when the references in a package and a client must be kept consistent). - procedure Tree_Read; - -- Initializes internal tables from current tree file using the relevant - -- Table.Tree_Read routines. - - procedure Tree_Write; - -- Writes out internal tables to current tree file using the relevant - -- Table.Tree_Write routines. - procedure Unlock; -- Unlock internal tables, in cases where the back end needs to modify them @@ -998,12 +990,11 @@ private -- The following table records the compilation switches used to compile -- the main unit. The table includes only switches. It excludes -o -- switches as well as artifacts of the gcc/gnat1 interface such as - -- -quiet, -dumpbase, or -auxbase. + -- -quiet, or -dumpbase. -- This table is set as part of the compiler argument scanning in -- Back_End. It can also be reset in -gnatc mode from the data in an - -- existing ali file, and is read and written by the Tree_Read and - -- Tree_Write routines for ASIS. + -- existing ali file. package Compilation_Switches is new Table.Table ( Table_Component_Type => String_Ptr, |