diff options
Diffstat (limited to 'gcc/ada/ghost.adb')
-rw-r--r-- | gcc/ada/ghost.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/ghost.adb b/gcc/ada/ghost.adb index 0e65b7b..beb05f4 100644 --- a/gcc/ada/ghost.adb +++ b/gcc/ada/ghost.adb @@ -1091,8 +1091,8 @@ package body Ghost is procedure Lock is begin - Ignored_Ghost_Units.Locked := True; Ignored_Ghost_Units.Release; + Ignored_Ghost_Units.Locked := True; end Lock; ----------------------------------- |