morphunits/mui: added the newly documented call MUI_RequestObjectA (needs recent MorphOS)

packages/morphunits/src/mui.pas

@@ -3411,6 +3411,16 @@ syscall legacy MUIMasterBase 192;
 procedure MUI_EndRefresh(mri : pMUI_RenderInfo location 'a0'; flags : LongWord location 'd0');
 syscall legacy MUIMasterBase 198;
 
+function MUI_RequestObjectA(app : POINTER location 'd0';
+                      win : POINTER location 'd1';
+                      flags : LongWord location 'd2';
+                      title : PAnsiChar location 'a0';
+                      gadgets : PAnsiChar location 'a1';
+                      obj : pObject_ location 'a2';
+                      format : PAnsiChar location 'a3';
+                      params : POINTER location 'a4') : longint;
+syscall legacy MUIMasterBase 756;
+
 
 (*
 ** some procedures to get some information about our object
@@ -3493,6 +3503,7 @@ function MUI_AslRequestTags(req : POINTER; tags : array Of LongWord) : BOOLEAN;
 function MUI_MakeObject(_type : LONGINT; params : array of LongWord) : pLongWord; inline;
 function MUI_NewObject(a0arg : PAnsiChar; tags : array of LongWord) : pLongWord; inline;
 function MUI_Request(app : POINTER; win : POINTER; flags : longword; title : PAnsiChar; gadgets : PAnsiChar; format : PAnsiChar; params : array of LongWord) : LONGINT;
+function MUI_RequestObject(app : POINTER; win : POINTER; flags : LongWord; title : PAnsiChar; gadgets : PAnsiChar; obj : pObject_; format : PAnsiChar; params : array of LongWord) : longint;
 
 
 function InitMUIMasterLibrary : boolean;
@@ -3800,6 +3811,12 @@ begin
     MUI_Request := MUI_RequestA(app , win , flags , title , gadgets , format , @params);
 end;
 
+function MUI_RequestObject(app : POINTER; win : POINTER; flags : LongWord; title : PAnsiChar; gadgets : PAnsiChar; obj : pObject_; format : PAnsiChar; params : array of LongWord) : longint;
+begin
+    MUI_RequestObject := MUI_RequestObjectA(app, win, flags, title, gadgets, obj, format, @params);
+end;
+
+
 function MAKE_ID(a,b,c,d : AnsiChar): longword;
 begin
   MAKE_ID:=(byte(a) shl 24)+(byte(b) shl 16)+(byte(c) shl 8)+byte(d);