diff options
| author | bosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-12-17 21:07:05 +0000 |
|---|---|---|
| committer | bosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-12-17 21:07:05 +0000 |
| commit | 26bdbe289ff47a014f2bf4aa06bf3d12d54ca755 (patch) | |
| tree | a224052d9d5171d179321515f61186deba4f2b92 /gcc/ada/ali.adb | |
| parent | 8880be8571f9ef03b3cd47702aa15d31f4c0dad3 (diff) | |
| download | ppe42-gcc-26bdbe289ff47a014f2bf4aa06bf3d12d54ca755.tar.gz ppe42-gcc-26bdbe289ff47a014f2bf4aa06bf3d12d54ca755.zip | |
* sem_ch3.adb (Analyze_Variant_Part): check that type of discriminant
is discrete before analyzing choices.
* bindgen.adb (Gen_Output_File_Ada): Generate a new C-like string
containing the name of the Ada Main Program. This string is mainly
intended for the debugger.
(Gen_Output_File_C): Do the equivalent change when generating a C file.
* ali.adb: Set new Dummy_Entry field in dependency entry
* ali.ads: Add Dummy_Entry field to source dependency table
* bcheck.adb (Check_Consistency): Ignore dummy D lines
* lib-writ.adb (Writ_ALI): Write dummy D lines for missing source files
* lib-writ.ads: Document dummy D lines for missing files.
* types.ads: (Dummy_Time_Stamp): New value for non-existant files
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@48126 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/ali.adb')
| -rw-r--r-- | gcc/ada/ali.adb | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/ada/ali.adb b/gcc/ada/ali.adb index c0d744ffb93..5a4c21bcffa 100644 --- a/gcc/ada/ali.adb +++ b/gcc/ada/ali.adb @@ -1128,8 +1128,10 @@ package body ALI is Sdep.Increment_Last; Sdep.Table (Sdep.Last).Sfile := Get_Name (Lower => True); Sdep.Table (Sdep.Last).Stamp := Get_Stamp; + Sdep.Table (Sdep.Last).Dummy_Entry := + (Sdep.Table (Sdep.Last).Stamp = Dummy_Time_Stamp); - -- Check for version number present, and if so store it + -- Acquire checksum value Skip_Space; |
