Make sure we emit :($ is raw).perl correctly

rakudo · Mar 4, 2016 · 8d0af58 · 8d0af58
1 parent 360232a
commit 8d0af58
Showing 1 changed file with 0 additions and 8 deletions.
diff --git a/src/core/Parameter.pm b/src/core/Parameter.pm
@@ -236,14 +236,6 @@ my class Parameter { # declared in BOOTSTRAP
         if $!flags +& $SIG_ELEM_IS_RAW {
             # Do not emit cases of anonymous '\' which we cannot reparse
             # This is all due to unspace.
-            if     not $.name
-               and $name eq '$'
-               and not $rest
-               and nqp::isnull($!post_constraints)
-               and not $default
-               and nqp::isnull($!sub_signature) {
-                    $name = '\\';
-            }
             $rest ~= ' is raw' unless $name.starts-with('\\');
         }
         unless nqp::isnull($!sub_signature) {