Early functioning comment detection

This commit is contained in:
Nathan McCarty 2024-12-31 02:32:25 +00:00
parent ef58bb4810
commit 197dd79b34
3 changed files with 26 additions and 2 deletions

View file

@ -1,5 +1,14 @@
#!/usr/bin/env raku
use v6.d;
use IUtils;
use IUtils::Comments;
pack-run 'help';
my $contents = "/home/nathan/Projects/Idris/structures/test/src/Main.idr".IO.slurp;
say "\nTesting full flagged-expression:";
say $contents ~~ &flagged-expression;
when $contents ~~ &flagged-expression {
say $<test-name>;
say $<expression-name>;
say $<flag><type>;
}