Changeset db45a2 in git


Ignore:
Timestamp:
Aug 10, 2011, 4:02:17 PM (13 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '52dcfddee5ec87d404d5e0fb44f2d627608208f1')
Children:
1085d42039758a8ec5ff857d7c0b1d53388050e6
Parents:
92d6849100514317f65f8b2200dd0ec32ce68b7c
git-author:
Hans Schoenemann <hannes@mathematik.uni-kl.de>2011-08-10 16:02:17+02:00
git-committer:
Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 13:18:26+01:00
Message:
fix grammar.y/grammar.cc
Location:
Singular
Files:
6 edited

Legend:

Unmodified
Added
Removed
  • Singular/grammar.cc

    r92d684 rdb45a2  
    324324#include <misc/options.h>
    325325#include <Singular/stype.h>
     326#include <Singular/fehelp.h>
    326327#include <Singular/ipid.h>
    327328#include <misc/intvec.h>
     
    788789    1084,  1097,  1096,  1104,  1109,  1116,  1124,  1136,  1152,  1171,
    789790    1175,  1179,  1184,  1188,  1192,  1196,  1200,  1204,  1209,  1215,
    790     1221,  1227,  1233,  1239,  1245,  1251,  1263,  1270,  1274,  1312,
    791     1322,  1335,  1335,  1338,  1410,  1414,  1443,  1456,  1473,  1482,
    792     1487,  1495,  1507,  1526,  1537,  1557,  1581,  1587,  1599,  1606
     791    1221,  1227,  1233,  1239,  1245,  1251,  1263,  1270,  1274,  1311,
     792    1321,  1334,  1334,  1337,  1409,  1413,  1442,  1455,  1472,  1481,
     793    1486,  1494,  1506,  1525,  1536,  1556,  1580,  1586,  1598,  1605
    793794};
    794795#endif
     
    23082309              if (strcmp(tmp,yyvsp[0].name)!=0)
    23092310              {
    2310                 nlRead(yyvsp[0].name,&n);
     2311                n_Read(yyvsp[0].name,&n,coeffs_BIGINT);
    23112312                yyval.lv.rtyp=BIGINT_CMD;
    23122313                yyval.lv.data = n;
     
    32753276
    32763277  case 149:
    3277 #line 1313 "grammar.y"
     3278#line 1312 "grammar.y"
    32783279    {
    32793280            const char *ring_name = yyvsp[0].lv.name;
     
    32853286
    32863287  case 150:
    3287 #line 1323 "grammar.y"
     3288#line 1322 "grammar.y"
    32883289    {
    32893290            if ((yyvsp[-1].i!=LIB_CMD)||(iiLibCmd(yyvsp[0].name,TRUE,TRUE,TRUE)))
     
    32993300
    33003301  case 153:
    3301 #line 1339 "grammar.y"
     3302#line 1338 "grammar.y"
    33023303    {
    33033304            if ((yyvsp[-1].i==KEEPRING_CMD) && (myynest==0))
     
    33713372
    33723373  case 154:
    3373 #line 1411 "grammar.y"
     3374#line 1410 "grammar.y"
    33743375    {
    33753376            type_cmd(&(yyvsp[0].lv));
     
    33783379
    33793380  case 155:
    3380 #line 1415 "grammar.y"
     3381#line 1414 "grammar.y"
    33813382    {
    33823383            //Print("typ is %d, rtyp:%d\n",$1.Typ(),$1.rtyp);
     
    34043405
    34053406  case 156:
    3406 #line 1444 "grammar.y"
     3407#line 1443 "grammar.y"
    34073408    {
    34083409            int i; TESTSETINT(yyvsp[-2].lv,i);
     
    34203421
    34213422  case 157:
    3422 #line 1457 "grammar.y"
     3423#line 1456 "grammar.y"
    34233424    {
    34243425            if (currentVoice->ifsw==1)
     
    34403441
    34413442  case 158:
    3442 #line 1474 "grammar.y"
     3443#line 1473 "grammar.y"
    34433444    {
    34443445            int i; TESTSETINT(yyvsp[-2].lv,i);
     
    34523453
    34533454  case 159:
    3454 #line 1483 "grammar.y"
     3455#line 1482 "grammar.y"
    34553456    {
    34563457            if (exitBuffer(BT_break)) YYERROR;
     
    34603461
    34613462  case 160:
    3462 #line 1488 "grammar.y"
     3463#line 1487 "grammar.y"
    34633464    {
    34643465            if (contBuffer(BT_break)) YYERROR;
     
    34683469
    34693470  case 161:
    3470 #line 1496 "grammar.y"
     3471#line 1495 "grammar.y"
    34713472    {
    34723473            /* -> if(!$2) break; $3; continue;*/
     
    34803481
    34813482  case 162:
    3482 #line 1508 "grammar.y"
     3483#line 1507 "grammar.y"
    34833484    {
    34843485            /* $2 */
     
    34993500
    35003501  case 163:
    3501 #line 1527 "grammar.y"
     3502#line 1526 "grammar.y"
    35023503    {
    35033504            procinfov pi;
     
    35133514
    35143515  case 164:
    3515 #line 1538 "grammar.y"
     3516#line 1537 "grammar.y"
    35163517    {
    35173518            idhdl h = enterid(yyvsp[-2].name,myynest,PROC_CMD,&IDROOT,TRUE);
     
    35363537
    35373538  case 165:
    3538 #line 1558 "grammar.y"
     3539#line 1557 "grammar.y"
    35393540    {
    35403541            omFree((ADDRESS)yyvsp[-1].name);
     
    35603561
    35613562  case 166:
    3562 #line 1582 "grammar.y"
     3563#line 1581 "grammar.y"
    35633564    {
    35643565            // decl. of type proc p(int i)
     
    35693570
    35703571  case 167:
    3571 #line 1588 "grammar.y"
     3572#line 1587 "grammar.y"
    35723573    {
    35733574            // decl. of type proc p(i)
     
    35813582
    35823583  case 168:
    3583 #line 1600 "grammar.y"
     3584#line 1599 "grammar.y"
    35843585    {
    35853586            if(iiRETURNEXPR==NULL) YYERROR;
     
    35913592
    35923593  case 169:
    3593 #line 1607 "grammar.y"
     3594#line 1606 "grammar.y"
    35943595    {
    35953596            if (yyvsp[-2].i==RETURN)
     
    36073608
    36083609/* Line 1010 of yacc.c.  */
    3609 #line 3609 "grammar.cc"
     3610#line 3608 "grammar.cc"
    36103611
    36113612
  • Singular/grammar.y

    r92d684 rdb45a2  
    2020#include <misc/options.h>
    2121#include <Singular/stype.h>
     22#include <Singular/fehelp.h>
    2223#include <Singular/ipid.h>
    2324#include <misc/intvec.h>
     
    569570              if (strcmp(tmp,$1)!=0)
    570571              {
    571                 nlRead($1,&n);
     572                n_Read($1,&n,coeffs_BIGINT);
    572573                $$.rtyp=BIGINT_CMD;
    573574                $$.data = n;
  • Singular/ipid.cc

    r92d684 rdb45a2  
    4040omBin idrec_bin = omGetSpecBin(sizeof(idrec));
    4141
     42coeffs coeffs_BIGINT;
     43
     44FILE   *feFilePending; /*temp. storage for grammar.y */
     45
    4246proclevel *procstack=NULL;
    4347#define TEST
  • Singular/ipid.h

    r92d684 rdb45a2  
    132132extern omBin sip_package_bin;
    133133extern omBin idrec_bin;
     134extern omBin sleftv_bin;
     135
     136extern coeffs coeffs_BIGINT;
     137
     138extern FILE   *feFilePending; /*temp. storage for grammar.y */
    134139#endif
    135140
  • Singular/ipshell.h

    r92d684 rdb45a2  
    208208#endif
    209209void rSetHdl(idhdl h);
    210 
    211 #endif
    212 
     210ring rInit(sleftv* pn, sleftv* rv, sleftv* ord);
     211idhdl rFindHdl(ring r, idhdl n, idhdl w);
     212
     213#endif
     214
  • Singular/misc_ip.cc

    r92d684 rdb45a2  
    11151115  currPackHdl=h;
    11161116  basePackHdl=h;
     1117  coeffs_BIGINT=nInitChar(n_Q,NULL);
    11171118
    11181119// random generator: -----------------------------------------------
Note: See TracChangeset for help on using the changeset viewer.