Changeset a88544 in git for kernel/polys.h

Timestamp:

Jul 26, 2008, 12:04:55 PM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'f875bbaccd0831e36aaed09ff6adeb3eb45aeb94')

Children:

e5dcf2e9b0937447ac576a41bc6bf66d961d5419

Parents:

eacd64ccb21811d46e2c3e1f042a74e36c3b0abf

Message:

*hannes: inline pOne


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

File:

• kernel/polys.h (modified) (2 diffs)

kernel/polys.h

@@ -4 +4 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: polys.h,v 1.18 2008-07-26 09:40:41 Singular Exp $ */
+/* $Id: polys.h,v 1.19 2008-07-26 10:04:55 Singular Exp $ */
 /*
 * ABSTRACT - all basic methods to manipulate polynomials of the
@@ -359 +359 @@
 #define   pNSet(n) p_NSet(n,currRing)
 //#define   pOne()   pISet(1)
-inline poly pOne()
+inline poly p_One(const ring r)
 {
-  poly rc = pInit();
-  pSetCoeff0(rc,nInit(1));
+  poly rc = p_Init(r);
+  pSetCoeff0(rc,r->cf->nInit(1));
   return rc;
 }
+#define   pOne()   p_One(currRing)
 
 void      pContent(poly p);