=================================================================== RCS file: /home/cvs/OpenXM_contrib2/asir2000/builtin/ctrl.c,v retrieving revision 1.32 retrieving revision 1.34 diff -u -p -r1.32 -r1.34 --- OpenXM_contrib2/asir2000/builtin/ctrl.c 2004/09/15 06:06:41 1.32 +++ OpenXM_contrib2/asir2000/builtin/ctrl.c 2004/12/15 22:51:40 1.34 @@ -45,7 +45,7 @@ * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. * - * $OpenXM: OpenXM_contrib2/asir2000/builtin/ctrl.c,v 1.31 2004/08/18 00:17:02 noro Exp $ + * $OpenXM: OpenXM_contrib2/asir2000/builtin/ctrl.c,v 1.33 2004/11/24 06:01:04 noro Exp $ */ #include "ca.h" #include "parse.h" @@ -58,6 +58,7 @@ struct ftab ctrl_tab[] = { {0,0,0}, }; +extern int error_in_timer; extern int prtime,nez,echoback,bigfloat; extern int GC_free_space_numerator,GC_free_space_divisor,debug_up; extern int GC_max_heap_size,Verbose,hideargs,hex_output,do_server_in_X11; @@ -80,11 +81,13 @@ extern int show_crossref; extern Obj user_defined_prompt; extern int asir_setenv; extern int show_orderspec; +extern int no_debug_on_error; static struct { char *key; int *val; } ctrls[] = { + {"error_in_timer",&error_in_timer}, {"cputime",&prtime}, {"nez",&nez}, {"echo",&echoback}, @@ -115,6 +118,7 @@ static struct { {"show_crossref",&show_crossref}, {"allow_laurent",&allow_laurent}, {"show_orderspec",&show_orderspec}, + {"no_debug_on_error",&no_debug_on_error}, #if defined(INTERVAL) {"zerorewrite",&zerorewrite}, #endif