fpc/tests/webtbs/tw21267.pp
Jonas Maebe eb7e192226 * support pointer constants as initialisation values for procvar typed
constants in Delphi mode on non-treetypedconstbuilder platforms
    (mantis #21267)

git-svn-id: trunk@21344 -
2012-05-20 14:51:15 +00:00

10 lines
138 B
ObjectPascal

{ %norun }
{$mode delphi}
const
GameObjectClass_Get_Metal_Cost : function(team : integer) : Integer = Pointer($004CDFA0);
begin
end.