Changeset 2d2e40 in git


Ignore:
Timestamp:
Dec 5, 2011, 2:54:08 PM (12 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')
Children:
1f03abac6bde42c766ce63555d33ee5bf00aa447
Parents:
1f2d3b43da540e3165c73bc71f9dd23f9ec5170f
Message:
fix: warning messages: unsed variable/parameter
Files:
10 edited

Legend:

Unmodified
Added
Removed

  • Singular/iparith.cc

    r1f2d3b r2d2e40  
    208208static BOOLEAN jjLOAD(leftv res, leftv v, BOOLEAN autoexport = FALSE);
    209209static int iiTabIndex(const jjValCmdTab dArithTab, const int len, const int op);
    210 #ifdef MDEBUG
    211 #define jjMakeSub(A) jjDBMakeSub(A,__FILE__,__LINE__)
    212 static Subexpr jjDBMakeSub(leftv e,const char *f,const  int l);
    213 #else
    214210static Subexpr jjMakeSub(leftv e);
    215 #endif
    216211
    217212/*============= vars ======================*/
    … …  
    534529  }
    535530  poly u_p=(poly)u->CopyD(POLY_CMD);
    536   int dummy;
    537531  if ((u_p!=NULL)
    538532  && ((v_i!=0) &&
    … …  
    822816  poly a;
    823817  poly b;
    824   int dummy;
    825818  if (v->next==NULL)
    826819  {
    … …  
    16251618    else                    p=(intvec*)v->Data();
    16261619    int rl=c->nr+1;
    1627     poly r=NULL,h;
    16281620    ideal result;
    16291621    ideal *x=(ideal *)omAlloc(rl*sizeof(ideal));
    … …  
    18871879  return FALSE;
    18881880}
    1889 static BOOLEAN jjEXPORTTO(leftv res, leftv u, leftv v)
     1881static BOOLEAN jjEXPORTTO(leftv, leftv u, leftv v)
    18901882{
    18911883  //Print("exportto %s -> %s\n",v->Name(),u->Name() );
    18921884  return iiExport(v,0,(idhdl)u->data);
    18931885}
    1894 static BOOLEAN jjERROR(leftv res, leftv u)
     1886static BOOLEAN jjERROR(leftv, leftv u)
    18951887{
    18961888  WerrorS((char *)u->Data());
    … …  
    24182410  return FALSE;
    24192411}
    2420 static BOOLEAN jjLOAD2(leftv res, leftv u,leftv v)
     2412static BOOLEAN jjLOAD2(leftv res, leftv, leftv v)
    24212413{
    24222414  return jjLOAD(res, v,TRUE);
    … …  
    25062498  return jjMONITOR2(res,v,NULL);
    25072499}
    2508 static BOOLEAN jjMONITOR2(leftv res, leftv u,leftv v)
     2500static BOOLEAN jjMONITOR2(leftv, leftv u,leftv v)
    25092501{
    25102502#if 0
    … …  
    25712563  return err;
    25722564}
    2573 static BOOLEAN jjNEWSTRUCT2(leftv res, leftv u, leftv v)
     2565static BOOLEAN jjNEWSTRUCT2(leftv, leftv u, leftv v)
    25742566{
    25752567  // u: the name of the new type
    … …  
    29532945    return TRUE;
    29542946  }
    2955   int l=0;
    2956   //resolvente r;
    29572947  syStrategy r;
    29582948  intvec *weights=NULL;
    … …  
    33913381#define jjWRONG2 (proc2)jjWRONG
    33923382#define jjWRONG3 (proc3)jjWRONG
    3393 static BOOLEAN jjWRONG(leftv res, leftv u)
     3383static BOOLEAN jjWRONG(leftv, leftv)
    33943384{
    33953385  return TRUE;
    … …  
    34053395  return FALSE;
    34063396}
    3407 static BOOLEAN jjNULL(leftv res, leftv u)
     3397static BOOLEAN jjNULL(leftv, leftv)
    34083398{
    34093399  return FALSE;
    … …  
    34193409//  return FALSE;
    34203410//}
    3421 static BOOLEAN jjPLUSPLUS(leftv res, leftv u)
     3411static BOOLEAN jjPLUSPLUS(leftv, leftv u)
    34223412{
    34233413  if (IDTYP((idhdl)u->data)==INT_CMD)
    … …  
    37453735  return FALSE;
    37463736}
    3747 static BOOLEAN jjDUMP(leftv res, leftv v)
     3737static BOOLEAN jjDUMP(leftv, leftv v)
    37483738{
    37493739  si_link l = (si_link)v->Data();
    … …  
    37713761  return (co<=0);
    37723762}
    3773 static BOOLEAN jjEXECUTE(leftv res, leftv v)
     3763static BOOLEAN jjEXECUTE(leftv, leftv v)
    37743764{
    37753765  char * d = (char *)v->Data();
    … …  
    38413831}
    38423832#endif
    3843 static BOOLEAN jjGETDUMP(leftv res, leftv v)
     3833static BOOLEAN jjGETDUMP(leftv, leftv v)
    38443834{
    38453835  si_link l = (si_link)v->Data();
    … …  
    39093899  return FALSE;
    39103900}
    3911 static BOOLEAN jjHILBERT(leftv res, leftv v)
     3901static BOOLEAN jjHILBERT(leftv, leftv v)
    39123902{
    39133903#ifdef HAVE_RINGS
    … …  
    40764066  return FALSE;
    40774067}
    4078 static BOOLEAN jjIS_RINGVAR0(leftv res, leftv v)
     4068static BOOLEAN jjIS_RINGVAR0(leftv res, leftv)
    40794069{
    40804070  res->data = (char *)0;
    … …  
    42534243     A list [P, L, U] is returned. */
    42544244  matrix mat = (const matrix)v->Data();
    4255   int rr = mat->rows();
    4256   int cc = mat->cols();
    42574245  matrix pMat;
    42584246  matrix lMat;
    … …  
    42734261{
    42744262  omUpdateInfo();
    4275   long d;
    42764263  switch(((int)(long)v->Data()))
    42774264  {
    … …  
    43644351  return FALSE;
    43654352}
    4366 static BOOLEAN jjOpenClose(leftv res, leftv v)
     4353static BOOLEAN jjOpenClose(leftv, leftv v)
    43674354{
    43684355  si_link l=(si_link)v->Data();
    … …  
    43924379  return FALSE;
    43934380}
    4394 static BOOLEAN jjPARDEG(leftv res, leftv v)
     4381static BOOLEAN jjPARDEG(leftv res, leftv)
    43954382{
    43964383  if (rField_is_Extension(currRing))
    … …  
    45104497  char *s= (char *)v->Data();
    45114498  int i = 1;
    4512   int l = strlen(s);
    45134499  for(i=0; i<sArithBase.nCmdUsed; i++)
    45144500  {
    … …  
    46464632static BOOLEAN jjSQR_FREE(leftv res, leftv u)
    46474633{
    4648   intvec *v=NULL;
    46494634  singclap_factorize_retry=0;
    46504635  ideal f=singclap_sqrfree((poly)(u->CopyD()),currRing);
    … …  
    48794864  return FALSE;
    48804865}
    4881 static BOOLEAN jjLOAD(leftv res, leftv v, BOOLEAN autoexport)
     4866static BOOLEAN jjLOAD(leftv, leftv v, BOOLEAN autoexport)
    48824867{
    48834868  char * s=(char *)v->CopyD();
    … …  
    58425827  return FALSE;
    58435828}
    5844 static BOOLEAN jjNEWSTRUCT3(leftv res, leftv u, leftv v, leftv w)
     5829static BOOLEAN jjNEWSTRUCT3(leftv, leftv u, leftv v, leftv w)
    58455830{
    58465831  // u: the name of the new type
    … …  
    58505835                                            (const char *)w->Data());
    58515836  if (d!=NULL) newstruct_setup((const char *)u->Data(),d);
    5852   return d==NULL;
     5837  return (d==NULL);
    58535838}
    58545839static BOOLEAN jjPREIMAGE(leftv res, leftv u, leftv v, leftv w)
    … …  
    62686253/* must be ordered: first operations for chars (infix ops),
    62696254 * then alphabetically */
    6270 static BOOLEAN jjBREAK0(leftv res, leftv v)
     6255static BOOLEAN jjBREAK0(leftv, leftv)
    62716256{
    62726257#ifdef HAVE_SDB
    … …  
    62756260  return FALSE;
    62766261}
    6277 static BOOLEAN jjBREAK1(leftv res, leftv v)
     6262static BOOLEAN jjBREAK1(leftv, leftv v)
    62786263{
    62796264#ifdef HAVE_SDB
    … …  
    63166301}
    63176302
    6318 static BOOLEAN jjCOEF_M(leftv res, leftv v)
     6303static BOOLEAN jjCOEF_M(leftv, leftv v)
    63196304{
    63206305  if((v->Typ() != VECTOR_CMD)
    … …  
    68886873  return FALSE;
    68896874}
    6890 static BOOLEAN jjNAMES0(leftv res, leftv v)
     6875static BOOLEAN jjNAMES0(leftv res, leftv)
    68916876{
    68926877  res->data=(void *)ipNameList(IDROOT);
    … …  
    70136998  }
    70146999}
    7015 static BOOLEAN jjRESERVED0(leftv res, leftv v)
     7000static BOOLEAN jjRESERVED0(leftv, leftv)
    70167001{
    70177002  int i=1;
    … …  
    70687053  return FALSE;
    70697054}
    7070 static BOOLEAN jjTEST(leftv res, leftv v)
     7055static BOOLEAN jjTEST(leftv, leftv v)
    70717056{
    70727057  do
    … …  
    73827367
    73837368
    7384 #ifdef MDEBUG
    7385 static Subexpr jjDBMakeSub(leftv e,const char *f,const int l)
    7386 #else
    73877369static Subexpr jjMakeSub(leftv e)
    7388 #endif
    73897370{
    73907371  assume( e->Typ()==INT_CMD );
    … …  
    82358216int iiInitArithmetic()
    82368217{
    8237   int i;
    82388218  //printf("iiInitArithmetic()\n");
    82398219  memset(&sArithBase, 0, sizeof(sArithBase));
    … …  
    82698249}
    82708250
    8271 /*---------------------------------------------------------------------*/
    8272 /**
    8273  * @brief append newitem of size sizeofitem to the list named list.
    8274 
    8275  @param[in,out] list
    8276  @param[in,out] item_count
    8277  @param[in] sizeofitem
    8278  @param[in] newitem
    8279 
    8280  @retval  0 success
    8281  @retval -1 failure
    8282 **/
    8283 /*---------------------------------------------------------------------*/
    8284 int iiArithAddItem2list(
    8285   void **list,
    8286   long  *item_count,
    8287   long sizeofitem,
    8288   void *newitem
    8289   )
    8290 {
    8291   int count = *item_count;
    8292 
    8293   //TRACE(0, "add_item_to_list(%p, %p, %ld, %p)\n", list, item_count,
    8294   //       sizeofitem, newitem);
    8295 
    8296   if(count==0)
    8297   {
    8298     *list = (void *)omAlloc(sizeofitem);
    8299   }
    8300   else
    8301   {
    8302     *list = (void *)omRealloc(*list, (count+1) * sizeofitem);
    8303   }
    8304   if((*list)==NULL) return -1;
    8305 
    8306   //memset((*list)+count*sizeofitem, 0, sizeofitem);
    8307   //memcpy((*list)+count*sizeofitem, newitem, sizeofitem);
    8308 
    8309   /* erhoehe counter um 1 */
    8310   (count)++;
    8311   *item_count = count;
    8312   return 0;
    8313 }
    8314 
    83158251int iiArithFindCmd(const char *szName)
    83168252{

  • libpolys/coeffs/ffields.cc

    r1f2d3b r2d2e40  
    205205* number -> int
    206206*/
    207 int nfInt (number &n, const coeffs r)
     207int nfInt (number &, const coeffs )
    208208{
    209209  return 0;

  • libpolys/coeffs/longrat.cc

    r1f2d3b r2d2e40  
    12681268  {
    12691269    int in=mpz_fdiv_ui(n->n,(unsigned long)p);
    1270     long  s, t;
     1270    long  s;
    12711271
    12721272    long  u, v, u0, v0, u1, v1, u2, v2, q, r;
    … …  
    24582458
    24592459
    2460 static number nlInitMPZ(mpz_t m, const coeffs r)
     2460static number nlInitMPZ(mpz_t m, const coeffs)
    24612461{
    24622462  number z = ALLOC_RNUMBER();

  • libpolys/polys/ext_fields/algext.cc

    r1f2d3b r2d2e40  
    571571  return (number)p;
    572572}
    573 CanonicalForm naConvSingNFactoryN( number n, BOOLEAN setChar, const coeffs cf )
     573CanonicalForm naConvSingNFactoryN( number n, BOOLEAN /*setChar*/, const coeffs cf )
    574574{
    575575  naTest(n);
    … …  
    639639#endif
    640640
    641 number naCopyExt(number a, const coeffs src, const coeffs dst)
     641number naCopyExt(number a, const coeffs src, const coeffs)
    642642{
    643643  fraction fa=(fraction)a;

  • libpolys/polys/matpol.cc

    r1f2d3b r2d2e40  
    728728}
    729729
    730 static void mp_FinalClean(matrix a, const ring R)
     730static void mp_FinalClean(matrix a, const ring)
    731731{
    732732  omFreeSize((ADDRESS)a->m,a->nrows*a->ncols*sizeof(poly));
    … …  
    14571457/// entries of a are minors and go to result (only if not in R)
    14581458void mp_MinorToResult(ideal result, int &elems, matrix a, int r, int c,
    1459                      ideal R, const ring ri)
     1459                     ideal R, const ring)
    14601460{
    14611461  poly *q1;

  • libpolys/polys/monomials/p_polys.cc

    r1f2d3b r2d2e40  
    33073307 * NOTE: this only works for Frank's alg. & trans. fields
    33083308 */
    3309 poly n_PermNumber(const number z, const int *par_perm, const int OldPar, const ring src, const ring dst)
     3309poly n_PermNumber(const number z, const int *par_perm, const int , const ring src, const ring dst)
    33103310{
    33113311#if 0

  • libpolys/polys/monomials/ring.cc

    r1f2d3b r2d2e40  
    16041604#ifdef HAVE_PLURAL
    16051605  if (rIsPluralRing(r))
    1606     if( nc_rCopy(res, r, true) );
     1606    if( nc_rCopy(res, r, true) ) {}
    16071607#endif
    16081608

  • libpolys/polys/nc/ncSACache.h

    r1f2d3b r2d2e40  
    8888    };
    8989   
    90     virtual void History(const EHistoryType t, const CExponent a, const CExponent b, const poly p = NULL)
     90    virtual void History(const EHistoryType , const CExponent a, const CExponent b, const poly p = NULL)
    9191    {
    9292      PrintS("CCacheHash::History(a, b, [p])!\n");

  • libpolys/polys/simpleideals.cc

    r1f2d3b r2d2e40  
    12301230      if (cp>mod->rank)
    12311231      {
    1232         Print("## inv. rank %ld -> %d\n",mod->rank,cp);
     1232        Print("## inv. rank %ld -> %ld\n",mod->rank,cp);
    12331233        int k,l,o=mod->rank;
    12341234        mod->rank=cp;

  • libpolys/polys/sparsmat.cc

    r1f2d3b r2d2e40  
    528528poly sparse_mat::smDet()
    529529{
    530   int y;
    531530  poly res = NULL;
    532531
    … …  
    938937  smpoly res, a, b;
    939938  poly ha, hr, x, y;
    940   int e, ip, ir, ia, lev;
     939  int e, ip, ir, ia;
    941940
    942941  if ((c == NULL) || (r == NULL))
    … …  
    19851984static void sm_ExpMultDiv(poly t, const poly b, const poly c, const ring R)
    19861985{
    1987   int i;
    19881986  p_Test(t,R);
    19891987  p_LmTest(b,R);
    … …  
    23722370{
    23732371  sparse_number_mat *linsolv;
    2374   ring origR;
    23752372  ring tmpR;
    23762373  ideal rr;
Note: See TracChangeset for help on using the changeset viewer.