fix fixes ;-).
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1499 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
b881f59a71
commit
aaf846389a
@ -16,6 +16,7 @@
|
||||
|
||||
<h2>Yap-5.1.0:</h2>
|
||||
<ul>
|
||||
<li> FIXED: don't call goal_expand when looking for handlers of undefined procedures. </li>
|
||||
<li> FIXED: always walk through modules in the same order when waking
|
||||
up variables (otherwise, breaks CLP(QR)). </li>
|
||||
<li> NEW: SWI-like yap_flag(float_format,_). </li>
|
||||
|
@ -749,10 +749,12 @@ not(G) :- \+ '$execute'(G).
|
||||
S \= M, % can't try importing from the module itself.
|
||||
!,
|
||||
'$exit_undefp'.
|
||||
/*
|
||||
'$find_undefp_handler'(G,M,NG,M) :-
|
||||
'$is_expand_goal_or_meta_predicate'(G,M),
|
||||
'$system_catch'(goal_expansion(G, M, NG), user, _, fail), !,
|
||||
'$exit_undefp'.
|
||||
*/
|
||||
'$find_undefp_handler'(G,M,NG,user) :-
|
||||
\+ '$undefined'(unknown_predicate_handler(_,_,_), user),
|
||||
'$system_catch'(unknown_predicate_handler(G,M,NG), user, Error, '$leave_undefp'(Error)), !,
|
||||
|
Reference in New Issue
Block a user