4 / 4 lines covered (100.0%)
1# Top-level sub (outside `unit module`) so EVAL's $?PACKAGE is GLOBAL.2# A spec's `my class Foo { }` then renders as `Foo.^name eq 'Foo'`, not3# `'BDD::Behave::SpecLoader::Foo'`.4sub eval-spec-source(Str $code, Str $filename) {5 use MONKEY-SEE-NO-EVAL;6 EVAL $code, :$filename;7}89unit module BDD::Behave::SpecLoader;1011our sub load-spec-file($file) is export {12 my $path = $file ~~ IO::Path ?? $file !! $file.IO;13 eval-spec-source($path.slurp, $path.absolute.Str);14}