динамический список prolog xpce

У меня проблема с Прологом и меню циклов XPCE.

Вот мой код:

list:-
new(D,dialog('List')),
send_list(D,append,
[
new(Von,menu(von,cycle)),
new(Zu,menu(zu,cycle)),
new(Ok,button('OK'))
]),
send_list(Von, append, findall(X,city(X),Y)),
send_list(Zu, append, findall(X,city(X),Y)),
send(D,open).

city(berlin).
city(london).
city(paris).
city(rom).

Моя проблема в том, что он может использовать универсальный термин.

ERROR: findall: Unknown class

Но findall работает хорошо, если вы используете его в одиночку.


person Thomas Döring    schedule 24.05.2012    source источник


Ответы (1)


Пролог не является функциональным языком.

findall(X,city(X),Y),
send_list(Von, append, Y),

должно сработать

person joel76    schedule 24.05.2012