diff --git a/changes4.3.html b/changes4.3.html
index 589191070..580202e7d 100644
--- a/changes4.3.html
+++ b/changes4.3.html
@@ -16,6 +16,7 @@
Yap-4.3.21:
+ - FIXED: break should not start the whole system.
- FIXED: abolish could backtrack and give weird error (Nicos
Angelopoulos).
- FIXED: make consult, use_module and friends meta-predicates
diff --git a/pl/boot.yap b/pl/boot.yap
index 6f38ff6c9..2b08e2e6b 100644
--- a/pl/boot.yap
+++ b/pl/boot.yap
@@ -22,6 +22,10 @@ true :- true. % otherwise, $$compile will ignore this clause.
'$live' :-
'$init_system',
+ '$init_catch',
+ '$do_live'.
+
+'$do_live' :-
repeat,
'$set_input'(user),'$set_output'(user),
'$current_module'(Module),
@@ -69,7 +73,6 @@ read_sig.
(nl,writeq('[ Received user signal 2 ]'),nl,halt)), _),
'$set_yap_flags'(10,0),
'$set_value'('$gc',on),
- '$init_catch',
prompt(' ?- '),
(
'$get_value'('$break',0)
@@ -845,7 +848,7 @@ break :- '$get_value'('$break',BL), NBL is BL+1,
'$set_value'('$break',NBL),
current_output(OutStream), current_input(InpStream),
'$format'(user_error, "[ Break (level ~w) ]~n", [NBL]),
- '$live',
+ '$do_live',
!,
'$set_value'('$live',true),
'$set_value'(spy_sl,SPY_SL),