Commit ed3a2765 authored by André Hentschel's avatar André Hentschel Committed by Alexandre Julliard

tools: Preserve ordinal when updating specfiles.

parent 84d68639
......@@ -214,7 +214,7 @@ sub update_spec_file($)
{
my $callconv = $parent{callconv} ne "stub" ? $parent{callconv} :
$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
{
......@@ -227,7 +227,7 @@ sub update_spec_file($)
}
else
{
$_ = sprintf "@ stub %s%s", $flags, $func;
$_ = sprintf "$descr{ordinal} stub %s%s", $flags, $func;
}
$_ .= $descr{comment} || "";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment