=================================================================== RCS file: /home/cvs/OpenXM_contrib2/asir2000/parse/debug.c,v retrieving revision 1.10 retrieving revision 1.14 diff -u -p -r1.10 -r1.14 --- OpenXM_contrib2/asir2000/parse/debug.c 2001/10/09 01:36:23 1.10 +++ OpenXM_contrib2/asir2000/parse/debug.c 2003/03/07 06:39:59 1.14 @@ -45,12 +45,12 @@ * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. * - * $OpenXM: OpenXM_contrib2/asir2000/parse/debug.c,v 1.9 2001/10/05 03:21:27 noro Exp $ + * $OpenXM: OpenXM_contrib2/asir2000/parse/debug.c,v 1.13 2003/03/07 03:12:31 noro Exp $ */ #include "ca.h" #include "parse.h" #include -#if PARI +#if defined(PARI) #include "genpari.h" #endif @@ -78,7 +78,7 @@ static int curline = 1; extern NODE PVSS; extern unsigned int evalstatline; extern int debug_mode; -extern jmp_buf debug_env; +extern JMP_BUF debug_env; char *debcom[] = { "next", @@ -216,7 +216,7 @@ void debug(SNODE f) extern int do_fep; NODE pvss; -#if !MPI && !defined(VISUAL) +#if !defined(MPI) && !defined(VISUAL) if ( !isatty(fileno(stdin)) && !do_server_in_X11 ) if ( do_file ) ExitAsir(); @@ -232,7 +232,7 @@ void debug(SNODE f) #endif show_debug_window(1); sprintf(prompt,"(debug) "); - setjmp(debug_env); + SETJMP(debug_env); while ( 1 ) { #if FEP if ( !do_fep ) @@ -700,7 +700,7 @@ void bp(SNODE f) CPVS->usrf->name,ln,CPVS->usrf->f.usrf->fname); targetf = CPVS->usrf; curline = ln; println(0,0,1); -#if !MPI && !defined(VISUAL) +#if !defined(MPI) && !defined(VISUAL) if ( do_server_in_X11 || isatty(0) ) #endif debug(f); @@ -761,12 +761,12 @@ void printvars(char *s,VS vs) } if ( exprparse(vs==GPVS?0:vs->usrf,s,&expr) ) { cpvs = CPVS; CPVS = vs; - if ( !(err = setjmp(debug_env)) ) + if ( !(err = SETJMP(debug_env)) ) val = eval(expr); CPVS = cpvs; if ( !err ) { -#if PARI -#if PARI1 +#if defined(PARI) +#if defined(PARI1) outfile = stderr; #else pari_outfile = stderr; @@ -784,8 +784,8 @@ void printvars(char *s,VS vs) #if defined(VISUAL_LIB) w_noflush_stderr(0); #endif -#if PARI -#if PARI1 +#if defined(PARI) +#if defined(PARI1) outfile = stdout; #else pari_outfile = stdout;