Changeset eaf66f in git for Singular/ipid.h

Timestamp:

Jan 6, 2010, 3:55:24 PM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '91e5db82acc17434e4062bcfa44e6efa7d41fd30')

Children:

2798e9c9a20190bf0a37493b0ee9bb022d2b226f

Parents:

098f98f02a8e2828b475a241c0b7cfc3fb3c8e01

Message:

IDTYP etc -> ipid.h

git-svn-id: file:///usr/local/Singular/svn/trunk@12410 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/ipid.h (modified) (3 diffs)

Singular/ipid.h

@@ -42 +42 @@
 }
 
-class proclevel {
+class proclevel
+{
   public:
   proclevel * next;
@@ -66 +67 @@
 
 
-/*extern idhdl      currRingHdl; in structs.h */
-/*extern ring     currRing;  in structs.h */
+/*extern idhdl      currRingHdl; in ring.h */
+/*extern ring     currRing;  in ring.h */
 /*extern ideal      currQuotient; in structs.h */
 
@@ -90 +91 @@
 void ipListFlag(idhdl h);
 
+
+#define IDNEXT(a)    ((a)->next)
+#define IDTYP(a)     ((a)->typ)
+#define IDFLAG(a)    ((a)->flag)
+#define IDLEV(a)     ((a)->lev)
+#define IDID(a)      ((a)->id)
+#define IDATTR(a)    ((a)->attribute)
+
+#define IDINT(a)    ((int)(long)((a)->data.ustring))
+#define IDDATA(a)   ((a)->data.ustring)
+#define IDRING(a)   ((a)->data.uring)
+#define IDINTVEC(a) ((a)->data.iv)
+#define IDPOLY(a)   ((a)->data.p)
+#define IDBIGINT(a) ((a)->data.n)
+#define IDNUMBER(a) ((a)->data.n)
+#define IDIDEAL(a)  ((a)->data.uideal)
+#define IDMATRIX(a) ((a)->data.umatrix)
+#define IDMAP(a)    ((a)->data.umap)
+#define IDSTRING(a) ((a)->data.ustring)
+#define IDLIST(a)   ((a)->data.l)
+#define IDLINK(a)   ((a)->data.li)
+#define IDPACKAGE(a) ((a)->data.pack)
+#define IDPROC(a)   ((a)->data.pinf)
+
 #ifndef OM_ALLOC_H
 struct omBin_s;