diff --git a/src/verilog.y b/src/verilog.y index 10e54f099..2a99f113b 100644 --- a/src/verilog.y +++ b/src/verilog.y @@ -1976,16 +1976,15 @@ function_subroutine_callNoMethod: // IEEE: function_subroutine_call (as f system_t_call: // IEEE: system_tf_call (as task) // - yaD_IGNORE '(' ')' { $$ = NULL; } + yaD_IGNORE parenE { $$ = NULL; } | yaD_IGNORE '(' exprList ')' { $$ = NULL; } // - | yaD_DPI '(' ')' { $$ = new AstTaskRef($2,*$1,NULL); } + | yaD_DPI parenE { $$ = new AstTaskRef($1,*$1,NULL); } | yaD_DPI '(' exprList ')' { $$ = new AstTaskRef($2,*$1,$3); } // | yD_C '(' cStrList ')' { $$ = (v3Global.opt.ignc() ? NULL : new AstUCStmt($1,$3)); } | yD_FCLOSE '(' idClassSel ')' { $$ = new AstFClose($1, $3); } - | yD_FFLUSH { $1->v3error("Unsupported: $fflush of all handles does not map to C++.\n"); } - | yD_FFLUSH '(' ')' { $1->v3error("Unsupported: $fflush of all handles does not map to C++.\n"); } + | yD_FFLUSH parenE { $1->v3error("Unsupported: $fflush of all handles does not map to C++.\n"); } | yD_FFLUSH '(' idClassSel ')' { $$ = new AstFClose($1, $3); } | yD_FINISH parenE { $$ = new AstFinish($1); } | yD_FINISH '(' expr ')' { $$ = new AstFinish($1); } @@ -1999,6 +1998,7 @@ system_t_call: // IEEE: system_tf_call (as task) | yD_DISPLAY '(' str commaEListE ')' { $$ = new AstDisplay($1,AstDisplayType::DISPLAY,*$3,NULL,$4); } | yD_WRITE parenE { $$ = NULL; } // NOP | yD_WRITE '(' str commaEListE ')' { $$ = new AstDisplay($1,AstDisplayType::WRITE, *$3,NULL,$4); } + | yD_FDISPLAY '(' idClassSel ')' { $$ = new AstDisplay($1,AstDisplayType::DISPLAY,"",$3,NULL); } | yD_FDISPLAY '(' idClassSel ',' str commaEListE ')' { $$ = new AstDisplay($1,AstDisplayType::DISPLAY,*$5,$3,$6); } | yD_FWRITE '(' idClassSel ',' str commaEListE ')' { $$ = new AstDisplay($1,AstDisplayType::WRITE, *$5,$3,$6); } | yD_INFO parenE { $$ = new AstDisplay($1,AstDisplayType::INFO, "", NULL,NULL); } diff --git a/test_regress/t/t_flag_bboxsys.v b/test_regress/t/t_flag_bboxsys.v index fc75228a2..92f922994 100644 --- a/test_regress/t/t_flag_bboxsys.v +++ b/test_regress/t/t_flag_bboxsys.v @@ -7,7 +7,9 @@ module t; reg a; initial begin $unknown_sys_task_call_to_be_bbox("blah"); + $unkown_sys_task_call_noarg; a = $unknown_sys_func_call(23); + a = $unknown_sys_func_call_noarg; $write("*-* All Finished *-*\n"); $finish; end