Changeset 8cb8e1 in git for coeffs/numbers.h

Timestamp:

Apr 28, 2010, 2:53:08 PM (14 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', '4a9821a93ffdc22a6696668bd4f6b8c9de3e6c5f')

Children:

db3180ca57d54e8d3b4f38b7dc0c1af1a3bdba44

Parents:

77e585d91301adb39a7f4d69c34f795b82ace33a

git-author:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2010-04-28 14:53:08+02:00

git-committer:

Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 11:49:01+01:00

Message:

Fixed gnumpc.*

File:

• coeffs/numbers.h (modified) (3 diffs)

coeffs/numbers.h

@@ -114 +114 @@
 
 
+#ifdef _TRY
+#define rField_is_Q(r) nField_is_Q(r)
+#define rField_is_long_R(r) nField_is_long_R(r) 
+#define rField_is_long_C(r) nField_is_long_C(r)
+#define rField_is_R(r) nField_is_R(r)
+#define rField_is_Zp(r) nField_is_Zp(r)
+#endif
+
+
 #ifdef HAVE_RINGS
 static inline BOOLEAN nField_is_Zp(const coeffs r)
@@ -124 +133 @@
 { return (r->ringtype == 0) && (r->ch == 0) && (r->parameter==NULL); }
 
+
 static inline BOOLEAN nField_is_numeric(const coeffs r) /* R, long R, long C */
 { return (r->ringtype == 0) && (r->ch ==  -1); }
@@ -162 +172 @@
   return FALSE;
 }
+
 #else
+
+
 static inline BOOLEAN nField_is_Zp(const coeffs r)
 { return (r->ch > 1) && (r->parameter==NULL); }