git-svn-id: trunk@48095 -
@@ -206,7 +206,7 @@ implementation
begin
{ an integer const. behaves as a memory reference }
location_reset(location,LOC_CONSTANT,OS_ADDR);
- location.value:=aint(value);
+ location.value:=PInt(value);
end;