diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

protect unbound ball

Browse Source
This commit is contained in:
Vitor Santos Costa 2010-02-26 10:22:09 +00:00
parent 361c54bed8
commit a8039df035
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pl/boot.yap
View File

@ -1203,7 +1203,7 @@ throw(Ball) :-
throw(Ball) throw(Ball)
). ).
'catch_ball'('$abort', _) :- !, fail. 'catch_ball'(Abort, _) :- Abort == '$abort', !, fail.
% system defined throws should be ignored by used, unless the % system defined throws should be ignored by used, unless the
% user is hacking away. % user is hacking away.
'catch_ball'(Ball, V) :- 'catch_ball'(Ball, V) :-