Unfudges etc. for S11

Raku · Sep 2, 2013 · 6231e15 · 6231e15
1 parent 890a40a
commit 6231e15
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/S11-modules/import-multi.t b/S11-modules/import-multi.t
@@ -3,7 +3,7 @@ use Test;
 BEGIN { @*INC.push('t/spec/packages/') };
 use Test::Util;
 
-plan 17;
+plan 19;
 
 # L<S11/Importing without loading>
 
@@ -50,7 +50,7 @@ plan 17;
         multi sub Dfoo( Int $a ) is export { 'sub D::Dfoo Int' };
     }
     import D;
-    #?rakudo skip "it just dies, can't check using throws_like"
+    #?rakudo todo "huh?"
     throws_like 'proto sub Dfoo( Mu ) { * }', X::Redeclaration, symbol => 'Dfoo';
 
     multi sub Dfoo( Str $a ) { 'sub D::Dfoo Str' };
@@ -115,6 +115,7 @@ plan 17;
     }
     import H;
 
+    #?rakudo todo "huh?"
     ok &Hfoo ~~ Awesome-Things, 'H) trait "is awesome" applied';
     is Hfoo(), 'sub H::Hfoo',   'H) standard traits like "is export" still work';
 }

diff --git a/S11-modules/require.t b/S11-modules/require.t
@@ -26,7 +26,7 @@ is GLOBAL::InnerModule::EXPORT::DEFAULT::<&bar>(), 'Inner::bar', 'can call our-s
 }
 
 #RT #118407
-#?rakudo skip "Null PMC access"
+#?rakudo skip "Trying to import from 'InnerModule', but the following symbols are missing: quux"
 #?pugs skip 'parsefail'
 { 
     require InnerModule:file($name) <quux>;