gistfile1.txt

# t/spec/foo.t

use Test; 

plan 1;

#?rakudo todo 'huh?'
throws_like( { die }, X::Comp);

=============================

$ make t/spec/foo.t 
perl -MExtUtils::Command -e cp perl6-m perl6
perl t/harness --fudge --moar --keep-exit-code --verbosity=1 t/spec/foo.t

not ok 1 - did we throws_like X::Comp?# TODO huh?
ok
All tests successful.
Files=1, Tests=1,  1 wallclock secs ( 0.02 usr  0.00 sys +  0.37 cusr  0.06 csys =  0.45 CPU)
Result: PASS