src/Pure/Isar/toplevel.ML
changeset 30618 046f4f986fb5
parent 30571 c12484a27367
child 30801 9bdf001bea58
equal deleted inserted replaced
30617:620db300c038 30618:046f4f986fb5
   309 in
   309 in
   310 
   310 
   311 fun controlled_execution f =
   311 fun controlled_execution f =
   312   f
   312   f
   313   |> debugging
   313   |> debugging
   314   |> interruptible;
   314   |> Future.interruptible_task;
   315 
   315 
   316 fun program f =
   316 fun program f =
   317  (f
   317  (f
   318   |> controlled_execution
   318   |> controlled_execution
   319   |> toplevel_error) ();
   319   |> toplevel_error) ();