fix typos

This commit is contained in:
Vítor Santos Costa 2014-10-05 23:59:21 +01:00
parent 3b5a093983
commit 028c036757

View File

@ -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)])).