=================================================================== RCS file: /home/cvs/OpenXM_contrib2/asir2000/parse/asir_sm.c,v retrieving revision 1.6 retrieving revision 1.8 diff -u -p -r1.6 -r1.8 --- OpenXM_contrib2/asir2000/parse/asir_sm.c 2004/02/13 05:48:36 1.6 +++ OpenXM_contrib2/asir2000/parse/asir_sm.c 2012/12/17 07:20:45 1.8 @@ -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/parse/asir_sm.c,v 1.5 2003/02/14 22:29:17 ohara Exp $ + * $OpenXM: OpenXM_contrib2/asir2000/parse/asir_sm.c,v 1.7 2004/06/15 00:56:52 noro Exp $ */ #include "ca.h" #include "parse.h" @@ -83,6 +83,7 @@ Asir_Start() asir_save_handler(); if ( ox_asir_initialized ) return; + GC_init(); ox_asir_initialized = 1; ox_do_copy = 1; #if defined(THINK_C) @@ -97,7 +98,6 @@ Asir_Start() #if defined(TOWNS) && !defined(GO32) && !defined(__WIN32__) disable_ctrl_c(); #endif - GC_init(); /* process_args(argc,argv); */ #if 0 copyright(); @@ -202,7 +202,7 @@ char *Asir_PopString() soutput_init(buf); sprintexpr(CO,val); l = strlen(buf); - obuf = (char *)GC_malloc(l+1); + obuf = (char *)MALLOC(l+1); strcpy(obuf,buf); return obuf; } @@ -259,7 +259,7 @@ int *size; saveobj(0,val); *size = ox_count_length; ox_count_length = 0; ox_do_count = 0; - ox_copy_bptr = buf = (char *)GC_malloc(*size); + ox_copy_bptr = buf = (char *)MALLOC(*size); savevl(0,vl); saveobj(0,val); ox_copy_bptr = 0;