diff options
| -rw-r--r-- | packages/arosunits/src/intuition.pas | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/packages/arosunits/src/intuition.pas b/packages/arosunits/src/intuition.pas index de43c76ebe..7bfc2d85f8 100644 --- a/packages/arosunits/src/intuition.pas +++ b/packages/arosunits/src/intuition.pas @@ -3423,7 +3423,11 @@ var ArgList: TArgList; begin AddArguments(ArgList, Args); +{$ifdef i386} Result := DoGadgetMethodA(Gad, Win, Req, TMsg(ArgList)); +{$else} +{$warning fix me!} +{$endif} end; function EasyRequest(Window: PWindow; EasyStruct: PEasyStruct; IDCMP_Ptr: PLongWord; const Args: array of const): LongInt; |