Skip to content
Fetching contributors…
Cannot retrieve contributors at this time
30 lines (20 sloc) 443 Bytes
use v6;
# L<S06/Parameters and arguments>
# TODO: better smart-linking
use Test;
plan 3;
sub sanity {
my %sane = 'a'..'d' Z 1..4;
isa_ok(%sane, Hash, '%sane is a Hash');
sub insanity (%baloney) {
isa_ok(%baloney, Hash, '%baloney is a Hash');
# sanity 0
my %h = 'a'..'d' Z 1..4;
isa_ok(%h.WHAT, Hash, '%h is a Hash');
#sanity 1;
# Hash passed to a sub used to become a List in pugs
insanity %h;
# vim: ft=perl6
Something went wrong with that request. Please try again.