aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/lib-xref-spark_specific.adb
diff options
context:
space:
mode:
authorPierre-Marie de Rodat <pmderodat@gcc.gnu.org>2017-11-08 17:10:05 +0000
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>2017-11-08 17:10:05 +0000
commit76b37a56d234f98a8f30c9e22f24cb02edb75e23 (patch)
tree88c4d1a1a5730efdfa3a0187fdb1a89fcd4b48ed /gcc/ada/lib-xref-spark_specific.adb
parentec98bb7dacad52c04092fee6de9cbf3b1d8c6b66 (diff)
downloadgcc-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.adb9
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;