Changeset 37dc41 in git for Singular/grammar.y

Timestamp:

Dec 13, 2010, 12:10:06 PM (13 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

af8213cb14d06cdaf573ec4f5c60ed3dc2f4dcdb

Parents:

4d1104a6829259bb5e2850963b9408eaffa71c61

Message:

x(i)(j) fixed

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

File:

• Singular/grammar.y (modified) (1 diff)

Singular/grammar.y

@@ -509 +509 @@
         | elemexpr '(' exprlist ')'
           {
-            $1.next=(leftv)omAllocBin(sleftv_bin);
-            memcpy($1.next,&$3,sizeof(sleftv));
-            if(iiExprArithM(&$$,&$1,'(')) YYERROR;
+            if ($1.Typ()==UNKNOWN)
+            { // for x(i)(j)
+              if(iiExprArith2(&$$,&$1,'(',&$3)) YYERROR;
+            }
+            else
+            {
+              $1.next=(leftv)omAllocBin(sleftv_bin);
+              memcpy($1.next,&$3,sizeof(sleftv));
+              if(iiExprArithM(&$$,&$1,'(')) YYERROR;
+            }
           }
         | '[' exprlist ']'