Permalink
Browse files

Trying to make this fudgeable test work. Need to understand fudge bet…

…ter.

Mmm ... fudge.


git-svn-id: http://svn.pugscode.org/pugs@24713 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent 3b37c07 commit 81a7e466a281326d1b82b68e868714ec52912974 Ovid committed Dec 31, 2008
Showing with 6 additions and 1 deletion.
  1. +6 −1 S09-autovivification/autovivification.t
View
7 S09-autovivification/autovivification.t
@@ -8,7 +8,7 @@ plan 39;
{
my %hash;
%hash<a>;
- #?pugs todo 'BUG [perl #61882]'
+ #?pugs todo: 'perl #61882'
ok !%hash.exists('a'), 'just mentioning a hash value should not autovivify it';
}
@@ -63,6 +63,9 @@ plan 39;
}
# Simple hash autovivification
+# Actually, that first test passes, but I can't figure out how to skip just
+# the next two.
+#?rakudo skip "Error Msg: get_pmc_keyed() not implemented in class 'Undef'"
{
my $hashref;
ok !$hashref.isa(Hash), "uninitialized variable is not a Hash (1)";
@@ -72,6 +75,7 @@ plan 39;
ok $hashref.isa(Hash), "uninitialized variable was autovivified to a hash (1)";
}
+#?pugs todo: 'The lives_ok items are failing'
{
my $hashref;
ok !$hashref.isa(Hash), "uninitialized variable is not a Hash (2)";
@@ -91,6 +95,7 @@ plan 39;
}
+#?rakudo skip "Error Msg: get_pmc_keyed() not implemented in class 'Undef'"
{
my $hashref;
ok !$hashref.isa(Hash), "uninitialized variable is not a Hash (3)";

0 comments on commit 81a7e46

Please sign in to comment.