new exception
This commit is contained in:
parent
9dacc20d34
commit
6bc4acec15
@ -123,7 +123,7 @@ save_program(_File, Goal) :-
|
|||||||
save_program(File, _Goal) :-
|
save_program(File, _Goal) :-
|
||||||
qsave_program(File).
|
qsave_program(File).
|
||||||
|
|
||||||
/** @pred qsave_program
|
/** @pred qend_program
|
||||||
|
|
||||||
Saves an image of the current state of the YAP database in default
|
Saves an image of the current state of the YAP database in default
|
||||||
filee, usually `startup.yss`.
|
filee, usually `startup.yss`.
|
||||||
@ -242,7 +242,6 @@ qend_program :-
|
|||||||
X \= encoding.
|
X \= encoding.
|
||||||
|
|
||||||
'$init_state' :-
|
'$init_state' :-
|
||||||
once('$handle_throw'(_,_,_)),
|
|
||||||
(
|
(
|
||||||
recorded('$program_state', _P, R)
|
recorded('$program_state', _P, R)
|
||||||
->
|
->
|
||||||
|
Reference in New Issue
Block a user