t/01-sanity/07-isa.t

   1 use v6;
   2
   3
   4 say "1..3";
   5
   6 {
   7     my $string = "Pugs";
   8     if $string.isa("Str") { say "ok 1" } else { say "not ok 1" }
   9 }
  10
  11 {
  12     my $num = 3.141;
  13     if $num.isa("Num")    { say "ok 2" } else { say "not ok 2" }
  14 }
  15
  16 {
  17     my $code = { 42 };
  18     if $code.isa("Code")  { say "ok 3" } else { say "not ok 3" }
  19 }