OpenXM/src/kan96xx/Kan/extern.h - diff

Return to extern.h CVS log

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

version 1.25, 2004/09/11 01:00:42

version 1.30, 2004/09/23 12:20:52

Line 1

/* $OpenXM: OpenXM/src/kan96xx/Kan/extern.h,v 1.24 2004/09/09 11:42:22 takayama Exp $ */

/* $OpenXM: OpenXM/src/kan96xx/Kan/extern.h,v 1.29 2004/09/20 02:11:22 takayama Exp $ */

/*********** global variables for module stackmachine***************/

extern int VerboseStack;

extern int DebugStack;

Line 72 int isLiteral(char *str);

void lockCtrlCForOx();

void unlockCtrlCForOx();

void restoreCtrlCForOx();

int executeExecutableArray(struct object ob,char *fname,int withGotoP);

/* stackmachine.c export */

int KSdefineMacros(void);

Line 137 struct object KarrayToList(struct object ob);

Line 138 struct object KarrayToList(struct object ob);

/* list:conversion */

struct object listToArray(struct object *op);

struct object *arrayToList(struct object ob);

struct object newByteArray(int size,struct object obj);

struct object newByteArrayFromStr(char *s,int size);

struct object byteArrayToArray(struct object obj);

/* kanExport0.c */

/** arithmetic **/

Line 191 struct object KintToUniversalNumber(int n);

Line 195 struct object KintToUniversalNumber(int n);

#define Knumerator(o) ( (o).lc.op )

#define Kdenominator(o) ( (o).rc.op )

#define KopDouble(ob) (*((ob).lc.dbl))

#define KopByteArray(o) ( (o).lc.bytes )

#define getByteArraySize(o) ( (o).rc.ival )

char *KPOLYToString(POLY f);

/** conversion 2 **/

struct object arrayOfPOLYToArray(struct arrayOfPOLY *aa);

Line 221 struct object Khead(struct object ob);

Line 227 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);