OpenXM/src/kan96xx/Kan/primitive.c - diff

Return to primitive.c CVS log

Up to [local] / OpenXM / src / kan96xx / Kan

version 1.8, 2003/11/20 09:20:36

version 1.9, 2003/12/03 01:21:43

Line 1

/* $OpenXM: OpenXM/src/kan96xx/Kan/primitive.c,v 1.7 2003/08/24 05:19:43 takayama Exp $ */

/* $OpenXM: OpenXM/src/kan96xx/Kan/primitive.c,v 1.8 2003/11/20 09:20:36 takayama Exp $ */

/* primitive.c */

/* The functions in this module were in stackmachine.c */

Line 123 static char *operatorType(type)

#define Scclass 99

#define Scoeff2 100

#define Stlimit 101

#define Soxshell 102

/***********************************************/

void printObject(ob,nl,fp)

struct object ob;

Line 376 void KdefinePrimitiveFunctions() {

Line 377 void KdefinePrimitiveFunctions() {

putPrimitiveFunction("system_variable",Ssystem_variable);

putPrimitiveFunction("test",Stest);

putPrimitiveFunction("tlimit",Stlimit);

putPrimitiveFunction("oxshell",Soxshell);

putPrimitiveFunction("map",Smap);

putPrimitiveFunction("to_records",Sto_records);

putPrimitiveFunction("Usage",Susage);

Line 1711 int executePrimitive(ob)

Line 1713 int executePrimitive(ob)

}

break;

case Soxshell:

ob1 = Kpop();

Kpush(KoxShell(ob1));

break;

case Stlimit: