=================================================================== RCS file: /home/cvs/OpenXM_contrib2/asir2000/parse/xdeb.c,v retrieving revision 1.12 retrieving revision 1.16 diff -u -p -r1.12 -r1.16 --- OpenXM_contrib2/asir2000/parse/xdeb.c 2004/02/29 08:30:31 1.12 +++ OpenXM_contrib2/asir2000/parse/xdeb.c 2016/08/24 00:52:51 1.16 @@ -45,9 +45,9 @@ * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. * - * $OpenXM: OpenXM_contrib2/asir2000/parse/xdeb.c,v 1.11 2003/03/07 06:39:59 noro Exp $ + * $OpenXM: OpenXM_contrib2/asir2000/parse/xdeb.c,v 1.15 2015/08/14 13:51:56 fujimoto Exp $ */ -#if defined(VISUAL) +#if defined(VISUAL) || defined(__MINGW32__) #if defined(VISUAL_LIB) #include #include @@ -101,6 +101,7 @@ void show_debug_window(int on) #include #include #include +#include static XrmOptionDescRec options[] = { {"-reverse","*reverse",XrmoptionNoArg,"on"}, @@ -114,11 +115,13 @@ static String fallback[] = { }; static void Done(); +static void Quit(); static void SetSelected(); static void SetDismiss(); static XtActionsRec actions_table[] = { {"done",Done}, + {"quit",Quit}, }; char debug_cmd[BUFSIZ]; @@ -160,7 +163,7 @@ static void SetDismiss(Widget w,XtPointer cld,XtPointe } static Atom wm_delete_window; -static void quit(Widget w, XEvent *ev, String *params,Cardinal *nparams) +static void Quit(Widget w, XEvent *ev, String *params,Cardinal *nparams) { XBell(XtDisplay(w),0); } @@ -201,12 +204,13 @@ void init_cmdwin() n = 0; wm_delete_window = XInternAtom(XtDisplay(toplevel), "WM_DELETE_WINDOW", False); - XtOverrideTranslations(toplevel, - XtParseTranslationTable("WM_PROTOCOLS: quit()")); + XtSetArg(arg[n],XtNiconName,title); n++; XtSetArg(arg[n], XtNwidth, 360); n++; mainwin = XtCreatePopupShell("shell",topLevelShellWidgetClass, toplevel,arg,n); + XtOverrideTranslations(mainwin, + XtParseTranslationTable("WM_PROTOCOLS: quit()")); /* * Command line */