diff --git a/packages/fv/src/drivers.pas b/packages/fv/src/drivers.pas index 71a092fbc1..51eff22fdb 100644 --- a/packages/fv/src/drivers.pas +++ b/packages/fv/src/drivers.pas @@ -825,11 +825,7 @@ end; {$IFDEF OS_AMIGA} begin { AmigaOS Delay() wait's argument in 1/50 seconds } - {$IFDEF AROS} DOSDelay(2); - {$ELSE} - AmigaDOS.Delay(2); - {$ENDIF} end; {$ENDIF OS_AMIGA} diff --git a/packages/morphunits/src/amigados.pas b/packages/morphunits/src/amigados.pas index 3575cd5edd..e749e35ce7 100644 --- a/packages/morphunits/src/amigados.pas +++ b/packages/morphunits/src/amigados.pas @@ -1486,7 +1486,7 @@ SysCall MOS_DOSBase 186; function DateStamp(date: PDateStamp location 'd1'): PDateStamp; SysCall MOS_DOSBase 192; -procedure Delay(timeout: LongInt location 'd1'); +procedure DOSDelay(timeout: LongInt location 'd1'); SysCall MOS_DOSBase 198; function WaitForChar(file1 : LongInt location 'd1';