madmaurice/Minilisp.pm
1
1
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Add comment function for tests

Browse source
This commit is contained in:
madmaurice 2021-04-05 00:25:53 +02:00
parent 7f1283eecc
commit f1e7da781b
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
tool/test-runner.pl
View file

@ -23,7 +23,11 @@ my $ctx = {
print "not " unless $success; print "not " unless $success;
print "ok - $desc\n"; print "ok - $desc\n";
$plan++; $plan++;
} },
comment => sub {
my ($v) = @_;
print "# " . Minilisp::lisp_format($v) . "\n";
},
}; };
print "TAP Version 13\n"; print "TAP Version 13\n";