diff --git a/rtl/amiga/m68k/legacydos.inc b/rtl/amiga/m68k/legacydos.inc index aed05b5144..98bdb3a96a 100644 --- a/rtl/amiga/m68k/legacydos.inc +++ b/rtl/amiga/m68k/legacydos.inc @@ -338,7 +338,7 @@ begin NChain^.an_Parent := Pointer(Anchor); end; // copy the fileinfoblock into the chain - Move(fib, NChain^.an_Info, SizeOf(TFileInfoBlock)); + Move(fib^, NChain^.an_Info, SizeOf(TFileInfoBlock)); end; until Res = 0; // useless... we jump out earlier //