aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/ali.adb
diff options
context:
space:
mode:
authorGeert Bosch <bosch@gcc.gnu.org>2001-12-17 22:07:05 +0100
committerGeert Bosch <bosch@gcc.gnu.org>2001-12-17 22:07:05 +0100
commit855ff2e1e447affef1e407fe68b9e10d525f41f5 (patch)
treea224052d9d5171d179321515f61186deba4f2b92 /gcc/ada/ali.adb
parentc1c22e7a703c6e1d638195f667c9f1ce72ef6de5 (diff)
downloadgcc-855ff2e1e447affef1e407fe68b9e10d525f41f5.zip
gcc-855ff2e1e447affef1e407fe68b9e10d525f41f5.tar.gz
gcc-855ff2e1e447affef1e407fe68b9e10d525f41f5.tar.bz2
sem_ch3.adb (Analyze_Variant_Part): check that type of discriminant is discrete before analyzing choices.
* 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 From-SVN: r48126
Diffstat (limited to 'gcc/ada/ali.adb')
-rw-r--r--gcc/ada/ali.adb4
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/ada/ali.adb b/gcc/ada/ali.adb
index c0d744f..5a4c21b 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;