m = XtCreatePopupShell (name, simpleMenuWidgetClass, toplevelw, NULL, 0);
create_menu (	XtermWidget xtw,	Widget toplevelw,	char *name,	struct _MenuEntry *entries,	int nentries){    Widget m;    TScreen *screen = &xtw->screen;    static XtCallbackRec cb[2] = { { NULL, NULL }, { NULL, NULL }};    static Arg arg = { XtNcallback, (XtArgVal) cb };    if (screen->menu_item_bitmap == None) {	screen->menu_item_bitmap =	  XCreateBitmapFromData (XtDisplay(xtw),				 RootWindowOfScreen(XtScreen(xtw)),				 (char *)check_bits, check_width, check_height);    }    m = XtCreatePopupShell (name, simpleMenuWidgetClass, toplevelw, NULL, 0);    for (; nentries > 0; nentries--, entries++) {	cb[0].callback = (XtCallbackProc) entries->function;	cb[0].closure = (caddr_t) entries->name;	entries->widget = XtCreateManagedWidget (entries->name, 						 (entries->function ?						  smeBSBObjectClass :						  smeLineObjectClass), m,						 &arg, (Cardinal) 1);    }    /* do not realize at this point */    return m;}