luke
/
verilator
mirror of https://github.com/verilator/verilator.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Tests: bind by modname

This commit is contained in:
Wilson Snyder 2013-01-15 19:23:46 -05:00
parent 042fb76837
commit 0286f588bf
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
test_regress/t/t_bind2.pl
View File

@ -7,8 +7,6 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
# Lesser General Public License Version 3 or the Perl Artistic License # Lesser General Public License Version 3 or the Perl Artistic License
# Version 2.0. # Version 2.0.
$Self->{vlt} and $Self->unsupported("Verilator unsupported, bug602");
compile ( compile (
); );

5
test_regress/t/t_bind2.v
View File

@ -3,6 +3,8 @@
// This file ONLY is placed into the Public Domain, for any use, // This file ONLY is placed into the Public Domain, for any use,
// without warranty, 2013 by Ed Lander. // without warranty, 2013 by Ed Lander.
// verilator lint_off WIDTH
`define check(got,expec) do if ((got) != (expec)) begin $display("Line%0d: Got 0x%0x Exp 0x%0x\n", `__LINE__, (got), (expec)); $stop; end while(0); `define check(got,expec) do if ((got) != (expec)) begin $display("Line%0d: Got 0x%0x Exp 0x%0x\n", `__LINE__, (got), (expec)); $stop; end while(0);
module t (/*AUTOARG*/ module t (/*AUTOARG*/
@ -36,7 +38,8 @@ module t (/*AUTOARG*/
//p2 explictly bound to targetmod (=> 0x05) //p2 explictly bound to targetmod (=> 0x05)
//p3 explictly bound to top (=> 0x03) //p3 explictly bound to top (=> 0x03)
bind i_targetmod mycheck // Alternative unsupported form is i_targetmod
bind targetmod mycheck
#( #(
.param2(param2), .param2(param2),
.param3(param3) .param3(param3)