version 1.1, 1999/10/08 02:12:13 |
version 1.5, 2006/02/01 00:30:05 |
Line 13 int Sm1_pushError2(int serial,int no,char *message); |
|
Line 13 int Sm1_pushError2(int serial,int no,char *message); |
|
char *Sm1_popErrorMessage(char *s); |
char *Sm1_popErrorMessage(char *s); |
void Sm1_getsp(void); |
void Sm1_getsp(void); |
void Sm1_dupErrors(void); |
void Sm1_dupErrors(void); |
|
void Sm1_pushCMOtag(int serial); |
|
|
|
|
/******************** Object from Kan/stackm.h *************************/ |
/******************** Object from Kan/stackm.h *************************/ |
|
|
int tag; /* class identifier */ |
int tag; /* class identifier */ |
union cell lc; /* left cell */ |
union cell lc; /* left cell */ |
union cell rc; /* right cell */ |
union cell rc; /* right cell */ |
|
struct object *attr; |
}; |
}; |
|
#define OINIT { .attr = NULL } |
|
|
/********** macros to use Sarray **********************/ |
/********** macros to use Sarray **********************/ |
/* put to Object Array */ |
/* put to Object Array */ |
#define putoa(ob,i,cc) {\ |
#define putoa(ob,i,cc) {\ |
Line 57 void KSpush(struct object ob); |
|
Line 61 void KSpush(struct object ob); |
|
struct object KfindUserDictionary(char *s); |
struct object KfindUserDictionary(char *s); |
struct object KputUserDictionary(char *s,struct object ob); |
struct object KputUserDictionary(char *s,struct object ob); |
struct object KnewErrorPacket(int serial,int no,char *s); |
struct object KnewErrorPacket(int serial,int no,char *s); |
|
struct object KnewErrorPacketObj(struct object); |
struct object KSmathCap(void); /* defined plugin/cmo.c */ |
struct object KSmathCap(void); /* defined plugin/cmo.c */ |
void *KSmathCapByStruct(void); /* defined plugin/cmo.c */ |
void *KSmathCapByStruct(void); /* defined plugin/cmo.c */ |
char *popErrorStackByString(void); |
char *popErrorStackByString(void); |
struct object KSdupErrors(void); |
struct object KSdupErrors(void); |
struct object KpoInteger(int i); |
struct object KpoInteger(int i); |
|
struct object KpoString(char *s); |
|
struct object KSpeek(int k); |
|
struct object KSnewObjectArray(int k); |