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

AROS: 32/64-bit unit amigados compatibility update

Update some amigados record structures to be 32/64-bit compatible.

These changes reflect the changes made in the doslib RTL (that were present in
the previous commit) but note that some of Unit amigados' record structures
were already up to date.
magorium пре 3 година
родитељ
комит
d207a293c7
1 измењених фајлова са 2 додато и 2 уклоњено
  1. 2 2
      packages/arosunits/src/amigados.pas

+ 2 - 2
packages/arosunits/src/amigados.pas

@@ -625,7 +625,7 @@ type
   TFileHandle = record
     fh_Flags: ULONG;   { EXEC message        }
     {$ifdef CPU64}
-    fh_Port: ULONG;   { Reply port for the packet }
+    fh_Port: LongInt;   { Reply port for the packet }
     {$else}
     fh_Port: PMsgPort;   { Reply port for the packet }
     {$endif}
@@ -639,7 +639,7 @@ type
     fh_Func2: PtrInt;
     fh_Func3: PtrInt;
     fh_Arg1:  PtrInt;
-    fh_Arg2: APTR;
+    fh_Arg2: PtrInt;
     fh_Size: ULONG; // Size of buffered io buffer
     fh_Buf2: BPTR;  // Always the same as fh_Buf
   end;