format_to_chars is not supported any longer.
This commit is contained in:
parent
be6947d74c
commit
6efb3176f7
@ -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.
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user