Test suite results for test file tbs/tb0443.pp

Test run data :

Test file "tbs/tb0443.pp" information:

t_id 659
t_version 1.1
t_adddate 2003/10/03
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 937058.

Source:

{ %version=1.1}
{$ifdef fpc}
  {$mode delphi}
{$else}
type
  qword = int64;
{$endif}

var
   b : byte;
   i : smallint;
   i64 : int64;
   q : qword;
   p : pointer;

begin
   p:=pointer(b);
   p:=pointer(i);
   p:=pointer(i64);
   p:=pointer(q);
end.

Link to SVN view of tbs/tb0443.pp source.