Changeset 4b1f71 in git

Timestamp:

May 11, 1998, 6:55:29 PM (25 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')

Children:

d04d99cd46fef67b79ac5c6827224a249e5c489e

Parents:

aac240edf541d9c620152b1a024b10b3e7c117aa

Message:

* hannes: added rule "example { ....}"


git-svn-id: file:///usr/local/Singular/svn/trunk@1699 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.31 1998-05-11 12:48:21 Singular Exp $ */
+/* $Id: grammar.y,v 1.32 1998-05-11 16:55:29 Singular Exp $ */
 /*
 * ABSTRACT: SINGULAR shell grammatik
@@ -381 +381 @@
               exitVoice();
             }
-            errorreported = FALSE;
-            lastreserved=NULL;
+            //errorreported = FALSE;
+            //lastreserved=NULL;
           }
         ;
@@ -388 +388 @@
 flowctrl: ifcmd
           | whilecmd
+          | example_dummy
           | forcmd
           | proccmd
@@ -394 +395 @@
             {currentVoice->ifsw=0;}
         ;
+
+example_dummy : EXAMPLE_CMD BLOCKTOK { FreeL((ADDRESS)$2); }
 
 command: assign
@@ -1043 +1046 @@
           {
             singular_help($2,TRUE);
-            FreeL((ADDRESS)$2);
-          }
-        | EXAMPLE_CMD BLOCKTOK
-          {
             FreeL((ADDRESS)$2);
           }