Changeset 4508ce5 in git for Singular/iparith.cc

Timestamp:

Dec 15, 2000, 7:49:36 PM (23 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

a5f564c88c2600acb20b8afdd6dd84d9d3f715df

Parents:

d3bf0986c4b1a7bac5ffc43b873646317a0d91de

Message:

*hannes: nMap removed nSetMap returns now the routine


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

File:

• Singular/iparith.cc (modified) (4 diffs)

Singular/iparith.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: iparith.cc,v 1.240 2000-12-13 17:49:37 Singular Exp $ */
+/* $Id: iparith.cc,v 1.241 2000-12-15 18:49:29 Singular Exp $ */
 
 /*
@@ -1620 +1620 @@
   idhdl w;
   int op=iiOp;
+  nMapFunc nMap;
 
   if ((w=r->idroot->get(v->Name(),myynest))!=NULL)
@@ -1628 +1629 @@
     BOOLEAN bo;
     //if (!nSetMap(rInternalChar(r),r->parameter,rPar(r),r->minpoly))
-    if (!nSetMap(r))
+    if ((nMap=nSetMap(r))==NULL)
     {
       if (rEqual(r,currRing))
@@ -1693 +1694 @@
     tmpW.data=IDDATA(w);
     if ((bo=maApplyFetch(op,NULL,res,&tmpW, r,
-                         perm,par_perm,par_perm_size)))
+                         perm,par_perm,par_perm_size,nMap)))
     {
       Werror("cannot map %s of type %s(%d)",v->name, Tok2Cmdname(w->typ),w->typ);