aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2017-04-27 14:09:11 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2017-04-27 14:09:11 +0200
commitde33eb3865a19e2fcc527de18e611de0703cb83a (patch)
treea9a4e9fa415795e1946a1894ef10ac7a430de742 /gcc/ada/sem.adb
parent1b7c8d39fb9f98a73adfd125b5f3b768c6401cd2 (diff)
downloadgcc-de33eb3865a19e2fcc527de18e611de0703cb83a.zip
gcc-de33eb3865a19e2fcc527de18e611de0703cb83a.tar.gz
gcc-de33eb3865a19e2fcc527de18e611de0703cb83a.tar.bz2
[multiple changes]
2017-04-27 Bob Duff <duff@adacore.com> * g-dyntab.ads, g-dyntab.adb: Add assertions to subprograms that can reallocate. * atree.adb, elists.adb, fname-uf.adb, ghost.adb, inline.adb, * lib.adb, namet.adb, nlists.adb, sem.adb, sinput.adb, stringt.adb: Reorder code so that above assertions do not fail. * table.ads: Remove obsolete comment on Locked. 2017-04-27 Claire Dross <dross@adacore.com> * a-cfdlli.ads: Code cleanup. 2017-04-27 Yannick Moy <moy@adacore.com> * exp_spark.adb (Expand_SPARK_Freeze_Type): Build a DIC procedure when needed for proof. (Expand_SPARK): Call the new procedure. * exp_util.ads Fix typo. 2017-04-27 Gary Dismukes <dismukes@adacore.com> * a-cofuma.ads, a-cfhama.ads: Minor reformatting, grammar, and typo fixes. From-SVN: r247323
Diffstat (limited to 'gcc/ada/sem.adb')
-rw-r--r--gcc/ada/sem.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem.adb b/gcc/ada/sem.adb
index 9cde60e..f277e03 100644
--- a/gcc/ada/sem.adb
+++ b/gcc/ada/sem.adb
@@ -1227,8 +1227,8 @@ package body Sem is
procedure Lock is
begin
- Scope_Stack.Locked := True;
Scope_Stack.Release;
+ Scope_Stack.Locked := True;
end Lock;
----------------