ag: kleine verbesserung von paulchen loesung

diff --git a/ag/parser.y b/ag/parser.y
index 7eb49e888fe3ca39b5094fd32cd69b3cdb888bd8..380b4203a128a25ff98e1114cf94c044d525fc18 100644 (file)
--- a/ag/parser.y
+++ b/ag/parser.y
@@ -46,10 +46,6 @@ Program:       Funcdef ';' Program
 Funcdef:         FUNC ID '(' Pars ')' Stats END
                        @{ @i @Stats.symbols@ = tab_merge(@Funcdef.symbols@, @Pars.pars@, 0); @}
 
-               |
-                 FUNC ID '(' ')' Stats END
-                       @{ @i @Stats.symbols@ = tab_merge(@Funcdef.symbols@, new_tab(), 0); @}
-
                ;  
  
 Structdef:       STRUCT Ids END
@@ -71,6 +67,9 @@ Pars:                   Pars ',' ID
                | ID
                @{ @i @Pars.pars@ = tab_add_symbol(new_tab(), @ID.name@, S_VAR, 0); @}
 
+               |
+               @{ @i @Pars.pars@ = new_tab(); @}
+
                ; 
  
 Stats:           Stat ';' Stats