Changeset eacd64 in git for kernel/polys.h

Timestamp:

Jul 26, 2008, 11:40:41 AM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

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

Children:

a88544fdc68f487a8bdd16ab6970163fd7fdad89

Parents:

0a9e45327ccc99fcc83b828f8bd61c187d8e46ee

Message:

*hannes: inline pOne


git-svn-id: file:///usr/local/Singular/svn/trunk@10913 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.17 2008-07-25 14:37:55 Singular Exp $ */
+/* $Id: polys.h,v 1.18 2008-07-26 09:40:41 Singular Exp $ */
 /*
 * ABSTRACT - all basic methods to manipulate polynomials of the
@@ -358 +358 @@
 #define   pISet(i) p_ISet(i,currRing)
 #define   pNSet(n) p_NSet(n,currRing)
-#define   pOne()   pISet(1)
+//#define   pOne()   pISet(1)
+inline poly pOne()
+{
+  poly rc = pInit();
+  pSetCoeff0(rc,nInit(1));
+  return rc;
+}
 
 void      pContent(poly p);