[BACK]Return to sm.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Kan

Diff for /OpenXM/src/kan96xx/Kan/sm.c between version 1.27 and 1.29

version 1.27, 2005/07/03 11:08:54 version 1.29, 2015/09/29 01:52:14
Line 1 
Line 1 
 /* sm.c   $OpenXM: OpenXM/src/kan96xx/Kan/sm.c,v 1.26 2005/06/15 02:22:51 takayama Exp $ */  /* sm.c   $OpenXM: OpenXM/src/kan96xx/Kan/sm.c,v 1.28 2015/09/19 09:56:06 takayama Exp $ */
 #define DATE "2005/06/15"  #define DATE "2005/06/15"
 #define RELEASE "3.050615"    /* This "string" must be an increasing seq.*/  #define RELEASE "3.050615"    /* This "string" must be an increasing seq.*/
 /* You should write the same string in global.c  /* You should write the same string in global.c
Line 29  extern int StartAString;
Line 29  extern int StartAString;
 extern char *StartString;  extern char *StartString;
 extern int Quiet;  extern int Quiet;
 extern char *VersionString;  extern char *VersionString;
 extern unsigned int GC_version;  //extern unsigned int GC_version;
   
 main(argc,argv)  main(argc,argv)
      int argc;       int argc;
      char *argv[];       char *argv[];
 {  {
   int i;    int i;
     int gc_version;
   StandardMacros = 1;    StandardMacros = 1;
   VersionString = RELEASE;    VersionString = RELEASE;
   if (argc > 1) {    if (argc > 1) {
Line 74  main(argc,argv) 
Line 75  main(argc,argv) 
     }      }
   }    }
   
     stackmachine_init(); /* GC is also initialized here */
   stackmachine_init();    gc_version = GC_get_version();
   if (!Quiet) {    if (!Quiet) {
     fprintf(Fstack,"\n");      fprintf(Fstack,"\n");
     fprintf(Fstack,"Kan/StackMachine1");      fprintf(Fstack,"Kan/StackMachine1");
     fprintf(Fstack,"                         1991 April --- 2004.\n");      fprintf(Fstack,"                         1991 April --- 2004.\n");
     fprintf(Fstack,"                              Release %s (C) N. Takayama\n",      fprintf(Fstack,"                              Release %s (C) N. Takayama\n",
             RELEASE);              RELEASE);
     fprintf(Fstack,"gc %d.%d-%d (C) Boehm, Demers, Xerox, SGI, HP,\nGNU MP 4.1 (C) Free Software Foundation,\n",GC_version >>16, (GC_version >> 8)&0xff,GC_version & 0xff);      fprintf(Fstack,"gc %d.%d-%d (C) Boehm, Demers, Xerox, SGI, HP,\nGNU MP 4.1 (C) Free Software Foundation,\n",gc_version >>16, (gc_version >> 8)&0xff,gc_version & 0xff);
     fprintf(Fstack,"OpenXM RFC100, 101, 103 (C) OpenXM developing team. \n");      fprintf(Fstack,"OpenXM RFC100, 101, 103 (C) OpenXM developing team. \n");
     fprintf(Fstack,"This software may be freely distributed  ");      fprintf(Fstack,"This software may be freely distributed  ");
     fprintf(Fstack,"with no warranty expressed. \nSee OpenXM/Copyright/Copyright.generic\n");      fprintf(Fstack,"with no warranty expressed. \nSee OpenXM/Copyright/Copyright.generic\n");
Legend:
Removed from v.1.27  
changed lines
  Added in v.1.29
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>