diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2014-06-13 15:21:25 -0400 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2014-06-13 15:41:55 -0400 |
commit | b5bbe64ad2ec51417ef02ac52304ed45fe37be3f (patch) | |
tree | 71f1b45882f215a6d886d3bc08954c02a54e6af0 /regen_perly.pl | |
parent | 7053d92917f7cb46452de86dc4c6d8644cae849c (diff) | |
download | perl-b5bbe64ad2ec51417ef02ac52304ed45fe37be3f.tar.gz |
Remove MAD.
MAD = Misc Attribute Decoration; unmaintained attempt at preserving
the Perl parse tree more faithfully so that automatic conversion to
Perl 6 would have been easier.
Diffstat (limited to 'regen_perly.pl')
-rw-r--r-- | regen_perly.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/regen_perly.pl b/regen_perly.pl index b96275639c..bf484bbed6 100644 --- a/regen_perly.pl +++ b/regen_perly.pl @@ -272,7 +272,7 @@ sub make_type_tab { my $default_token; open my $fh, '<', $y_file or die "Can't open $y_file: $!\n"; while (<$fh>) { - if (/(\$\d+)\s*=/) { + if (/(\$\d+)\s*=[^=]/) { warn "$y_file:$.: dangerous assignment to $1: $_"; } |