Changeset 1b45a8 in git

Timestamp:

Apr 17, 1998, 9:53:43 AM (25 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

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

Children:

802a185c386e17c781afd6e24d51aa81c7555151

Parents:

66be51317f9400a7183a651dba28b63c4ebbdf83

Message:

 * hannes: fixed a minor but very nasty bug: nlSetMap was resetting npPrimeM
   (longrat.cc)


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

Location:

Singular

Files:

• getopt.c (modified) (1 diff)
• longrat.cc (modified) (3 diffs)

Singular/getopt.c

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $id:$ */
+/* $Id: getopt.c,v 1.2 1998-04-17 07:53:41 Singular Exp $ */
 
 /* Getopt for GNU.

Singular/longrat.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: longrat.cc,v 1.15 1998-01-12 17:32:47 Singular Exp $ */
+/* $Id: longrat.cc,v 1.16 1998-04-17 07:53:43 Singular Exp $ */
 /*
 * ABSTRACT: computation with long rational numbers (Hubert Grassmann)
@@ -24 +24 @@
 #endif
 
+static int nlPrimeM;
 static number nlMapP(number from)
 {
   number to;
+  int save=npPrimeM;
+  npPrimeM=nlPrimeM;
   to = nlInit(npInt(from));
+  npPrimeM=save;
   return to;
 }
@@ -42 +46 @@
     if (par==NULL)
     {
-      npPrimeM=c;
+      nlPrimeM=c;
       nMap = nlMapP; /* Z/p -> Q */
       return TRUE;