 $!
 $ 'vo_c' "Running tests..."
 $ test_counter = 0
+$ tests_passed = 0
 $!
 $ run_loop:
 $     next_test = f$element (test_counter, " ", test_list_full)

$             goto run_loop_next
$         endif
$!
$         'vo_c' "[RUN]  ''next_test'"
$         next_test = next_test + "_test.exe"
$!
$         define/user sys$error NL:
$         define/user sys$output NL:
$         run 'next_test'
$!
$ run_loop_next:
$         test_counter = test_counter + 1
$         goto run_loop
$     endif
$!
$ common_exit:
$     set default 'orig_def'
$     exit

$     if next_test .nes. "" .and. next_test .nes. " "
$     then
$         next_test = next_test + "_test"
$         'vo_c' "[CXX    ] ''next_test'.cpp"
$         cxx [---.tests]'next_test'.cpp 'cxx_params'
$!
$         'vo_c' "[CXXLINK] ''next_test'.obj"
