From 660ea12537c52429e1e96cd9c4adb4025af87a2e Mon Sep 17 00:00:00 2001 From: Vitor Santos Costa Date: Wed, 14 Apr 2010 10:49:32 +0100 Subject: [PATCH] exception handler was not passing well exceptions in setup. --- pl/control.yap | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pl/control.yap b/pl/control.yap index 63341b8b7..1867b363b 100644 --- a/pl/control.yap +++ b/pl/control.yap @@ -73,7 +73,7 @@ setup_call_catcher_cleanup(Setup, Goal, Catcher, Cleanup) :- % make sure we don't lose interrupts if we get exceptions % with setup. -'$handle_broken_setup'(Setup) :- +'$handle_broken_setup'(Exception) :- yap_hacks:enable_interrupts, throw(Exception).