diff --git a/test_regress/t/t_process_redecl.pl b/test_regress/t/t_process_redecl.pl new file mode 100755 index 000000000..f697727ea --- /dev/null +++ b/test_regress/t/t_process_redecl.pl @@ -0,0 +1,16 @@ +#!/usr/bin/perl +if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); die; } +# DESCRIPTION: Verilator: Verilog Test driver/expect definition +# +# Copyright 2003 by Wilson Snyder. This program is free software; you can +# redistribute it and/or modify it under the terms of either the GNU +# Lesser General Public License Version 3 or the Perl Artistic License +# Version 2.0. + +scenarios(linter => 1); + +lint( + ); + +ok(1); +1; diff --git a/test_regress/t/t_process_redecl.v b/test_regress/t/t_process_redecl.v new file mode 100644 index 000000000..0263e5c56 --- /dev/null +++ b/test_regress/t/t_process_redecl.v @@ -0,0 +1,23 @@ +// DESCRIPTION: Verilator: Verilog Test module +// +// This file ONLY is placed under the Creative Commons Public Domain, for +// any use, without warranty, 2020 by Wilson Snyder. +// SPDX-License-Identifier: CC0-1.0 + +module t ( + ); + + // Overrides standard class + class process; + endclass + class mailbox; + endclass + class semaphore; + endclass + + initial begin + $write("*-* All Finished *-*\n"); + $finish; + end + +endmodule