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

Diff for /OpenXM/src/kan96xx/Kan/stackmachine.c between version 1.1.1.1 and 1.4

version 1.1.1.1, 1999/10/08 02:12:01 version 1.4, 2000/02/02 03:30:48
Line 1 
Line 1 
   /* $OpenXM: OpenXM/src/kan96xx/Kan/stackmachine.c,v 1.3 2000/01/21 01:08:12 takayama Exp $ */
 /*   stackmachin.c */  /*   stackmachin.c */
   
 #include <stdio.h>  #include <stdio.h>
Line 806  void scanner() {
Line 807  void scanner() {
         fprintf(Fstack,"\nscanner> ");          fprintf(Fstack,"\nscanner> ");
       }        }
       KSexecuteString(" ctrlC-hook "); /* Execute User Defined functions. */        KSexecuteString(" ctrlC-hook "); /* Execute User Defined functions. */
             continue ;
     } else {  }      } else {  }
     if (DebugStack >= 1) { printOperandStack(); }      if (DebugStack >= 1) { printOperandStack(); }
     token = getokenSM(GET);      token = getokenSM(GET);
Line 1193  void KSpush(ob)
Line 1195  void KSpush(ob)
 struct object ob;  struct object ob;
 {  {
   Kpush(ob);    Kpush(ob);
   }
   
   struct object KSpeek(k) {
     return(peek(k));
 }  }
   
 char *KSstringPop() {  char *KSstringPop() {

Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.4

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