From 375a121377e2e23eb8695ed3599b065a2bbeb04a Mon Sep 17 00:00:00 2001
From: Wilson Snyder <wsnyder@wsnyder.org>
Date: Sat, 20 Jan 2024 10:24:54 -0500
Subject: [PATCH] Tests: Use lint() where able instead of compile(). No
 functional change intended.

---
 test_regress/t/t_array_method_bad.pl                | 2 +-
 test_regress/t/t_assert_clock_event_unsup.pl        | 2 +-
 test_regress/t/t_assert_disable_bad.pl              | 2 +-
 test_regress/t/t_assert_imm_nz_bad.pl               | 2 +-
 test_regress/t/t_assert_procedural_clk_bad.pl       | 2 +-
 test_regress/t/t_assert_property_untyped_unsup.pl   | 2 +-
 test_regress/t/t_assert_property_var_unsup.pl       | 2 +-
 test_regress/t/t_assert_recursive_property_unsup.pl | 2 +-
 test_regress/t/t_assigndly_dynamic_notiming_bad.pl  | 2 +-
 test_regress/t/t_class_assign_bad.pl                | 2 +-
 test_regress/t/t_class_assign_cond_bad.pl           | 2 +-
 test_regress/t/t_class_param_enum_bad.pl            | 2 +-
 test_regress/t/t_class_super_bad.pl                 | 2 +-
 test_regress/t/t_class_super_bad2.pl                | 2 +-
 test_regress/t/t_class_super_new_bad_nfirst.pl      | 2 +-
 test_regress/t/t_class_uses_this_bad.pl             | 2 +-
 test_regress/t/t_clocking_notiming.pl               | 2 +-
 test_regress/t/t_const_slicesel_bad.pl              | 2 +-
 test_regress/t/t_continue_do_while_bad.pl           | 2 +-
 test_regress/t/t_covergroup_unsup.pl                | 2 +-
 test_regress/t/t_dfg_multidriver_dfg_bad.pl         | 4 ++--
 test_regress/t/t_disable_fork_notiming.pl           | 2 +-
 test_regress/t/t_dpi_unpack_bad.pl                  | 2 +-
 test_regress/t/t_event_control_expr_unsup.pl        | 2 +-
 test_regress/t/t_event_control_star.pl              | 2 +-
 test_regress/t/t_expect.pl                          | 2 +-
 test_regress/t/t_flag_instr_count_dpi_bad.pl        | 2 +-
 test_regress/t/t_flag_main_sc_bad.pl                | 2 +-
 test_regress/t/t_flag_only_bad.pl                   | 2 +-
 test_regress/t/t_flag_only_bad2.pl                  | 2 +-
 test_regress/t/t_flag_only_bad3.pl                  | 2 +-
 test_regress/t/t_force_bad_rw.pl                    | 2 +-
 test_regress/t/t_inside_assoc_unsup.pl              | 2 +-
 test_regress/t/t_interconnect_bad.pl                | 4 ++--
 test_regress/t/t_let_arg_bad.pl                     | 2 +-
 test_regress/t/t_let_recurse_bad.pl                 | 2 +-
 test_regress/t/t_let_unsup.pl                       | 2 +-
 test_regress/t/t_lint_implicit_def_bad.pl           | 2 +-
 test_regress/t/t_lint_stmtdly_bad.pl                | 2 +-
 test_regress/t/t_mod_interface_array3.pl            | 2 +-
 test_regress/t/t_notiming.pl                        | 2 +-
 test_regress/t/t_notiming_off.pl                    | 2 +-
 test_regress/t/t_param_type_bad2.pl                 | 2 +-
 test_regress/t/t_process_notiming.pl                | 2 +-
 test_regress/t/t_sampled_expr_unsup.pl              | 2 +-
 test_regress/t/t_sequence_sexpr_unsup.pl            | 2 +-
 test_regress/t/t_source_sync.pl                     | 2 +-
 test_regress/t/t_split_var_1_bad.pl                 | 2 +-
 test_regress/t/t_structu_dataType_assignment_bad.pl | 4 +---
 49 files changed, 51 insertions(+), 53 deletions(-)

