ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

tools: Preserve ordinal when updating specfiles.

This commit is contained in:
André Hentschel 2011-06-23 00:02:30 +02:00 committed by Alexandre Julliard
parent 84d68639be
commit ed3a276591
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tools/make_specfiles
View File

@ -214,7 +214,7 @@ sub update_spec_file($)
{ {
my $callconv = $parent{callconv} ne "stub" ? $parent{callconv} : my $callconv = $parent{callconv} ne "stub" ? $parent{callconv} :
$parent{spec} =~ /msvc/ ? "cdecl" : "stdcall"; # hack $parent{spec} =~ /msvc/ ? "cdecl" : "stdcall"; # hack
$_ = sprintf "@ %s %s%s", $callconv, $flags, $func; $_ = sprintf "$descr{ordinal} %s %s%s", $callconv, $flags, $func;
if ($parent{target} =~ /$group_head\./) # use the same forward as parent if possible if ($parent{target} =~ /$group_head\./) # use the same forward as parent if possible
{ {
@ -227,7 +227,7 @@ sub update_spec_file($)
} }
else else
{ {
$_ = sprintf "@ stub %s%s", $flags, $func; $_ = sprintf "$descr{ordinal} stub %s%s", $flags, $func;
} }
$_ .= $descr{comment} || ""; $_ .= $descr{comment} || "";