for (sort <t/kwid/parser/*>) -> IO $file { ($comment, $kwid, $bytecode) = $file.all.split("...\n"); ($abstract, $description) = $comment.split("\n"); $formatter = Kwid::Formatter::bytecode.new; Kwid::Parser.new($formatter).parse; is($formatter.result, $bytecode, $abstract); }
# for (qw(t/parser/00sample)) -> $file { # say $file; # }
1 POD Error
The following errors were encountered while parsing the POD:
- Around line 10:
=pod directives shouldn't be over one line long! Ignoring all 3 lines of content