[BACK]Return to sm1stackmachine.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / kxx

Diff for /OpenXM/src/kxx/sm1stackmachine.c between version 1.6 and 1.8

version 1.6, 2006/02/01 00:30:05 version 1.8, 2015/10/10 11:29:46
Line 1 
Line 1 
 #include <stdio.h>  #include <stdio.h>
 #include <setjmp.h>  #include <setjmp.h>
   #include <stdlib.h>
 #include "ox_kan.h"  #include "ox_kan.h"
 #include "serversm.h"  #include "serversm.h"
 extern int OXprintMessage;  extern int OXprintMessage;
Line 144  int Sm1_pushError2(int serial, int no, char *s)
Line 145  int Sm1_pushError2(int serial, int no, char *s)
   struct object core = OINIT;    struct object core = OINIT;
   struct object core1 = OINIT;    struct object core1 = OINIT;
   char *ss;    char *ss;
   
     ss = (char *)sGC_malloc(strlen(s)+1);
     strcpy(ss,s);
     /*
   char *error_message="<ox103:error_message>";    char *error_message="<ox103:error_message>";
   char *message="<ox103:message>";    char *message="<ox103:message>";
   char *stack_trace="<ox103:stack_trace>";    char *stack_trace="<ox103:stack_trace>";
Line 174  int Sm1_pushError2(int serial, int no, char *s)
Line 179  int Sm1_pushError2(int serial, int no, char *s)
         strcat(ss,source_trace2);          strcat(ss,source_trace2);
   }    }
   strcat(ss,error_message2);    strcat(ss,error_message2);
     */
   
   if (MsgStackTraceInArrayp != NULL) {    if (MsgStackTraceInArrayp != NULL) {
         core = KSnewObjectArray(2);          core = KSnewObjectArray(2);

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.8

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>