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

Diff for /OpenXM_contrib2/asir2000/plot/ox_plot.c between version 1.13 and 1.20

version 1.13, 2001/10/09 01:36:27 version 1.20, 2004/02/13 05:48:36
Line 45 
Line 45 
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,   * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.   * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *   *
  * $OpenXM: OpenXM_contrib2/asir2000/plot/ox_plot.c,v 1.12 2001/08/22 09:19:21 noro Exp $   * $OpenXM: OpenXM_contrib2/asir2000/plot/ox_plot.c,v 1.19 2003/02/14 22:29:19 ohara Exp $
 */  */
 #include "ca.h"  #include "ca.h"
 #include "parse.h"  #include "parse.h"
Line 53 
Line 53 
 #include "ifplot.h"  #include "ifplot.h"
 #include "version.h"  #include "version.h"
 #include <signal.h>  #include <signal.h>
 #if PARI  #if defined(PARI)
 #include "genpari.h"  #include "genpari.h"
 #endif  #endif
   
Line 63  extern int asir_OperandStackSize;
Line 63  extern int asir_OperandStackSize;
 extern Obj *asir_OperandStack;  extern Obj *asir_OperandStack;
 extern int asir_OperandStackPtr;  extern int asir_OperandStackPtr;
   
   /* environement is defined in libpari.a */
   #if !(PARI_VERSION_CODE > 131588)
 extern jmp_buf environnement;  extern jmp_buf environnement;
   #endif
   
 extern int do_message;  extern int do_message;
 extern int ox_flushing;  extern int ox_flushing;
 extern jmp_buf ox_env;  extern JMP_BUF ox_env;
 extern MATHCAP my_mathcap;  extern MATHCAP my_mathcap;
 extern char LastError[];  extern char LastError[];
   
 void create_error(ERR *,unsigned int ,char *);  void create_error(ERR *,unsigned int ,char *);
   
 void ox_io_init();  void ox_io_init();
 void ox_asir_init(int,char **);  void ox_asir_init(int,char **,char *);
 Obj asir_pop_one();  Obj asir_pop_one();
 void asir_push_one(Obj);  void asir_push_one(Obj);
 void asir_end_flush();  void asir_end_flush();
Line 105  void ox_plot_main(int argc,char **argv)
Line 108  void ox_plot_main(int argc,char **argv)
         int use_x;          int use_x;
   
 #if !defined(VISUAL)  #if !defined(VISUAL)
         ox_asir_init(argc,argv);          ox_asir_init(argc,argv,"ox_plot");
         use_x = init_plot_display(argc,argv);          use_x = init_plot_display(argc,argv);
         if ( use_x )          if ( use_x )
                 ds = ConnectionNumber(display);                  ds = ConnectionNumber(display);
Line 115  void ox_plot_main(int argc,char **argv)
Line 118  void ox_plot_main(int argc,char **argv)
         if ( do_message )          if ( do_message )
                 fprintf(stderr,"I'm an ox_plot, Version %d.\n",ASIR_VERSION);                  fprintf(stderr,"I'm an ox_plot, Version %d.\n",ASIR_VERSION);
   
         if ( setjmp(ox_env) ) {          if ( SETJMP(ox_env) ) {
                 while ( NEXT(asir_infile) )                  while ( NEXT(asir_infile) )
                         closecurrentinput();                          closecurrentinput();
                 reset_current_computation();                  reset_current_computation();
Line 159  static void process_ox()
Line 162  static void process_ox()
                                 break;                                  break;
                         if ( do_message )                          if ( do_message )
                                 fprintf(stderr," %s\n",name_of_cmd(cmd));                                  fprintf(stderr," %s\n",name_of_cmd(cmd));
                         if ( ret = setjmp(main_env) ) {                          if ( ret = SETJMP(main_env) ) {
                                 if ( ret == 1 ) {                                  if ( ret == 1 ) {
                                         create_error(&err,serial,LastError);                                          create_error(&err,serial,LastError);
                                         asir_push_one((Obj)err);                                          asir_push_one((Obj)err);
Line 237  static void asir_do_cmd(unsigned int cmd,unsigned int 
Line 240  static void asir_do_cmd(unsigned int cmd,unsigned int 
                         client_mathcap = (MATHCAP)asir_pop_one();                          client_mathcap = (MATHCAP)asir_pop_one();
                         store_remote_mathcap(0,client_mathcap);                          store_remote_mathcap(0,client_mathcap);
                         break;                          break;
                   case SM_nop:
                 default:                  default:
                         break;                          break;
         }          }
Line 284  static void asir_executeFunction(int serial)
Line 288  static void asir_executeFunction(int serial)
                         create_error(&err,serial,LastError);                          create_error(&err,serial,LastError);
                         asir_push_one((Obj)err);                          asir_push_one((Obj)err);
                 }                  }
           } else if ( !strcmp(func,"draw_string") ) {
                   if ( draw_string(n) < 0 ) {
                           create_error(&err,serial,LastError);
                           asir_push_one((Obj)err);
                   }
         } else if ( !strcmp(func,"clear_canvas") ) {          } else if ( !strcmp(func,"clear_canvas") ) {
                 clear_canvas(n);                  clear_canvas(n);
         }          }
Legend:
Removed from v.1.13  
changed lines
  Added in v.1.20
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>