* fixed illegal expr

This commit is contained in:
peter 1999-10-26 12:33:53 +00:00
parent 15e1386725
commit e2781b92b5

View File

@ -30,8 +30,10 @@ begin
end;
procedure P3(var t);export;
var
p : pointer;
begin
Addr(T);
p:=Addr(T);
end;
procedure P4(x1:pointer);export;
@ -59,10 +61,13 @@ begin
end.
{
$Log$
Revision 1.2 1999-06-30 22:04:56 michael
Revision 1.3 1999-10-26 12:33:53 peter
* fixed illegal expr
Revision 1.2 1999/06/30 22:04:56 michael
* Added code to remove warnings
Revision 1.1 1999/01/12 14:20:36 peter
+ dll example
}
}