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),_,_) :-
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),
fail.