diff options
author | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2017-11-08 17:10:05 +0000 |
---|---|---|
committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2017-11-08 17:10:05 +0000 |
commit | 76b37a56d234f98a8f30c9e22f24cb02edb75e23 (patch) | |
tree | 88c4d1a1a5730efdfa3a0187fdb1a89fcd4b48ed /gcc/ada/lib-xref-spark_specific.adb | |
parent | ec98bb7dacad52c04092fee6de9cbf3b1d8c6b66 (diff) | |
download | gcc-76b37a56d234f98a8f30c9e22f24cb02edb75e23.zip gcc-76b37a56d234f98a8f30c9e22f24cb02edb75e23.tar.gz gcc-76b37a56d234f98a8f30c9e22f24cb02edb75e23.tar.bz2 |
[multiple changes]
2017-11-08 Piotr Trojanek <trojanek@adacore.com>
* spark_xrefs.ads (SPARK_Scope_Record): Remove File_Num component.
* lib-xref-spark_specific.adb (Add_SPARK_Scope): Skip initialization of
removed component.
2017-11-08 Gary Dismukes <dismukes@adacore.com>
* sem_ch4.adb: Minor typo fix.
From-SVN: r254546
Diffstat (limited to 'gcc/ada/lib-xref-spark_specific.adb')
-rw-r--r-- | gcc/ada/lib-xref-spark_specific.adb | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/gcc/ada/lib-xref-spark_specific.adb b/gcc/ada/lib-xref-spark_specific.adb index 56bcf5d..df0c5bb 100644 --- a/gcc/ada/lib-xref-spark_specific.adb +++ b/gcc/ada/lib-xref-spark_specific.adb @@ -161,11 +161,10 @@ package body SPARK_Specific is -- range. SPARK_Scope_Table.Append - ((Entity => E, - File_Num => Dspec, - Scope_Num => Scope_Id, - From_Xref => 1, - To_Xref => 0)); + ((Entity => E, + Scope_Num => Scope_Id, + From_Xref => 1, + To_Xref => 0)); Scope_Id := Scope_Id + 1; end Add_SPARK_Scope; |