Changeset 9a07cd in git for Singular/ipassign.cc

Timestamp:

Mar 1, 2011, 1:32:40 PM (13 years ago)

Author:

Frank Seelisch <seelisch@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

21972bb03ef532430607e35754a4d326473a808a

Parents:

0d6970109b48f04bc456f5aee530b7c06be12c64

Message:

bug fix alg/trans ext: function pointers in case of ring def by ringlist

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

File:

• Singular/ipassign.cc (modified) (1 diff)

Singular/ipassign.cc

@@ -157 +157 @@
        Werror("type %d too complex...set minpoly before",IDTYP(h)); break;
   }
-}
-static void redefineFunctionPointers()
-{
-  n_Procs_s* n = currRing->cf;
-  /* re-defining function pointers */
-  n->cfDelete       = naDelete;
-  n->nNormalize     = naNormalize;
-  n->cfInit         = naInit;
-  n->nPar           = naPar;
-  n->nParDeg        = naParDeg;
-  n->n_Int          = naInt;
-  n->nAdd           = naAdd;
-  n->nSub           = naSub;
-  n->nMult          = naMult;
-  n->nDiv           = naDiv;
-  n->nExactDiv      = naDiv;
-  n->nIntDiv        = naIntDiv;
-  n->nNeg           = naNeg;
-  n->nInvers        = naInvers;
-  n->nCopy          = naCopy;
-  n->cfCopy         = na_Copy;
-  n->nGreater       = naGreater;
-  n->nEqual         = naEqual;
-  n->nIsZero        = naIsZero;
-  n->nIsOne         = naIsOne;
-  n->nIsMOne        = naIsMOne;
-  n->nGreaterZero   = naGreaterZero;
-  n->cfWrite        = naWrite;
-  n->nRead          = naRead;
-  n->nPower         = naPower;
-  n->nGcd           = naGcd;
-  n->nLcm           = naLcm;
-  n->cfSetMap       = naSetMap;
-  n->nName          = naName;
-  n->nSize          = naSize;
-  n->cfGetDenom     = napGetDenom;
-  n->cfGetNumerator = napGetNumerator;
-#ifdef LDEBUG
-  n->nDBTest        = naDBTest;
-#endif
-  /* re-defining global function pointers */
-  nNormalize=naNormalize;
-  nPar   = naPar;
-  nParDeg= nParDeg;
-  n_Int  = naInt;
-  nAdd   = naAdd;
-  nSub   = naSub;
-  nMult  = naMult;
-  nDiv   = naDiv;
-  nExactDiv= naDiv;
-  nIntDiv= naIntDiv;
-  nNeg   = naNeg;
-  nInvers= naInvers;
-  nCopy  = naCopy;
-  nGreater = naGreater;
-  nEqual = naEqual;
-  nIsZero = naIsZero;
-  nIsOne = naIsOne;
-  nIsMOne = naIsMOne;
-  nGreaterZero = naGreaterZero;
-  nRead = naRead;
-  nPower = naPower;
-  nGcd  = naGcd;
-  nLcm  = naLcm;
-  nName= naName;
-  nSize  = naSize;
 }
 static BOOLEAN jjMINPOLY(leftv res, leftv a)