Changeset 65eb96f in git


Ignore:
Timestamp:
Nov 11, 2011, 5:52:53 PM (13 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'c1c65551e4b3a0de0b13ddf30446f6e9569681b5')
Children:
9875202a2c72496bbc39676b4ca272ba4da36c09
Parents:
e6c3d1d6650b98221c24b2534d58726bcbded950
git-author:
Hans Schoenemann <hannes@mathematik.uni-kl.de>2011-11-11 17:52:53+01:00
git-committer:
Martin Lee <martinlee84@web.de>2013-01-18 16:15:04+01:00
Message:
fix #383

leads to changes in
dmod.lib,finvar.lib,involut.lib,primdec.lib,sheafcoh.lib
still to be fixed: modstd.lib,primitiv.lib,hnoether.lib,zeroset.lib
Location:
Singular
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/dmod.lib

    re6c3d1 r65eb96f  
    17211721  dbprint(ppl-1, @R4);
    17221722  ideal K4 = imap(@R2,K2);
     1723  intvec saveopt=option(get);
    17231724  option(redSB);
    17241725  dbprint(ppl,"// -3-2- the final cosmetic std");
     
    17311732  ideal LD = K4;
    17321733  export LD;
     1734  option(set,saveopt);
    17331735  return(@R4);
    17341736}
  • Singular/LIB/finvar.lib

    re6c3d1 r65eb96f  
    64626462  int dgb=degBound;
    64636463  degBound = 0;
     6464  intvec saveopt=option(get);
    64646465  option(redSB);
    64656466  ideal sP = groebner(ideal(P));
  • Singular/iplib.cc

    re6c3d1 r65eb96f  
    298298  newBuffer( omStrDup(p /*pi->data.s.body*/), t /*BT_proc*/,
    299299               pi, l );
     300  int save1=(si_opt_1 & ~TEST_RINGDEP_OPTS);
     301  int save2=si_opt_2;
    300302  BOOLEAN err=yyparse();
    301303  if (sLastPrinted.rtyp!=0)
    302304  {
    303305    sLastPrinted.CleanUp();
     306  }
     307  int save11= ( si_opt_1 & ~TEST_RINGDEP_OPTS);
     308  if ((TEST_V_ALLWARN) &&
     309  (t==BT_proc) &&
     310  ((save1!=save11)||(save2!=si_opt_2)) &&
     311  (pi->libname!=NULL) && (pi->libname[0]!='\0'))
     312  {
     313    struct soptionStruct
     314    {
     315      const char * name;
     316      unsigned   setval;
     317      unsigned   resetval;
     318    };
     319    extern struct soptionStruct optionStruct[];
     320    extern struct soptionStruct verboseStruct[];
     321    Warn("option changed in proc %s from %s",pi->procname,pi->libname);
     322    int i;
     323    for (i=0; optionStruct[i].setval!=0; i++)
     324    {
     325      if ((optionStruct[i].setval & save11)
     326      && (!(optionStruct[i].setval & save1)))
     327      {
     328          Print(" +%s",optionStruct[i].name);
     329      }
     330      if (!(optionStruct[i].setval & save11)
     331      && ((optionStruct[i].setval & save1)))
     332      {
     333          Print(" -%s",optionStruct[i].name);
     334      }
     335    }
     336    for (i=0; verboseStruct[i].setval!=0; i++)
     337    {
     338      if ((verboseStruct[i].setval & si_opt_2)
     339      && (!(verboseStruct[i].setval & save2)))
     340      {
     341          Print(" +%s",verboseStruct[i].name);
     342      }
     343      if (!(verboseStruct[i].setval & si_opt_2)
     344      && ((verboseStruct[i].setval & save2)))
     345      {
     346          Print(" -%s",verboseStruct[i].name);
     347      }
     348    }
     349    PrintLn();
     350  //  PrintS(p);
    304351  }
    305352  return err;
Note: See TracChangeset for help on using the changeset viewer.