فهرست منبع

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;