=================================================================== RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/primitive.c,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -p -r1.1.1.1 -r1.2 --- OpenXM/src/kan96xx/Kan/primitive.c 1999/10/08 02:12:02 1.1.1.1 +++ OpenXM/src/kan96xx/Kan/primitive.c 1999/11/07 13:24:19 1.2 @@ -1,3 +1,4 @@ +/* $OpenXM$ */ /* primitive.c */ /* The functions in this module were in stackmachine.c */ @@ -299,8 +300,9 @@ FILE *fp; { int size; int i; + extern char *LeftBracket, *RightBracket; size = ob.lc.ival; - fprintf(fp,"[ "); + fprintf(fp,"%s ",LeftBracket); for (i=0; i