Corrected a typo/bug in the processing of the YAP flag "associate".
This commit is contained in:
parent
8f8e62ea63
commit
c723d98869
@ -213,7 +213,7 @@ yap_flag(associate,X) :-
|
||||
yap_flag(associate,X) :-
|
||||
atom(X), !,
|
||||
set_value('$associate',X).
|
||||
yap_flag(bounded,X) :-
|
||||
yap_flag(associate,X) :-
|
||||
'$do_error'(type_error(atom,X),associate(X)).
|
||||
|
||||
yap_flag(bounded,X) :-
|
||||
|
Reference in New Issue
Block a user