-- {MAR>} -------------------------------------------------------------------
with System.Machine_Code; use System.Machine_Code;
with Ada.Unchecked_Conversion;
+with Hardware_Interface;
package body Non_Local_Jump is
use Basic_Integer_Types;
Asm ("1: popl %%ebp;",
No_Output_Operands,
No_Input_Operands, "", True);
+ Hardware_Interface.Interrupts_Enabled;
end Save_Context;
------------------