format_to_chars is not supported any longer.

This commit is contained in:
Vítor Santos Costa 2014-08-20 07:57:58 -05:00
parent be6947d74c
commit 6efb3176f7

View File

@ -302,7 +302,7 @@ term_expansion_intern_ad((Head<--Body), Module, Mode, [user:ad_intern((Head<--Bo
). ).
term_expansion_intern_ad( (Head<--Body),_,_) :- term_expansion_intern_ad( (Head<--Body),_,_) :-
format_to_chars('Error at compiling the annotated disjunction ~q<--Body.',[Head,Body],Error), format(chars(Error), 'Error at compiling the annotated disjunction ~q<--Body.',[Head,Body]),
print_message(error,Error), print_message(error,Error),
fail. fail.