diff options
Diffstat (limited to 'regen_perly.pl')
| -rw-r--r-- | regen_perly.pl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/regen_perly.pl b/regen_perly.pl index 378c5a32bb..fb01dbd824 100644 --- a/regen_perly.pl +++ b/regen_perly.pl @@ -175,6 +175,11 @@ sub extract { # C<#line 188 "perlytmp.c"> gets picked up by make depend, so remove them. $actlines =~ s/^#line \d+ "\Q$tmpc_file\E".*$//gm; + # convert yyvsp[nnn] into ps[nnn].val + + $actlines =~ s/yyvsp\[(.*?)\]/ps[$1].val/g + or die "Can't convert value stack name\n"; + return $actlines. "\n", $tablines. "\n"; } |