Changeset 090fc84 in git


Ignore:
Timestamp:
Oct 30, 1998, 7:45:49 PM (26 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'c7af8613769b29c741d6c338945669719f1fc4f8')
Children:
307433474931d98c8be2eb484bdbb333650ad3fa
Parents:
dc7589ae575c785fb7c98b1f2a692fe42a1ebb5c
Message:
*hannes: fixed missing error message for vectors


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

Legend:

Unmodified
Added
Removed
  • Singular/grammar.y

    rdc7589 r090fc84  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: grammar.y,v 1.51 1998-10-22 13:11:11 krueger Exp $ */
     4/* $Id: grammar.y,v 1.52 1998-10-30 18:45:49 Singular Exp $ */
    55/*
    66* ABSTRACT: SINGULAR shell grammatik
     
    473473              pSetCompP(p,++j);
    474474              int k = (int)(v->Data());
    475               if (k!=0)
    476               {
    477                 int i,t;
    478                 sleftv tmp;
    479                 memset(&tmp,0,sizeof(tmp));
    480                 i=iiTestConvert((t=v->Typ()),POLY_CMD);
    481                 if((i==0) || (iiConvert(t /*v->Typ()*/,POLY_CMD,i,v,&tmp)))
    482                 {
    483                   pDelete(&p);
    484                   pDelete((poly *)&$$.data);
     475              //if (k!=0)
     476              //{
     477                int i,t;
     478                sleftv tmp;
     479                memset(&tmp,0,sizeof(tmp));
     480                i=iiTestConvert((t=v->Typ()),POLY_CMD);
     481                if((i==0) || (iiConvert(t /*v->Typ()*/,POLY_CMD,i,v,&tmp)))
     482                {
     483                  pDelete(&p);
     484                  pDelete((poly *)&$$.data);
    485485                  $2.CleanUp();
    486486                  MYYERROR("expected '[poly,...'");
    487                 }
     487                }
    488488                $$.data = (void *)pAdd((poly)$$.data,
    489                                                pMult(p,(poly)tmp.CopyD()));
     489                                               pMult(p,(poly)tmp.CopyD()));
    490490                v->next=tmp.next;tmp.next=NULL;
    491                 tmp.CleanUp();
    492               }
    493               else
    494                 pDelete1(&p);
     491                tmp.CleanUp();
     492              //}
     493              //else
     494              //  pDelete1(&p);
    495495              v=v->next;
    496496            }
Note: See TracChangeset for help on using the changeset viewer.