[BACK]Return to xdeb.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2000 / parse

Diff for /OpenXM_contrib2/asir2000/parse/xdeb.c between version 1.1.1.1 and 1.5

version 1.1.1.1, 1999/12/03 07:39:12 version 1.5, 2000/09/23 05:45:49
Line 1 
Line 1 
 /* $OpenXM: OpenXM/src/asir99/parse/xdeb.c,v 1.1.1.1 1999/11/10 08:12:34 noro Exp $ */  /*
    * Copyright (c) 1994-2000 FUJITSU LABORATORIES LIMITED
    * All rights reserved.
    *
    * FUJITSU LABORATORIES LIMITED ("FLL") hereby grants you a limited,
    * non-exclusive and royalty-free license to use, copy, modify and
    * redistribute, solely for non-commercial and non-profit purposes, the
    * computer program, "Risa/Asir" ("SOFTWARE"), subject to the terms and
    * conditions of this Agreement. For the avoidance of doubt, you acquire
    * only a limited right to use the SOFTWARE hereunder, and FLL or any
    * third party developer retains all rights, including but not limited to
    * copyrights, in and to the SOFTWARE.
    *
    * (1) FLL does not grant you a license in any way for commercial
    * purposes. You may use the SOFTWARE only for non-commercial and
    * non-profit purposes only, such as academic, research and internal
    * business use.
    * (2) The SOFTWARE is protected by the Copyright Law of Japan and
    * international copyright treaties. If you make copies of the SOFTWARE,
    * with or without modification, as permitted hereunder, you shall affix
    * to all such copies of the SOFTWARE the above copyright notice.
    * (3) An explicit reference to this SOFTWARE and its copyright owner
    * shall be made on your publication or presentation in any form of the
    * results obtained by use of the SOFTWARE.
    * (4) In the event that you modify the SOFTWARE, you shall notify FLL by
    * e-mail at risa-admin@sec.flab.fujitsu.co.jp of the detailed specification
    * for such modification or the source code of the modified part of the
    * SOFTWARE.
    *
    * THE SOFTWARE IS PROVIDED AS IS WITHOUT ANY WARRANTY OF ANY KIND. FLL
    * MAKES ABSOLUTELY NO WARRANTIES, EXPRESSED, IMPLIED OR STATUTORY, AND
    * EXPRESSLY DISCLAIMS ANY IMPLIED WARRANTY OF MERCHANTABILITY, FITNESS
    * FOR A PARTICULAR PURPOSE OR NONINFRINGEMENT OF THIRD PARTIES'
    * RIGHTS. NO FLL DEALER, AGENT, EMPLOYEES IS AUTHORIZED TO MAKE ANY
    * MODIFICATIONS, EXTENSIONS, OR ADDITIONS TO THIS WARRANTY.
    * UNDER NO CIRCUMSTANCES AND UNDER NO LEGAL THEORY, TORT, CONTRACT,
    * OR OTHERWISE, SHALL FLL BE LIABLE TO YOU OR ANY OTHER PERSON FOR ANY
    * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, PUNITIVE OR CONSEQUENTIAL
    * DAMAGES OF ANY CHARACTER, INCLUDING, WITHOUT LIMITATION, DAMAGES
    * ARISING OUT OF OR RELATING TO THE SOFTWARE OR THIS AGREEMENT, DAMAGES
    * FOR LOSS OF GOODWILL, WORK STOPPAGE, OR LOSS OF DATA, OR FOR ANY
    * DAMAGES, EVEN IF FLL SHALL HAVE BEEN INFORMED OF THE POSSIBILITY OF
    * SUCH DAMAGES, OR FOR ANY CLAIM BY ANY OTHER PARTY. EVEN IF A PART
    * OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY
    * 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.4 2000/08/22 05:04:28 noro Exp $
   */
 #if defined(VISUAL)  #if defined(VISUAL)
 #if defined(VISUAL_LIB)  #if defined(VISUAL_LIB)
 #include <stdio.h>  #include <stdio.h>
Line 42  void show_debug_window(int on)
Line 90  void show_debug_window(int on)
 {}  {}
 #endif  #endif
 #else /* VISUAL */  #else /* VISUAL */
   #if DO_PLOT
 /*  /*
  *      xdeb.c --- Asir Debug interface.   *      xdeb.c --- Asir Debug interface.
  *   *
Line 66  static String fallback[] = {
Line 115  static String fallback[] = {
   
 static void Done();  static void Done();
 static void SetSelected();  static void SetSelected();
   static void SetDismiss();
   
 static XtActionsRec actions_table[] = {  static XtActionsRec actions_table[] = {
         {"done",Done},          {"done",Done},
Line 103  XtPointer cld,cad;
Line 153  XtPointer cld,cad;
         XtSetValues(cmdwin, arg, 1);          XtSetValues(cmdwin, arg, 1);
 }  }
   
   static void SetDismiss(w,cld,cad)
   Widget w;
   XtPointer cld,cad;
   {
           Arg             arg[5];
           char *cmd;
   
           done = 1;
           cmd = XawDialogGetValueString(cmdwin);
           strcpy(debug_cmd,"quit");
           XtSetArg(arg[0], XtNvalue, "");
           XtSetValues(cmdwin, arg, 1);
   }
   
 init_cmdwin()  init_cmdwin()
 {  {
         Arg             arg[5];          Arg             arg[5];
Line 130  init_cmdwin()
Line 194  init_cmdwin()
                         options,XtNumber(options),&argc,argv);                          options,XtNumber(options),&argc,argv);
                 toplevel = XtAppCreateShell(0,"ox_asir_debug_window",applicationShellWidgetClass,                  toplevel = XtAppCreateShell(0,"ox_asir_debug_window",applicationShellWidgetClass,
                         display,0,0);                          display,0,0);
                 XtSetArg(arg[0],XtNiconName,"ox_asir_debug_window");                  n = 0;
                   XtSetArg(arg[n],XtNiconName,"ox_asir_debug_window"); n++;
                   XtSetArg(arg[n], XtNwidth, 200); n++;
                 mainwin = XtCreatePopupShell("shell",topLevelShellWidgetClass,                  mainwin = XtCreatePopupShell("shell",topLevelShellWidgetClass,
                         toplevel,arg,1);                          toplevel,arg,n);
         /*          /*
          *      Command line           *      Command line
          */           */
                 cmdwin = XtCreateManagedWidget("cmdwin", dialogWidgetClass,                  cmdwin = XtCreateManagedWidget("cmdwin", dialogWidgetClass,
                         mainwin, NULL, 0);                          mainwin, NULL, 0);
                 XawDialogAddButton(cmdwin,"OK",SetSelected,"OK");                  XawDialogAddButton(cmdwin,"Execute",SetSelected,"Execute");
                   XawDialogAddButton(cmdwin,"Dismiss",SetDismiss,"Dismiss");
                 n = 0;                  n = 0;
                 XtSetArg(arg[n], XtNlabel, "Command : "); n++;                  XtSetArg(arg[n], XtNlabel, "Command : "); n++;
                 XtSetArg(arg[n], XtNvalue, ""); n++;                  XtSetArg(arg[n], XtNvalue, ""); n++;
Line 177  char *buf;
Line 244  char *buf;
         }          }
         strcpy(buf,debug_cmd);          strcpy(buf,debug_cmd);
 }  }
   #else /* DO_PLOT */
   init_cmdwin() {}
   
   show_debug_window(on)
   int on;
   {}
   
   get_line(buf)
   char *buf;
   {}
   #endif /* DO_PLOT */
 #endif /* VISUAL */  #endif /* VISUAL */
Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.5
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>