New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
h2ph - use of local() in generated code #7694
Comments
From Peter.Dintelmann@dresdner-bank.comThis is a bug report for perl from Peter.Dintelmann@dresdner-bank.com, The h2ph tool uses local() in generated subs. These days it should use E.g. eval 'sub S_ISDIR { from sys/stat.ph should be eval 'sub S_ISDIR { The patch below fixes this. Existing code should not be affected. $ diff -ur h2ph h2ph.new Inline Patch--- h2ph Tue Dec 7 11:17:23 2004
+++ h2ph.new Tue Dec 7 17:08:08 2004
@@ -108,7 +108,7 @@
$curargs{$arg} = 1;
}
$args =~ s/\b(\w)/\$$1/g;
- $args = "local($args) = \@_;\n$t ";
+ $args = "my($args) = \@_;\n$t ";
}
s/^\s+//;
expr();
@@ -304,7 +304,7 @@
}
$args = (
@args
- ? "local(" . (join ',', map "\$$_", @args) . ") = \@_;\n$t
Flags: Site configuration information for perl v5.8.6: Configured by p013176 at Tue Dec 7 10:11:46 CET 2004. Summary of my perl5 (revision 5 version 8 subversion 6) configuration: Locally applied patches: @INC for perl v5.8.6: Environment for perl v5.8.6: |
From @rgsPeter.Dintelmann@dresdner-bank.com (via RT) wrote:
Good point. Thanks, applied to bleadperl as change #23628. (although to |
The RT System itself - Status changed from 'new' to 'open' |
@rgs - Status changed from 'open' to 'resolved' |
Migrated from rt.perl.org#32962 (status was 'resolved')
Searchable as RT32962$
The text was updated successfully, but these errors were encountered: