Changeset bcce2e in git for kernel/ring.cc

Timestamp:

Nov 17, 2005, 5:51:39 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

661ca5e45013d405078201863b39ac49e79fcfc0

Parents:

ee7dcf2ea641e5500caef257ea26c60168a192a3

Message:

*hannes: ring change sets also char for foctory


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

File:

• kernel/ring.cc (modified) (3 diffs)

kernel/ring.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ring.cc,v 1.42 2005-09-28 15:00:18 Singular Exp $ */
+/* $Id: ring.cc,v 1.43 2005-11-17 16:51:39 Singular Exp $ */
 
 /*
@@ -29 +29 @@
 #include "matpol.h"
 #include "maps.h"
+#endif
+#ifdef HAVE_FACTORY
+#include "factory.h"
 #endif
 
@@ -102 +105 @@
     /*------------ global variables related to polys -------------------*/
     pSetGlobals(r);
+    /*------------ global variables related to factory -------------------*/
+#ifdef HAVE_FACTORY
+    int c=ABS(nGetChar());
+    if (c==1) c=0;
+    setCharacteristic( c );
+#endif
   }
 }