diff options
| author | Steve Hay <SteveHay@planit.com> | 2005-04-22 13:51:47 +0000 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2005-04-22 13:51:47 +0000 |
| commit | 313fe30010dfe393b83ab19118451c0eb11e1638 (patch) | |
| tree | 36bd5c80ac45c9a373a1ecd68b7112da7b3683ae /makedef.pl | |
| parent | f71cb6df11614c54913a9f429bb3d009a4951ed5 (diff) | |
| download | perl-313fe30010dfe393b83ab19118451c0eb11e1638.tar.gz | |
Fix last remaining Win32 linker error following change 24271
(Supplied by Jarkko in a makedef.pl that was omitted from the
aforementioned change)
p4raw-id: //depot/perl@24290
Diffstat (limited to 'makedef.pl')
| -rw-r--r-- | makedef.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/makedef.pl b/makedef.pl index d14b50374a..107541c451 100644 --- a/makedef.pl +++ b/makedef.pl @@ -806,7 +806,7 @@ sub readvar { while (<VARS>) { # All symbols have a Perl_ prefix because that's what embed.h # sticks in front of them. - push(@syms, &$proc($1,$2,$3)) if (/\bPERLVAR(A?I?C?)\(([IGT])(\w+)/); + push(@syms, &$proc($1,$2,$3)) if (/\bPERLVAR(A?I?S?C?)\(([IGT])(\w+)/); } close(VARS); return \@syms; |