projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
151269f
)
Re: [perl #32498] h2xs generates incorrect code for Makefile.PL for enums
author
Noah
<sitz@onastick.net>
Wed, 19 Jan 2005 12:33:52 +0000
(07:33 -0500)
committer
Rafael Garcia-Suarez
<rgarciasuarez@gmail.com>
Wed, 19 Jan 2005 17:19:04 +0000
(17:19 +0000)
Message-ID: <
20050119173352
.GA15592@radu.onastick.net>
p4raw-id: //depot/perl@23822
utils/h2xs.PL
patch
|
blob
|
history
diff --git
a/utils/h2xs.PL
b/utils/h2xs.PL
index
b973705
..
bb4f537
100644
(file)
--- a/
utils/h2xs.PL
+++ b/
utils/h2xs.PL
@@
-903,7
+903,7
@@
if( @path_h ){
for my $item (split /,/, $enum_body) {
my ($key, $declared_val) = $item =~ /(\w+)\s*(?:=\s*(.*))?/;
$val = defined($declared_val) && length($declared_val) ? $declared_val : 1 + $val;
- $seen_define{$key} = $
declared_
val;
+ $seen_define{$key} = $val;
$const_names{$key}++;
}
} # while (...)