Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

comment out the warnings for \ and | + sigiled param

yes, commented out code is evil, and I hate myself for it, but it does
seem like the simplest way at the moment
  • Loading branch information...
commit 4e5da28b8ee9cb28ae00cfc851e575a8eef1fc00 1 parent 86bc703
@moritz moritz authored
Showing with 4 additions and 6 deletions.
  1. +4 −6 src/Perl6/Grammar.pm
View
10 src/Perl6/Grammar.pm
@@ -1748,18 +1748,16 @@ grammar Perl6::Grammar is HLL::Grammar {
| <type_constraint>+
[
| $<quant>=['**'|'*'] <param_var>
- | $<quant>=['\\'|'|'] <param_var> {
- pir::getstderr__P().print("Obsolete use of | or \\ with sigil on param { $<param_var> }\n")
- }
+ | $<quant>=['\\'|'|'] <param_var>
+# { pir::getstderr__P().print("Obsolete use of | or \\ with sigil on param { $<param_var> }\n") }
| $<quant>=['\\'|'|'] <defterm>?
| [ <param_var> | <named_param> ] $<quant>=['?'|'!'|<?>]
| <?>
]
| $<quant>=['**'|'*'] <param_var>
- | $<quant>=['\\'|'|'] <param_var> {
- pir::getstderr__P().print("Obsolete use of | or \\ with sigil on param { $<param_var> }\n")
- }
+ | $<quant>=['\\'|'|'] <param_var>
+# { pir::getstderr__P().print("Obsolete use of | or \\ with sigil on param { $<param_var> }\n") }
| $<quant>=['\\'|'|'] <defterm>?
| [ <param_var> | <named_param> ] $<quant>=['?'|'!'|<?>]
| <longname> <.panic('Invalid typename in parameter declaration')>
Please sign in to comment.
Something went wrong with that request. Please try again.