main :-
get_list(L),
write(L),
nl,
new(F, dialog),
send(F, append(button('!', message(@prolog, test, L)))),
send(F, open).
get_list(L) :- L = [1, 2, 3, 4, 5].
test(L) :- write(L), nl.у меня выводит
[1,2,3,4,5]
@2608907
Как передать в функцию|предикат test список L ?
