Test suite results for test file webtbs/tw1375.pp

Test run data :

Test file "webtbs/tw1375.pp" information:

t_id 806
t_adddate 2003/10/03
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 939775.

Source:

{ %target=win32 }

{ Source provided for Free Pascal Bug Report 1375 }
{ Submitted by "Bill Rayer" on  2001-02-01 }
{ e-mail: lingolanguage@hotmail.com }
{
Should be able to use null ptr as 2nd param of InvalidateRect()
Compiles in Delphi 4:
  dcc32 fpc1
Does not compile in FPC:
  ppc386 -Sd fpc1
}

program test1;
uses windows;
begin
  InvalidateRect (HWND(0), pointer(0), TRUE);
end.

Link to SVN view of webtbs/tw1375.pp source.