{ %norun }

{$mode objfpc}
uses math;

procedure test(s: single = NaN); forward;

procedure test(s: single = NaN);
begin
end;

begin
end.