我对 Prolog 和 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).
我的问题是，他可以使用 findall 术语。
ERROR: findall: Unknown class
但是如果你单独使用 findall，它会很好用。