=================================================================== RCS file: /home/cvs/OpenXM/src/k097/d.h,v retrieving revision 1.6 retrieving revision 1.8 diff -u -p -r1.6 -r1.8 --- OpenXM/src/k097/d.h 2013/11/07 07:29:47 1.6 +++ OpenXM/src/k097/d.h 2020/10/07 23:53:25 1.8 @@ -1,6 +1,8 @@ -/* $OpenXM: OpenXM/src/k097/d.h,v 1.5 2005/06/16 05:07:24 takayama Exp $ */ +/* $OpenXM: OpenXM/src/k097/d.h,v 1.7 2015/10/10 11:29:46 takayama Exp $ */ /* d.h;*/ /* from stackm.h */ +#include +#include /**** data types (class identifiers) ************/ #define Snull 0 @@ -128,7 +130,7 @@ void *mymalloc(int size); int isProtectedSymbol(char *s); int ips(objectp op); /* read from file */ -void parseAFile(FILE *fp); +void parseAfile(FILE *fp); void parseAstring(char *s); int fsgetc(objectp op); int fsungetc(int c,objectp op); @@ -173,6 +175,21 @@ void K00toPrimitiveClass(); void *GC_malloc(size_t size); void *sGC_malloc(size_t size); +int KClex(); +int KCerror(char *s); +int KCparse(); +int sendKan(int p); +void printTens(objectp op); +void K00foo1(); +void K00fooPrimitive(); +void repl(FILE *inFile,FILE *outFile); +int readcomment(); +int readchar(); +void putchar0(int c); +void printf0(char *s); +void printf1(char *s); +int isReserved(char *s); +int shouldReplace(char *s);