Comment out split() function for now; it causes the Parrot build to fail

(during the building of opsc).  We can restore split() when the conflict
is repaired.

src/setting/Regex.pm

@@ -60,30 +60,30 @@ our sub subst ($text, $regex, $repl, :$global?) {
 Splits C<$text> on occurences of C<$regex>
 =end item
 
-our sub split ($regex, $text) {
-    my $pos := 0;
-    my @result;
-    my $looking := 1;
-    while $looking {
-        my $match :=
-            Regex::Cursor.parse($text, :rule($regex), :c($pos)) ;
-
-        if ?$match {
-            my $from := $match.from();
-            my $to := $match.to();
-            my $prefix := pir::substr__sPii($text, $pos, $from-$pos);
-            @result.push($prefix);
-            $pos := $match.to();
-        } else {
-            my $len := pir::length($text);
-            if $pos < $len {
-                @result.push(pir::substr__ssi($text, $pos) );
-            }
-            $looking := 0;
-        }
-    }
-    return @result;
-}
+# our sub split ($regex, $text) {
+#     my $pos := 0;
+#     my @result;
+#     my $looking := 1;
+#     while $looking {
+#         my $match :=
+#             Regex::Cursor.parse($text, :rule($regex), :c($pos)) ;
+# 
+#         if ?$match {
+#             my $from := $match.from();
+#             my $to := $match.to();
+#             my $prefix := pir::substr__sPii($text, $pos, $from-$pos);
+#             @result.push($prefix);
+#             $pos := $match.to();
+#         } else {
+#             my $len := pir::length($text);
+#             if $pos < $len {
+#                 @result.push(pir::substr__ssi($text, $pos) );
+#             }
+#             $looking := 0;
+#         }
+#     }
+#     return @result;
+# }
 
 
 # vim: ft=perl6