Changeset 97f271 in git for Singular/grammar.y

Timestamp:

Nov 14, 2000, 5:08:25 PM (23 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

76871f4bc4d0ed14486ba3123e4415306c836586

Parents:

dd01bf0ef5b6855f827f233d0f446456025e361f

Message:

* hannes: iiLibCmd stuff


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

File:

• Singular/grammar.y (modified) (5 diffs)

Singular/grammar.y

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: grammar.y,v 1.85 2000-11-10 15:00:02 Singular Exp $ */
+/* $Id: grammar.y,v 1.86 2000-11-14 16:08:23 Singular Exp $ */
 /*
 * ABSTRACT: SINGULAR shell grammatik
@@ -53 +53 @@
 
 /* From the bison docu:
-   
+
      By defining the macro `YYMAXDEPTH', you can control how deep the
 parser stack can become before a stack overflow occurs.  Define the
@@ -70 +70 @@
 */
 #define YYMAXDEPTH INT_MAX
-    
+
 extern int   yylineno;
 extern FILE* yyin;
@@ -1040 +1040 @@
         '<' stringexpr
           { if ($<i>1 != '<') YYERROR;
-            if((feFilePending=feFopen($2,"r",NULL,TRUE))==NULL) YYERROR; }
+            if((feFilePending=feFopen($2,"r",NULL,TRUE))==NULL) YYERROR; }
         ';'
           { newFile($2,feFilePending); }
@@ -1371 +1371 @@
 
 scriptcmd:
-         SYSVAR elemexpr
-          {
-            sleftv dummy;
-            if (($1!=LIB_CMD)
-            ||(iiExprArith1(&dummy,&$2,LIB_CMD)))
-              YYERROR;
+         SYSVAR stringexpr
+          {
+            if (($1!=LIB_CMD)||(iiLibCmd($2))) YYERROR;
           }
         ;