Popup

Dear all,
sorry if this is a stupid question:
I’m using: SWI-Prolog version 8.0.2

I want the code to: show a popup

But what I’m getting is:
ERROR: :- pce_global/2: create failed: handler_group(click_gesture(left,single,message(@event?receiver?device,selection,@event?receiver)),connect_gesture(left,link(any)),click_gesture(right,single,message(@event?receiver?device,show_position)),click_gesture(left,double,message(@event?receiver?device,collapsed)),click_gesture(right,double,message(@event?receiver?device,zoom,@event?receiver)),click_gesture(right,triple,message(@event?receiver?device,unzoom)),popup_gesture(middle),resize_gesture(left),click_gesture(left,s,single,message(@event?receiver,toggle_selected)))

My code looks like this:
:- pce_global(@selection_gesture,
new(handler_group(
click_gesture(left, ‘’, single,
message(@event?receiver?device,
selection, @event?receiver)),
connect_gesture(left, ‘’,link(any)),
click_gesture(right, ‘’, single,
message(@event?receiver?device,
show_position)),
% click_gesture(middle, ‘’, single,
% message(@event?receiver?device,
% show_dependent_nodes)),
click_gesture(left, ‘’, double,
message(@event?receiver?device,
collapsed)),
click_gesture(right, ‘’, double,
message(@event?receiver?device,
zoom,@event?receiver)),
click_gesture(right, ‘’, triple,
message(@event?receiver?device,
unzoom)),
popup_gesture(middle),
resize_gesture(left),
click_gesture(left, s, single,
message(@event?receiver,
toggle_selected))))).

:- pce_global(@graph_node_recogniser, make_graph_node_recogniser).
make_graph_node_recogniser® :-
new(R, popup_gesture(,,_)),
% Gr=@arg1,
new(P, popup),
send_list(P, append, [
menu_item(dependent,message(@event?receiver?device,show_position)),
menu_item(attributes,message(@event?receiver?device,show_position)),
menu_item(tasks,message(@event?receiver?device,show_position))]).

Run a few simple queries to get a clue:

102 ?- new(X, handler_group(click_gesture(left,single,message(@event?receiver?device,selection,@event?receiver)),connect_gesture(left,link(any)),click_gesture(right,single,message(@event?receiver?device,show_position)),click_gesture(left,double,message(@event?receiver?device,collapsed)),click_gesture(right,double,message(@event?receiver?device,zoom,@event?receiver)),click_gesture(right,triple,message(@event?receiver?device,unzoom)),popup_gesture(middle),resize_gesture(left),click_gesture(left,s,single,message(@event?receiver,toggle_selected)))).
ERROR: handler_group ->initialise: Argument 1 (member): `recogniser ...' expected, found `click_gesture(left,single,message(@event?receiver?device,selection,@event?receiver))'
103 ?- new(X, click_gesture(left,single,message(@event?receiver?device,selection,@event?receiver))).
ERROR: click_gesture ->initialise: Argument 2 (modifier): `[modifier]' expected, found `single'
104 ?- 
1 Like

thank you:grinning: