This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
c00253d
)
Freak out if h2ph has to translate a macro that contains assembly code.
author
Rafael Garcia-Suarez
<rgarciasuarez@gmail.com>
Thu, 25 Nov 2004 17:24:43 +0000
(18:24 +0100)
committer
Rafael Garcia-Suarez
<rgarciasuarez@gmail.com>
Fri, 26 Nov 2004 15:16:59 +0000
(15:16 +0000)
Subject: [PATCH] h2ph vs __asm__
Message-ID: <
20041125172443
.
757a4833
@dhcp123.mandrakesoft.com>
p4raw-id: //depot/perl@23547
utils/h2ph.PL
patch
|
blob
|
blame
|
history
diff --git
a/utils/h2ph.PL
b/utils/h2ph.PL
index
c6a39c9
..
f715f50
100644
(file)
--- a/
utils/h2ph.PL
+++ b/
utils/h2ph.PL
@@
-391,6
+391,7
@@
if ($opt_e && (scalar(keys %bad_file) > 0)) {
exit $Exit;
sub expr {
+ $new = '"(assembly code)"' and return if /\b__asm__\b/; # freak out.
my $joined_args;
if(keys(%curargs)) {
$joined_args = join('|', keys(%curargs));