Add comment function for tests
This commit is contained in:
parent
7f1283eecc
commit
f1e7da781b
1 changed files with 5 additions and 1 deletions
|
@ -23,7 +23,11 @@ my $ctx = {
|
|||
print "not " unless $success;
|
||||
print "ok - $desc\n";
|
||||
$plan++;
|
||||
}
|
||||
},
|
||||
comment => sub {
|
||||
my ($v) = @_;
|
||||
print "# " . Minilisp::lisp_format($v) . "\n";
|
||||
},
|
||||
};
|
||||
|
||||
print "TAP Version 13\n";
|
||||
|
|
Loading…
Reference in a new issue