Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

[GGE::Perl6Regex] adaptations to Rakudo master

- s/continue/proceed/ inside a 'given' block.
  • Loading branch information...
commit a38e8dbb76a500dab321474e3f746bbd209e0b4e 1 parent d8ff454
Carl Mäsak authored May 22, 2010

Showing 1 changed file with 2 additions and 2 deletions. Show diff stats Hide diff stats

  1. 4  lib/GGE/Perl6Regex.pm
4  lib/GGE/Perl6Regex.pm
@@ -328,7 +328,7 @@ class GGE::Perl6Regex {
328 328
                             last;
329 329
                         }
330 330
                         when '.' {
331  
-                            continue if $target.substr($pos, 2) ne '..';
  331
+                            proceed if $target.substr($pos, 2) ne '..';
332 332
                             $pos += 2;
333 333
                             ++$pos while $target.substr($pos, 1) ~~ /\s/;
334 334
                             $isrange = True;
@@ -341,7 +341,7 @@ class GGE::Perl6Regex {
341 341
                         when '\\' {
342 342
                             ++$pos;
343 343
                             $char = $target.substr($pos, 1);
344  
-                            continue;
  344
+                            proceed;
345 345
                         }
346 346
                         when /\s/ {
347 347
                             ++$pos;

0 notes on commit a38e8db

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