Permalink
Browse files

[spec]: Unfudge some junction tests for Rakudo.

git-svn-id: http://svn.pugscode.org/pugs@22998 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
pmichaud
pmichaud committed Nov 13, 2008
1 parent bcd67a2 commit d0da2231bd8938dae3c8344f6f8b07d59aabcc5a
Showing with 3 additions and 2 deletions.
  1. +3 −2 S03-junctions/misc.t
View
@@ -153,7 +153,6 @@ L<S03/Junctive operators>
# Canonical stringification of a junction
sub j (Junction $j) { return $j.perl }
-#?rakudo skip 'Junction Authreading'
{
# L<S03/Junctive operators/They thread through operations>
my $got;
@@ -186,8 +185,10 @@ sub j (Junction $j) { return $j.perl }
$roll = 2; $note = '';
if $roll == 1|2|3 { $note = "Low roll" }
is($note, "Low roll", '| junction threading ==');
+}
-
+#?rakudo skip 'Junctions as subscripts'
+{
# L<S03/Junctive operators/Junctions work through subscripting>
my $got;
my @foo;

0 comments on commit d0da223

Please sign in to comment.