Visual Prolog 8 throws error c504 : The expression has type '() -> ::char procedure', which is incompatible with the type '::char'.
main.pro
implement main
open core, console
class predicates
цикл : ().
print : ().
clauses
цикл().
print() :-
console::initUtf8(),
цикл,
C = readChar,
/* Читать символ и связывать его с переменной C */
write(C),
C1 = convert(char, C),
C2 = convert(char, '\r').
C1 = C2.
/* Является ли введенный символ возвратом каретки? fail, если нет */
run() :-
цикл,
fail.
run() :-
succeed.
% place your own code here
end implement main
goal
mainExe::run(main::run).
How can to fix it?