=================================================================== RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/extern.h,v retrieving revision 1.26 retrieving revision 1.28 diff -u -p -r1.26 -r1.28 --- OpenXM/src/kan96xx/Kan/extern.h 2004/09/12 08:55:36 1.26 +++ OpenXM/src/kan96xx/Kan/extern.h 2004/09/13 11:24:11 1.28 @@ -1,4 +1,4 @@ -/* $OpenXM: OpenXM/src/kan96xx/Kan/extern.h,v 1.25 2004/09/11 01:00:42 takayama Exp $ */ +/* $OpenXM: OpenXM/src/kan96xx/Kan/extern.h,v 1.27 2004/09/12 10:22:50 takayama Exp $ */ /*********** global variables for module stackmachine***************/ extern int VerboseStack; extern int DebugStack; @@ -72,7 +72,7 @@ int isLiteral(char *str); void lockCtrlCForOx(); void unlockCtrlCForOx(); void restoreCtrlCForOx(); -int executeExecutableArray(struct object ob,char *fname); +int executeExecutableArray(struct object ob,char *fname,int withGotoP); /* stackmachine.c export */ int KSdefineMacros(void); @@ -222,7 +222,8 @@ struct object Khead(struct object ob); int KpolyLength(POLY f); struct object KsetOutputOrder(struct object obj,struct ring *rp); struct object KsetVariableNames(struct object obj,struct ring *rp); - +/* KgetRingInfo has not yet been implemented. */ +struct object KgetRingInfo(struct object ringObj, struct object ofunc); /* :eval */ struct object Keval(struct object obj);