#!/usr/bin/env raku
use v6.d;
use IUtils;
use IUtils::Comments;

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>;
}