Changeset a4f307a in git

Timestamp:

Dec 7, 2000, 4:42:30 PM (23 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'spielwiese', '828514cf6e480e4bafc26df99217bf2a1ed1ef45')

Children:

85e36d429ea8f1e1eceecf82cc718ab7088ba8af

Parents:

9514c1b9e6fedc1e68404517fdcb4b2a9424e272

Message:

* update prCopy stuff


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

Location:

Singular

Files:

• extra.cc (modified) (2 diffs)
• prCopyMacros.h (modified) (1 diff)
• prCopyTemplate.cc (modified) (2 diffs)

Singular/extra.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR      *
 *****************************************/
-/* $Id: extra.cc,v 1.150 2000-11-13 14:50:21 levandov Exp $ */
+/* $Id: extra.cc,v 1.151 2000-12-07 15:42:30 obachman Exp $ */
 /*
 * ABSTRACT: general interface to internals of Singular ("system" command)
@@ -627 +627 @@
 #include "mpsr.h"
 
+#include "mod_raw.h"
    
 static BOOLEAN jjEXTENDED_SYSTEM(leftv res, leftv h)

Singular/prCopyMacros.h

@@ -33 +33 @@
 #undef PR_NUMBER_SIMPLE_NAME
 #if PR_NUMBER_SIMPLE > 0 
-#define PR_NCOPY(n) n
+#define PR_NCOPY(n, r) n
 #define PR_NDELETE(n, r) ((void)0)
 #define PR_NUMBER_SIMPLE_NAME NSimple
 #else
-#define PR_NCOPY(n) nCopy(n)
-#define PR_NDELETE(n, r) nDelete(n)
+#define PR_NCOPY(n, r) n_Copy(n,r)
+#define PR_NDELETE(n, r) n_Delete(n,r)
 #define PR_NUMBER_SIMPLE_NAME NoNSimple
 #endif

Singular/prCopyTemplate.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: prCopyTemplate.cc,v 1.4 2000-11-03 14:50:23 obachman Exp $ */
+/* $Id: prCopyTemplate.cc,v 1.5 2000-12-07 15:42:30 obachman Exp $ */
 /*
 * ABSTRACT - templates for pr routines
@@ -20 +20 @@
     pNext(dest) = (poly) PR_ALLOC_MONOM(r_dest);
     pIter(dest);
-    pSetCoeff0(dest, PR_NCOPY(pGetCoeff(src)));
+    pSetCoeff0(dest, PR_NCOPY(pGetCoeff(src), r_src));
     PR_CPY_EVECTOR(dest, r_dest, src, r_src);
     tmp = pNext(src);