make sure to reenable interrupts if you have to exit setup in a hurry (#158).

2009-12-03 17:46:21 +00:00 · 2009-12-03 17:46:21 +00:00 · 71e4d73a75
commit 71e4d73a75
parent bc4b718afb
1 changed files with 1 additions and 0 deletions
--- a/pl/control.yap
+++ b/pl/control.yap
@ -76,6 +76,7 @@ setup_call_catcher_cleanup(Setup, Goal, Catcher, Cleanup) :-
 	(
 	 var(MG)
 	->
+	 yap_hacks:enable_interrupts,
 	 '$do_error'(instantiation_error,G)
 	;
 	 true