Fixes off by 1 error reported in line number errors
diff --git a/tests/scripts/generate_code.pl b/tests/scripts/generate_code.pl
index 9c59591..e940b5a 100755
--- a/tests/scripts/generate_code.pl
+++ b/tests/scripts/generate_code.pl
@@ -77,7 +77,7 @@
open(TEST_MAIN, "$test_main_file") or die "Opening test main '$test_main_file': $!";
my @test_main_lines = split/^/, <TEST_MAIN>;
my $test_main;
-my $index = 1;
+my $index = 2;
for my $line (@test_main_lines) {
$line =~ s/!LINE_NO!/$index/;
$test_main = $test_main.$line;
@@ -88,7 +88,7 @@
open(TEST_CASES, "$test_case_file") or die "Opening test cases '$test_case_file': $!";
my @test_cases_lines = split/^/, <TEST_CASES>;
my $test_cases;
-my $index = 1;
+my $index = 2;
for my $line (@test_cases_lines) {
if ($line =~ /^\/\* BEGIN_CASE .*\*\//)
{
