parent
1d2d8a8f5a
commit
aceb8afe14
|
@ -1125,6 +1125,7 @@ package body Errout is
|
|||
-- without any further processing.
|
||||
|
||||
pragma Assert (not Continuation);
|
||||
|
||||
Last_Killed := True;
|
||||
return;
|
||||
end if;
|
||||
|
|
|
@ -412,7 +412,7 @@ begin
|
|||
|
||||
pragma Assert
|
||||
(Operating_Mode = Generate_Code
|
||||
or else Operating_Mode = Check_Semantics);
|
||||
or else Operating_Mode = Check_Semantics);
|
||||
|
||||
if Operating_Mode = Generate_Code
|
||||
or else (ASIS_Mode or GNATprove_Mode)
|
||||
|
|
Loading…
Reference in New Issue