EXPORT(sqInt) primitiveSetItemStyle(void) {
MenuHandle menuHandle;
sqInt menuHandleOop;
sqInt anInteger;
sqInt chStyleInteger;
sqInt _return_value;
menuHandleOop = interpreterProxy->stackValue(2);
anInteger = interpreterProxy->stackIntegerValue(1);
chStyleInteger = interpreterProxy->stackIntegerValue(0);
if (interpreterProxy->failed()) {
return null;
}
menuHandle = ((MenuHandle) (interpreterProxy->positive64BitValueOf(menuHandleOop)));
if (!(ioCheckMenuHandle(menuHandle))) {
_return_value = interpreterProxy->success(0);
if (interpreterProxy->failed()) {
return null;
}
interpreterProxy->popthenPush(4, _return_value);
return null;
}
SetItemStyle(menuHandle,anInteger,chStyleInteger);
return null;
}
GuiObject GuiMenu_addItem (GuiObject menu, const wchar_t *title, long flags,
void (*commandCallback) (GuiObject, XtPointer, XtPointer), const void *closure)
{
Boolean toggle = flags & (GuiMenu_CHECKBUTTON | GuiMenu_RADIO_FIRST | GuiMenu_RADIO_NEXT | GuiMenu_TOGGLE_ON) ? True : False;
GuiObject button;
int accelerator = flags & 127;
Melder_assert (title != NULL);
if (toggle) {
if (flags & (GuiMenu_RADIO_FIRST)) group = NULL;
if (flags & (GuiMenu_RADIO_FIRST | GuiMenu_RADIO_NEXT)) {
button = gtk_radio_menu_item_new_with_label (group, Melder_peekWcsToUtf8 (title));
group = gtk_radio_menu_item_get_group (GTK_RADIO_MENU_ITEM (button));
//Melder_casual ("Created a radio menu item with title %ls, group %ld", title, group);
} else {
button = gtk_check_menu_item_new_with_label (Melder_peekWcsToUtf8 (title));
}
} else {
button = gtk_menu_item_new_with_label (Melder_peekWcsToUtf8 (title));
}
gtk_menu_shell_append (GTK_MENU_SHELL (menu), button);
Melder_assert (button != NULL);
if (flags & GuiMenu_INSENSITIVE)
GuiObject_setSensitive (button, false);
if (flags & GuiMenu_TOGGLE_ON)
gtk_check_menu_item_set_active (GTK_CHECK_MENU_ITEM (button), TRUE);
if (accelerator) {
/*
* For printable characters, the Command key is assumed.
*/
if (accelerator >= 32)
flags |= GuiMenu_COMMAND;
static const guint acceleratorKeys [] = { 0,
GDK_Left, GDK_Right, GDK_Up, GDK_Down, GDK_Pause, GDK_Delete, GDK_Insert, GDK_BackSpace,
GDK_Tab, GDK_Return, GDK_Home, GDK_End, GDK_Return, GDK_Page_Up, GDK_Page_Down, GDK_Escape,
GDK_F1, GDK_F2, GDK_F3, GDK_F4, GDK_F5, GDK_F6, GDK_F7, GDK_F8, GDK_F9, GDK_F10, GDK_F11, GDK_F12,
0, 0, 0 };
int modifiers = 0;
if (flags & GuiMenu_COMMAND) modifiers |= GDK_CONTROL_MASK;
if (flags & GuiMenu_SHIFT) modifiers |= GDK_SHIFT_MASK;
if (flags & GuiMenu_OPTION) modifiers |= GDK_MOD1_MASK;
guint key;
if (accelerator < 32) {
key = acceleratorKeys [accelerator];
} else {
// gdk key symbols in the ASCII range are equal to ASCII
key = accelerator;
}
GtkAccelGroup *ag = gtk_menu_get_accel_group (GTK_MENU (menu));
if (key != 0)
gtk_widget_add_accelerator (button, toggle ? "toggled" : "activate",
ag, key, (GdkModifierType)modifiers, GTK_ACCEL_VISIBLE);
}
#if mac
if (flags & GuiMenu_ATTRACTIVE) {
//Melder_casual ("attractive!");
SetItemStyle (button -> nat.entry.handle, button -> nat.entry.item, bold);
}
#endif
if (commandCallback != NULL) {
gulong handlerId = g_signal_connect (G_OBJECT (button),
toggle ? "toggled" : "activate",
G_CALLBACK (commandCallback), (gpointer) closure);
g_object_set_data (G_OBJECT (button), "handlerId", (gpointer) handlerId);
g_object_set_data (G_OBJECT (button), "commandCallback", (gpointer) commandCallback);
g_object_set_data (G_OBJECT (button), "commandClosure", (gpointer) closure);
} else {
gtk_widget_set_sensitive (button, FALSE);
}
gtk_widget_show (button);
return button;
}