diff --git a/test_regress/t/t_array_method_bad.pl b/test_regress/t/t_array_method_bad.pl
index 1d770f716..c65314f7b 100755
--- a/test_regress/t/t_array_method_bad.pl
+++ b/test_regress/t/t_array_method_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(simulator => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_assert_clock_event_unsup.pl b/test_regress/t/t_assert_clock_event_unsup.pl
index d188a4276..1e3627720 100755
--- a/test_regress/t/t_assert_clock_event_unsup.pl
+++ b/test_regress/t/t_assert_clock_event_unsup.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     verilator_flags2 => ['--assert'],
     fails => 1,
diff --git a/test_regress/t/t_assert_disable_bad.pl b/test_regress/t/t_assert_disable_bad.pl
index efe818bd1..1f68597d8 100755
--- a/test_regress/t/t_assert_disable_bad.pl
+++ b/test_regress/t/t_assert_disable_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     verilator_flags2 => ['--assert'],
     fails => 1,
diff --git a/test_regress/t/t_assert_imm_nz_bad.pl b/test_regress/t/t_assert_imm_nz_bad.pl
index eebb17b11..9841a8c0f 100755
--- a/test_regress/t/t_assert_imm_nz_bad.pl
+++ b/test_regress/t/t_assert_imm_nz_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     verilator_flags2 => ['--assert'],
     fails => 1,
diff --git a/test_regress/t/t_assert_procedural_clk_bad.pl b/test_regress/t/t_assert_procedural_clk_bad.pl
index d188a4276..1e3627720 100755
--- a/test_regress/t/t_assert_procedural_clk_bad.pl
+++ b/test_regress/t/t_assert_procedural_clk_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     verilator_flags2 => ['--assert'],
     fails => 1,
diff --git a/test_regress/t/t_assert_property_untyped_unsup.pl b/test_regress/t/t_assert_property_untyped_unsup.pl
index d188a4276..1e3627720 100755
--- a/test_regress/t/t_assert_property_untyped_unsup.pl
+++ b/test_regress/t/t_assert_property_untyped_unsup.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     verilator_flags2 => ['--assert'],
     fails => 1,
diff --git a/test_regress/t/t_assert_property_var_unsup.pl b/test_regress/t/t_assert_property_var_unsup.pl
index c9ca914d8..7284ec30e 100755
--- a/test_regress/t/t_assert_property_var_unsup.pl
+++ b/test_regress/t/t_assert_property_var_unsup.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     verilator_flags2 => ['--assert --error-limit 1000'],
     fails => 1,
diff --git a/test_regress/t/t_assert_recursive_property_unsup.pl b/test_regress/t/t_assert_recursive_property_unsup.pl
index 15b4f4a73..8e28a9204 100755
--- a/test_regress/t/t_assert_recursive_property_unsup.pl
+++ b/test_regress/t/t_assert_recursive_property_unsup.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename=>$Self->{golden_filename},
     verilator_flags2=> ['--assert'],
     fails => 1,
diff --git a/test_regress/t/t_assigndly_dynamic_notiming_bad.pl b/test_regress/t/t_assigndly_dynamic_notiming_bad.pl
index 1e658d937..bf0b971e2 100755
--- a/test_regress/t/t_assigndly_dynamic_notiming_bad.pl
+++ b/test_regress/t/t_assigndly_dynamic_notiming_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(simulator => 1);
 
-compile(
+lint(
     verilator_flags2 => ["--no-timing"],
     fails => 1,
     expect_filename => $Self->{golden_filename},
diff --git a/test_regress/t/t_class_assign_bad.pl b/test_regress/t/t_class_assign_bad.pl
index 430290c0a..c35c8bc93 100755
--- a/test_regress/t/t_class_assign_bad.pl
+++ b/test_regress/t/t_class_assign_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(simulator => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_class_assign_cond_bad.pl b/test_regress/t/t_class_assign_cond_bad.pl
index 430290c0a..c35c8bc93 100755
--- a/test_regress/t/t_class_assign_cond_bad.pl
+++ b/test_regress/t/t_class_assign_cond_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(simulator => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_class_param_enum_bad.pl b/test_regress/t/t_class_param_enum_bad.pl
index 430290c0a..c35c8bc93 100755
--- a/test_regress/t/t_class_param_enum_bad.pl
+++ b/test_regress/t/t_class_param_enum_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(simulator => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_class_super_bad.pl b/test_regress/t/t_class_super_bad.pl
index 45af9e7a6..7be596e0f 100755
--- a/test_regress/t/t_class_super_bad.pl
+++ b/test_regress/t/t_class_super_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(linter => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_class_super_bad2.pl b/test_regress/t/t_class_super_bad2.pl
index 45af9e7a6..7be596e0f 100755
--- a/test_regress/t/t_class_super_bad2.pl
+++ b/test_regress/t/t_class_super_bad2.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(linter => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_class_super_new_bad_nfirst.pl b/test_regress/t/t_class_super_new_bad_nfirst.pl
index 8b81d9f75..44783b1f6 100755
--- a/test_regress/t/t_class_super_new_bad_nfirst.pl
+++ b/test_regress/t/t_class_super_new_bad_nfirst.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(linter => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_class_uses_this_bad.pl b/test_regress/t/t_class_uses_this_bad.pl
index 45af9e7a6..7be596e0f 100755
--- a/test_regress/t/t_class_uses_this_bad.pl
+++ b/test_regress/t/t_class_uses_this_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(linter => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_clocking_notiming.pl b/test_regress/t/t_clocking_notiming.pl
index 5a683788e..bf475c910 100755
--- a/test_regress/t/t_clocking_notiming.pl
+++ b/test_regress/t/t_clocking_notiming.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(simulator => 1);
 
-compile(
+lint(
     verilator_flags2 => ["--no-timing"],
     fails => 1,
     expect_filename => $Self->{golden_filename},
diff --git a/test_regress/t/t_const_slicesel_bad.pl b/test_regress/t/t_const_slicesel_bad.pl
index 9d8b88724..5d84a06aa 100755
--- a/test_regress/t/t_const_slicesel_bad.pl
+++ b/test_regress/t/t_const_slicesel_bad.pl
@@ -14,7 +14,7 @@ scenarios(linter => 1);
 
 lint(
     fails => 1
-);
+    );
 
 ok(1);
 1;
diff --git a/test_regress/t/t_continue_do_while_bad.pl b/test_regress/t/t_continue_do_while_bad.pl
index 15b4f4a73..8e28a9204 100755
--- a/test_regress/t/t_continue_do_while_bad.pl
+++ b/test_regress/t/t_continue_do_while_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename=>$Self->{golden_filename},
     verilator_flags2=> ['--assert'],
     fails => 1,
diff --git a/test_regress/t/t_covergroup_unsup.pl b/test_regress/t/t_covergroup_unsup.pl
index c9ca914d8..7284ec30e 100755
--- a/test_regress/t/t_covergroup_unsup.pl
+++ b/test_regress/t/t_covergroup_unsup.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     verilator_flags2 => ['--assert --error-limit 1000'],
     fails => 1,
diff --git a/test_regress/t/t_dfg_multidriver_dfg_bad.pl b/test_regress/t/t_dfg_multidriver_dfg_bad.pl
index eae347a52..9325bb095 100755
--- a/test_regress/t/t_dfg_multidriver_dfg_bad.pl
+++ b/test_regress/t/t_dfg_multidriver_dfg_bad.pl
@@ -10,10 +10,10 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
-);
+    );
 
 ok(1);
 1;
diff --git a/test_regress/t/t_disable_fork_notiming.pl b/test_regress/t/t_disable_fork_notiming.pl
index 1a013a057..4994b95cb 100755
--- a/test_regress/t/t_disable_fork_notiming.pl
+++ b/test_regress/t/t_disable_fork_notiming.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(simulator => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     v_flags2 => ["--no-timing"],
     fails => 1,
diff --git a/test_regress/t/t_dpi_unpack_bad.pl b/test_regress/t/t_dpi_unpack_bad.pl
index 1720150ad..a60503a1f 100755
--- a/test_regress/t/t_dpi_unpack_bad.pl
+++ b/test_regress/t/t_dpi_unpack_bad.pl
@@ -13,7 +13,7 @@ scenarios(linter => 1);
 lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
-);
+    );
 
 ok(1);
 1;
diff --git a/test_regress/t/t_event_control_expr_unsup.pl b/test_regress/t/t_event_control_expr_unsup.pl
index 1bf0030aa..2f43f3687 100755
--- a/test_regress/t/t_event_control_expr_unsup.pl
+++ b/test_regress/t/t_event_control_expr_unsup.pl
@@ -12,7 +12,7 @@ scenarios(vlt => 1);  # no vltmt, as AstMemberSel is unhandled in V3InstrCount
 
 top_filename("t_event_control_expr.v");
 
-compile(
+lint(
     verilator_flags2 => ['-DUNSUP'],
     fails => 1,
     expect_filename => $Self->{golden_filename},
diff --git a/test_regress/t/t_event_control_star.pl b/test_regress/t/t_event_control_star.pl
index c5e251fe7..68471ddd3 100755
--- a/test_regress/t/t_event_control_star.pl
+++ b/test_regress/t/t_event_control_star.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     verilator_flags2 => ["--timing"],
     fails => 1,
     expect_filename => $Self->{golden_filename},
diff --git a/test_regress/t/t_expect.pl b/test_regress/t/t_expect.pl
index 1e49d46fd..7da2a2cb5 100755
--- a/test_regress/t/t_expect.pl
+++ b/test_regress/t/t_expect.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     verilator_flags2 => ['--assert --timing'],
     fails => 1,
diff --git a/test_regress/t/t_flag_instr_count_dpi_bad.pl b/test_regress/t/t_flag_instr_count_dpi_bad.pl
index 33b76e374..ebc71f887 100755
--- a/test_regress/t/t_flag_instr_count_dpi_bad.pl
+++ b/test_regress/t/t_flag_instr_count_dpi_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     verilator_flags2 => ["--instr-count-dpi -1"],
     fails => 1,
     expect => "%Error: --instr-count-dpi must be non-negative: -1"
diff --git a/test_regress/t/t_flag_main_sc_bad.pl b/test_regress/t/t_flag_main_sc_bad.pl
index 94fd1dce7..6d6075e78 100755
--- a/test_regress/t/t_flag_main_sc_bad.pl
+++ b/test_regress/t/t_flag_main_sc_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     verilator_flags2 => ['--exe --build --main --sc'],
     verilator_make_cmake => 0,
     verilator_make_gmake => 0,
diff --git a/test_regress/t/t_flag_only_bad.pl b/test_regress/t/t_flag_only_bad.pl
index 6fb0c0314..b01845221 100755
--- a/test_regress/t/t_flag_only_bad.pl
+++ b/test_regress/t/t_flag_only_bad.pl
@@ -11,7 +11,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 scenarios(vlt => 1);
 top_filename("t/t_flag_main.v");
 
-compile(
+lint(
     verilator_make_cmake => 0,
     verilator_make_gmake => 0,
     verilator_flags2 => ["--binary -E --dpi-hdr-only --lint-only --xml-only -Wall"],
diff --git a/test_regress/t/t_flag_only_bad2.pl b/test_regress/t/t_flag_only_bad2.pl
index 34c252411..d2f4e5124 100755
--- a/test_regress/t/t_flag_only_bad2.pl
+++ b/test_regress/t/t_flag_only_bad2.pl
@@ -11,7 +11,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 scenarios(vlt => 1);
 top_filename("t/t_flag_main.v");
 
-compile(
+lint(
     verilator_make_cmake => 0,
     verilator_make_gmake => 0,
     verilator_flags2 => ["--build -E -Wno-fatal --dpi-hdr-only --lint-only --xml-only"],
diff --git a/test_regress/t/t_flag_only_bad3.pl b/test_regress/t/t_flag_only_bad3.pl
index f21368eec..68e326b8d 100755
--- a/test_regress/t/t_flag_only_bad3.pl
+++ b/test_regress/t/t_flag_only_bad3.pl
@@ -11,7 +11,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 scenarios(vlt => 1);
 top_filename("t/t_flag_main.v");
 
-compile(
+lint(
     verilator_make_cmake => 0,
     verilator_make_gmake => 0,
     verilator_flags2 => ["-Wall --lint-only -Wno-fatal --dpi-hdr-only --xml-only"],
diff --git a/test_regress/t/t_force_bad_rw.pl b/test_regress/t/t_force_bad_rw.pl
index b9057722c..a5846c699 100755
--- a/test_regress/t/t_force_bad_rw.pl
+++ b/test_regress/t/t_force_bad_rw.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_inside_assoc_unsup.pl b/test_regress/t/t_inside_assoc_unsup.pl
index ffb804e48..27159da5b 100755
--- a/test_regress/t/t_inside_assoc_unsup.pl
+++ b/test_regress/t/t_inside_assoc_unsup.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(linter => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_interconnect_bad.pl b/test_regress/t/t_interconnect_bad.pl
index 1362bf74f..a60503a1f 100755
--- a/test_regress/t/t_interconnect_bad.pl
+++ b/test_regress/t/t_interconnect_bad.pl
@@ -8,9 +8,9 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 # Version 2.0.
 # SPDX-License-Identifier: LGPL-3.0-only OR Artistic-2.0
 
-scenarios(simulator => 1);
+scenarios(linter => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_let_arg_bad.pl b/test_regress/t/t_let_arg_bad.pl
index 882bc2418..d85145f99 100755
--- a/test_regress/t/t_let_arg_bad.pl
+++ b/test_regress/t/t_let_arg_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(linter => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     fails => 1,
     );
diff --git a/test_regress/t/t_let_recurse_bad.pl b/test_regress/t/t_let_recurse_bad.pl
index 882bc2418..d85145f99 100755
--- a/test_regress/t/t_let_recurse_bad.pl
+++ b/test_regress/t/t_let_recurse_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(linter => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     fails => 1,
     );
diff --git a/test_regress/t/t_let_unsup.pl b/test_regress/t/t_let_unsup.pl
index 882bc2418..d85145f99 100755
--- a/test_regress/t/t_let_unsup.pl
+++ b/test_regress/t/t_let_unsup.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(linter => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     fails => 1,
     );
diff --git a/test_regress/t/t_lint_implicit_def_bad.pl b/test_regress/t/t_lint_implicit_def_bad.pl
index 24c0e4c87..7539b1bd9 100755
--- a/test_regress/t/t_lint_implicit_def_bad.pl
+++ b/test_regress/t/t_lint_implicit_def_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     verilator_flags2 => ["--lint-only -Wall -Wno-DECLFILENAME"],
     fails => 1,
     expect_filename => $Self->{golden_filename},
diff --git a/test_regress/t/t_lint_stmtdly_bad.pl b/test_regress/t/t_lint_stmtdly_bad.pl
index bcb7303da..280ae5a3c 100755
--- a/test_regress/t/t_lint_stmtdly_bad.pl
+++ b/test_regress/t/t_lint_stmtdly_bad.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     verilator_flags2 => ["--no-timing"],
     fails => 1,
     expect_filename => $Self->{golden_filename},
diff --git a/test_regress/t/t_mod_interface_array3.pl b/test_regress/t/t_mod_interface_array3.pl
index 1362bf74f..a29ead0ed 100755
--- a/test_regress/t/t_mod_interface_array3.pl
+++ b/test_regress/t/t_mod_interface_array3.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(simulator => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_notiming.pl b/test_regress/t/t_notiming.pl
index 5a683788e..bf475c910 100755
--- a/test_regress/t/t_notiming.pl
+++ b/test_regress/t/t_notiming.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(simulator => 1);
 
-compile(
+lint(
     verilator_flags2 => ["--no-timing"],
     fails => 1,
     expect_filename => $Self->{golden_filename},
diff --git a/test_regress/t/t_notiming_off.pl b/test_regress/t/t_notiming_off.pl
index cca2c7651..955b160b1 100755
--- a/test_regress/t/t_notiming_off.pl
+++ b/test_regress/t/t_notiming_off.pl
@@ -12,7 +12,7 @@ scenarios(simulator => 1);
 
 top_filename("t/t_timing_off.v");
 
-compile(
+lint(
     verilator_flags2 => ["--no-timing"],
     fails => 1,
     expect_filename => $Self->{golden_filename},
diff --git a/test_regress/t/t_param_type_bad2.pl b/test_regress/t/t_param_type_bad2.pl
index b12ecf9cf..9151f32e0 100755
--- a/test_regress/t/t_param_type_bad2.pl
+++ b/test_regress/t/t_param_type_bad2.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     # Bug1575 required trace to crash
     verilator_flags2 => ["--trace --cc"],
     fails => 1,
diff --git a/test_regress/t/t_process_notiming.pl b/test_regress/t/t_process_notiming.pl
index 9a1abce98..f7118bd7d 100755
--- a/test_regress/t/t_process_notiming.pl
+++ b/test_regress/t/t_process_notiming.pl
@@ -12,7 +12,7 @@ scenarios(simulator => 1);
 
 top_filename("t/t_process.v");
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     v_flags2 => ["+define+T_PROCESS+std::process", "--no-timing"],
     fails => 1,
diff --git a/test_regress/t/t_sampled_expr_unsup.pl b/test_regress/t/t_sampled_expr_unsup.pl
index 24a95330a..244d49cbd 100755
--- a/test_regress/t/t_sampled_expr_unsup.pl
+++ b/test_regress/t/t_sampled_expr_unsup.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename=>$Self->{golden_filename},
     verilator_flags2=> ['--assert -Wno-UNSIGNED'],
     fails => 1,
diff --git a/test_regress/t/t_sequence_sexpr_unsup.pl b/test_regress/t/t_sequence_sexpr_unsup.pl
index c9ca914d8..7284ec30e 100755
--- a/test_regress/t/t_sequence_sexpr_unsup.pl
+++ b/test_regress/t/t_sequence_sexpr_unsup.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     expect_filename => $Self->{golden_filename},
     verilator_flags2 => ['--assert --error-limit 1000'],
     fails => 1,
diff --git a/test_regress/t/t_source_sync.pl b/test_regress/t/t_source_sync.pl
index f34ef865a..63947fd00 100755
--- a/test_regress/t/t_source_sync.pl
+++ b/test_regress/t/t_source_sync.pl
@@ -10,7 +10,7 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(vlt => 1);
 
-compile(
+lint(
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
diff --git a/test_regress/t/t_split_var_1_bad.pl b/test_regress/t/t_split_var_1_bad.pl
index cb986145a..256bd9bc6 100755
--- a/test_regress/t/t_split_var_1_bad.pl
+++ b/test_regress/t/t_split_var_1_bad.pl
@@ -14,7 +14,7 @@ lint(
     fails => 1,
     verilator_flags2 => ['--stats'],
     expect_filename => $Self->{golden_filename},
-);
+    );
 
 ok(1);
 1;
diff --git a/test_regress/t/t_structu_dataType_assignment_bad.pl b/test_regress/t/t_structu_dataType_assignment_bad.pl
index b9230bc2a..d593ee907 100755
--- a/test_regress/t/t_structu_dataType_assignment_bad.pl
+++ b/test_regress/t/t_structu_dataType_assignment_bad.pl
@@ -10,13 +10,11 @@ if (!$::Driver) { use FindBin; exec("$FindBin::Bin/bootstrap.pl", @ARGV, $0); di
 
 scenarios(simulator => 1);
 
-
-compile(
+lint(
     verilator_flags2 => ['--structs-packed'],
     fails => 1,
     expect_filename => $Self->{golden_filename},
     );
 
-
 ok(1);
 1;