Corrected a typo/bug in the processing of the YAP flag "associate".

This commit is contained in:
Paulo Moura 2011-06-24 11:26:29 -05:00
parent 8f8e62ea63
commit c723d98869
1 changed files with 1 additions and 1 deletions

View File

@ -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) :-