Skip to content
Browse files

[t] move a hash test to spec/

git-svn-id: http://svn.pugscode.org/pugs@24278 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent 61bff0e commit b320c8fc65e76f88e8c7923ab6cea286c83b0b51 moritz committed Dec 11, 2008
Showing with 24 additions and 0 deletions.
  1. +24 −0 S06-signature/passing-hashes.t
View
24 S06-signature/passing-hashes.t
@@ -0,0 +1,24 @@
+use v6;
+
+use Test;
+plan 3;
+
+sub sanity {
+ my %sane = 'a'..'d' Z 1..4;
+ isa_ok(%sane, Hash, '%sane is a Hash');
+}
+
+sub insanity (Hash %baloney) returns Void{
+ isa_ok(%baloney, Hash, '%baloney is a Hash');
+}
+
+# sanity 0
+my %h = 'a'..'d' Z 1..4;
+is(%h.WHAT,'Hash','%h is a Hash');
+
+#sanity 1;
+sanity;
+
+#XXX Hash passed to a sub used to become a List in pugs
+insanity %h;
+

0 comments on commit b320c8f

Please sign in to comment.
Something went wrong with that request. Please try again.