Random stuff.

[polintos/scott/priv.git] / idlcomp / idlparse.y

diff --git a/idlcomp/idlparse.y b/idlcomp/idlparse.y
index 079d077fda2b92baec39d235c31852f4b49e5a4e..23bd8fd2101c36db38b5573f96afae99255755e0 100644 (file)
--- a/idlcomp/idlparse.y
+++ b/idlcomp/idlparse.y
@@ -421,15 +421,14 @@ param:
        }                       
 ;
 
-more_params:
-       /* empty */
-|      ',' param_list
+param_list_nonempty:
+       param
+|      param_list_nonempty ',' param
 ;
 
 param_list:
        /* empty */
-|      param more_params
-;
+|      param_list_nonempty
 
 method:
        ident '(' {
@@ -498,7 +497,7 @@ iface:
        } '{' iface_body '}' {
                pop_nspace();
                pop_nspace();
-               $$ = $<iface>3;
+               $$ = $<iface>4;
        }
 ;
 
@@ -725,8 +724,6 @@ qualified_ident:
 qualified_decl:
        qualified_ident_raw {
                $$.ident = cur_strlist->back();
-               $$.ident->retain();
-               
                cur_strlist->pop_back();
                
                if (!cur_strlist->empty())