From f9484a894f085f193fe47ffd18938f8a3779b5b1 Mon Sep 17 00:00:00 2001 From: Wilson Snyder Date: Mon, 11 May 2009 20:32:52 -0400 Subject: [PATCH] Reconsile with Verilog-Perl --- src/verilog.y | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/verilog.y b/src/verilog.y index 16c8c146c..2b7157a64 100644 --- a/src/verilog.y +++ b/src/verilog.y @@ -1312,11 +1312,11 @@ cellpinItList: // IEEE: list_of_port_connections + list_of_parameter_assi cellpinItemE: // IEEE: named_port_connection + named_parameter_assignment + empty /* empty: ',,' is legal */ { $$ = NULL; PINNUMINC(); } | yP_DOTSTAR { $$ = new AstPin($1,PINNUMINC(),".*",NULL); } - | '.' id { $$ = new AstPin($1,PINNUMINC(),*$2,new AstVarRef($1,*$2,false)); $$->svImplicit(true);} - | '.' id '(' ')' { $$ = NULL; PINNUMINC(); } - | '.' id '(' expr ')' { $$ = new AstPin($1,PINNUMINC(),*$2,$4); } + | '.' idAny { $$ = new AstPin($1,PINNUMINC(),*$2,new AstVarRef($1,*$2,false)); $$->svImplicit(true);} + | '.' idAny '(' ')' { $$ = NULL; PINNUMINC(); } + | '.' idAny '(' expr ')' { $$ = new AstPin($1,PINNUMINC(),*$2,$4); } // // For parameters - //UNSUP '.' id '(' data_type ')' { PINDONE($1,$2,$4); GRAMMARP->pinNumInc(); } + //UNSUP '.' idAny '(' data_type ')' { PINDONE($1,$2,$4); GRAMMARP->pinNumInc(); } // // For parameters //UNSUP data_type { PINDONE($1->fileline(),"",$1); GRAMMARP->pinNumInc(); } //