changeset 30618 | 046f4f986fb5 |
parent 30571 | c12484a27367 |
child 30801 | 9bdf001bea58 |
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) (); |