Преглед изворни кода

AROS: SystemTags changed to PtrUInt for 64bit

git-svn-id: trunk@33260 -
marcus пре 9 година
родитељ
комит
2fe3a342f2
2 измењених фајлова са 2 додато и 2 уклоњено
  1. 1 1
      rtl/amicommon/dos.pp
  2. 1 1
      rtl/amicommon/sysutils.pp

+ 1 - 1
rtl/amicommon/dos.pp

@@ -992,7 +992,7 @@ end;
 var
   strofpaths : string;
 
-function SystemTags(const command: PChar; const tags: array of DWord): LongInt;
+function SystemTags(const command: PChar; const tags: array of PtrUInt): LongInt;
 begin
   SystemTags:=SystemTagList(command,@tags);
 end;

+ 1 - 1
rtl/amicommon/sysutils.pp

@@ -776,7 +776,7 @@ end;
 var
   StrOfPaths: String;
 
-function SystemTags(const command: PChar; const tags: array of DWord): LongInt;
+function SystemTags(const command: PChar; const tags: array of PtrUInt): LongInt;
 begin
   SystemTags:=SystemTagList(command,@tags);
 end;