fix typos
This commit is contained in:
parent
3b5a093983
commit
028c036757
@ -214,7 +214,7 @@ to allow user-control.
|
|||||||
|
|
||||||
|
|
||||||
'$do_error'(Type,Message) :-
|
'$do_error'(Type,Message) :-
|
||||||
format('~w~n', [Type]),
|
% format('~w~n', [Type]),
|
||||||
'$current_stack'(local_sp(_,CP,Envs,CPs)),
|
'$current_stack'(local_sp(_,CP,Envs,CPs)),
|
||||||
% '$stack_dump',
|
% '$stack_dump',
|
||||||
throw(error(Type,[Message|local_sp(Message,CP,Envs,CPs)])).
|
throw(error(Type,[Message|local_sp(Message,CP,Envs,CPs)])).
|
||||||
|
Reference in New Issue
Block a user