42 lines
1.3 KiB
Plaintext
Executable File
42 lines
1.3 KiB
Plaintext
Executable File
#!/usr/bin/env nomsu -V4.8.8.6
|
|
#
|
|
Tool to run all tests in a file (i.e. the code block inside a call to 'test %'). Usage:
|
|
nomsu tools/test.nom file1 file2 directory1 ...
|
|
|
|
use "lib/os.nom"
|
|
use "lib/consolecolor.nom"
|
|
|
|
%args = (command line args)
|
|
if (%args.1 == "-v"):
|
|
%args::remove index 1
|
|
%verbose = (yes)
|
|
|
|
# Make sure all the files get run
|
|
for %path in (command line args):
|
|
for file %filename in %path:
|
|
if (%filename::matches "%.nom$"): use %filename
|
|
|
|
for %path in (command line args): use %path
|
|
|
|
%tests = ((=lua "Source:from_string(\%s)") = %t for %s = %t in (tests))
|
|
for %path in (command line args):
|
|
for file %filename in %path:
|
|
unless (%filename::matches "%.nom$"): do next %filename
|
|
%file_tests = []
|
|
for %src = %test in %tests:
|
|
if (%src.filename == %filename):
|
|
%file_tests::add {test:%test, source:%src}
|
|
|
|
unless (%file_tests is empty):
|
|
sort %file_tests by % -> %.source
|
|
lua> "io.write('[ .. ] ', \%filename); io.flush()"
|
|
if %verbose: say ""
|
|
for % in %file_tests:
|
|
if %verbose:
|
|
say " \(yellow (%.test::with "\n" -> "\n "))"
|
|
run %.test
|
|
|
|
if %verbose: say (green "PASS")
|
|
..else:
|
|
say "\r[\(green "PASS")"
|