new error handlong mechanism
new YAP_ foreign interface fix unbound_first_arg in call_with_args git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@582 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -220,5 +220,5 @@ all(T,G,S) :- '$recorda'('$$one','$',R), (
|
||||
'$check_list_for_bags'([_|B], T) :- !,
|
||||
'$check_list_for_bags'(B,T).
|
||||
'$check_list_for_bags'(S, T) :-
|
||||
throw(error(type_error(list,S),T)).
|
||||
'$do_error'(type_error(list,S),T).
|
||||
|
||||
|
||||
Reference in New Issue
Block a user