don't dump stack, for now
This commit is contained in:
parent
3168b2cfc8
commit
797e0c6be7
@ -216,7 +216,7 @@ to allow user-control.
|
||||
'$do_error'(Type,Message) :-
|
||||
format('~w~n', [Type]),
|
||||
'$current_stack'(local_sp(_,CP,Envs,CPs)),
|
||||
'$stack_dump',
|
||||
% '$stack_dump',
|
||||
throw(error(Type,[Message|local_sp(Message,CP,Envs,CPs)])).
|
||||
|
||||
'$Error'(E) :-
|
||||
|
Reference in New Issue
Block a user