[BACK]Return to extern.h CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Kan

Diff for /OpenXM/src/kan96xx/Kan/extern.h between version 1.2 and 1.22

version 1.2, 2000/01/16 07:55:38 version 1.22, 2004/09/04 11:25:58
Line 1 
Line 1 
 /* $OpenXM$ */  /* $OpenXM: OpenXM/src/kan96xx/Kan/extern.h,v 1.21 2004/08/31 05:30:20 takayama Exp $ */
 /*********** global variables for module stackmachine***************/  /*********** global variables for module stackmachine***************/
 extern int VerboseStack;  extern int VerboseStack;
 extern int DebugStack;  extern int DebugStack;
 extern FILE *Fstack;  extern FILE *Fstack;
   #if defined(__CYGWIN__)
   extern sigjmp_buf EnvOfStackMachine;
   #else
 extern jmp_buf EnvOfStackMachine;  extern jmp_buf EnvOfStackMachine;
   #endif
 extern struct object NullObject;  extern struct object NullObject;
 extern struct object NoObject;  extern struct object NoObject;
 extern int Lookup[TYPES][TYPES];  extern int Lookup[TYPES][TYPES];
Line 61  void printObjectArray(struct object ob,int nl,FILE *fp
Line 65  void printObjectArray(struct object ob,int nl,FILE *fp
 /* stackmachine.c  misc*/  /* stackmachine.c  misc*/
 void scanner(void);  void scanner(void);
 void ctrlC(int sig);  void ctrlC(int sig);
   void cancelAlarm();
 int executeToken(struct tokens token);  int executeToken(struct tokens token);
 int executePrimitive(struct object ob);  int executePrimitive(struct object ob);
 int isLiteral(char *str);  int isLiteral(char *str);
Line 75  void KSpush(struct object ob);
Line 80  void KSpush(struct object ob);
 char * KSstringPop(void);  char * KSstringPop(void);
 int KSstackPointer(void);  int KSstackPointer(void);
 struct object KSdupErrors(void);  struct object KSdupErrors(void);
   struct object KSpeek(int k);
   
 /* stackmachine.c context */  /* stackmachine.c context */
 struct context *newContext0(struct context *super,char *name);  struct context *newContext0(struct context *super,char *name);
Line 84  void KsetContext(struct object contextobj);
Line 90  void KsetContext(struct object contextobj);
 void contextControl(actionOfContextControl ctl);  void contextControl(actionOfContextControl ctl);
 struct object getSuperContext(struct object contextObj) ;  struct object getSuperContext(struct object contextObj) ;
   
   /* stackmachine.c back-trace */
   void tracePushName(char *s);
   void traceClearStack(void);
   char *tracePopName(void);
   char *traceShowStack(void);
   
 /* kclass.c */  /* kclass.c */
 int initClassDataBase();  int initClassDataBase();
 void fprintClass(FILE *fp,struct object ob);  void fprintClass(FILE *fp,struct object ob);
Line 130  struct object KaoMult(struct object aa,struct object b
Line 142  struct object KaoMult(struct object aa,struct object b
 struct object KooDiv2(struct object ob1,struct object ob2);  struct object KooDiv2(struct object ob1,struct object ob2);
 struct object KoNegate(struct object ob1);  struct object KoNegate(struct object ob1);
 struct object KreduceRationalFunction(struct object ob);  struct object KreduceRationalFunction(struct object ob);
   struct object KooPower(struct object ob1,struct object ob2);
   
 /* for rational function object */  /* for rational function object */
 struct object KoInverse(struct object ob);  struct object KoInverse(struct object ob);
Line 150  struct object KooLess(struct object o1,struct object o
Line 163  struct object KooLess(struct object o1,struct object o
   
 /** Conversion */  /** Conversion */
 struct object KdataConversion(struct object ob1, char *key);  struct object KdataConversion(struct object ob1, char *key);
   struct object Kto_int32(struct object ob);
 struct object KpoInteger(int i);  struct object KpoInteger(int i);
 struct object KpoString(char *s);  struct object KpoString(char *s);
 struct object KpoPOLY(POLY f);  struct object KpoPOLY(POLY f);
Line 157  struct object KpoArrayOfPOLY(struct arrayOfPOLY *ap);
Line 171  struct object KpoArrayOfPOLY(struct arrayOfPOLY *ap);
 struct object KpoMatrixOfPOLY(struct matrixOfPOLY *mp);  struct object KpoMatrixOfPOLY(struct matrixOfPOLY *mp);
 struct object KpoRingp(struct ring *ringp);  struct object KpoRingp(struct ring *ringp);
 struct object KpoDouble(double a);  struct object KpoDouble(double a);
   struct object KpoUniversalNumber(struct coeff *u);
   struct object KintToUniversalNumber(int n);
 #define KopInteger(o) ( (o).lc.ival )  #define KopInteger(o) ( (o).lc.ival )
 #define KopString(o)  ( (o).lc.str )  #define KopString(o)  ( (o).lc.str )
 #define KopPOLY(o)    ( (o).lc.poly )  #define KopPOLY(o)    ( (o).lc.poly )
Line 182  int objArrayToOrderMatrix(struct object oA,int order[]
Line 198  int objArrayToOrderMatrix(struct object oA,int order[]
 int KsetOrderByObjArray(struct object oA);  int KsetOrderByObjArray(struct object oA);
 struct object oGetOrderMatrix(struct ring *ringp); /* order.c */  struct object oGetOrderMatrix(struct ring *ringp); /* order.c */
 struct object KgetOrderMatrixOfCurrentRing();  struct object KgetOrderMatrixOfCurrentRing();
   struct object oRingToOXringStructure(struct ring *ringp); /* order.c */
 int KsetUpRing(struct object ob1,struct object ob2, struct object ob3,struct object ob4,struct object ob5);  int KsetUpRing(struct object ob1,struct object ob2, struct object ob3,struct object ob4,struct object ob5);
 void KshowRing(struct ring *ringp);  void KshowRing(struct ring *ringp);
 struct object KdefaultPolyRing(struct object num);  struct object KdefaultPolyRing(struct object num);
Line 205  struct object Keval(struct object obj);
Line 222  struct object Keval(struct object obj);
   
 /** misc **/  /** misc **/
 struct object KtoRecords(struct object ob1);  struct object KtoRecords(struct object ob1);
   struct object KstringToArgv(struct object ob1);
 void Kclose(void);  void Kclose(void);
 int warningKan(char *s);  int warningKan(char *s);
   int warningKanNoStrictMode(char *s);
 int errorKan1(char *s,char *m);  int errorKan1(char *s,char *m);
 struct object test(struct object ob);  struct object test(struct object ob);
 struct object Kextension(struct object ob);  struct object Kextension(struct object ob);
Line 235  POLY arrayToPOLY(struct object ob);
Line 254  POLY arrayToPOLY(struct object ob);
 struct object POLYToArray(POLY f);  struct object POLYToArray(POLY f);
 struct object oPrincipalPart(struct object ob);  struct object oPrincipalPart(struct object ob);
 struct object oInitW(struct object ob,struct object oWeight);  struct object oInitW(struct object ob,struct object oWeight);
   struct object KordWsAll(struct object ob,struct object oWeight);
   
 /* :misc  */  /* :misc  */
 struct object homogenizeObject(struct object ob,int *gradep);  struct object homogenizeObject(struct object ob,int *gradep);
 struct object homogenizeObject_vec(struct object ob,int *gradep);  struct object homogenizeObject_vec(struct object ob,int *gradep);
   struct object homogenizeObject_go(struct object ob,int *gradep);
   void KresetDegreeShift(void);
 int oGrade(struct object ob);  int oGrade(struct object ob);
 struct ring *oRingp(struct object ob);  struct ring *oRingp(struct object ob);
 struct object KisOrdered(struct object of);  struct object KisOrdered(struct object of);
 struct object KvectorToSchreyer_es(struct object obarray);  struct object KvectorToSchreyer_es(struct object obarray);
   POLY objArrayToPOLY(struct object ob);
   struct object POLYtoObjArray(POLY f,int size);
   struct object KgetExponents(struct object obPoly,struct object type);
   
 /* hilbert.c */  /* hilbert.c */
 struct object hilberto(struct object obgb,struct object obvlist);  struct object hilberto(struct object obgb,struct object obvlist);
Line 257  char *KobjectToBinary(struct object ob,int *size);
Line 282  char *KobjectToBinary(struct object ob,int *size);
   
 int mmLarger_tower3(POLY ff,POLY gg,struct object *gbList); /* order.c */  int mmLarger_tower3(POLY ff,POLY gg,struct object *gbList); /* order.c */
 struct object KschreyerSkelton(struct object g);  struct object KschreyerSkelton(struct object g);
   
   /* misc */
   struct object KregionMatches(struct object sobj, struct object keyArray);
   int objToInteger(struct object ob);
   
   /* shell.c */
   struct object KoxWhich(struct object cmdo,struct object patho);
   struct object KoxShell(struct object ob);
   void KoxShellHelp(char *key,FILE *fp);

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.22

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>