workbench/libs/openurl/prefs/stubs.c

   1 /*
   2 **  OpenURL - MUI preferences for openurl.library
   3 **
   4 **  Written by Troels Walsted Hansen <troels@thule.no>
   5 **  Placed in the public domain.
   6 **
   7 **  Developed by:
   8 **  - Alfonso Ranieri <alforan@tin.it>
   9 **  - Stefan Kost <ensonic@sonicpulse.de>
  10 **
  11 **  Ported to OS4 by Alexandre Balaban <alexandre@balaban.name>
  12 */
  13
  14
  15 #include "OpenURL.h"
  16
  17 /***********************************************************************/
  18 #if !defined(__amigaos4__)
  19
  20 APTR
  21 NewObject(struct IClass *classPtr,UBYTE *classID,... )
  22 {
  23     APTR    res;
  24     va_list va;
  25
  26     va_start(va,classID);
  27     res = NewObjectA(classPtr,classID,(struct TagItem *)va->overflow_arg_area);
  28     va_end(va);
  29
  30     return res;
  31 }
  32
  33 /***********************************************************************/
  34
  35 APTR
  36 MUI_NewObject(UBYTE *classID,... )
  37 {
  38     APTR    res;
  39     va_list va;
  40
  41     va_start(va,classID);
  42     res = MUI_NewObjectA(classID,(struct TagItem *)va->overflow_arg_area);
  43     va_end(va);
  44
  45     return res;
  46 }
  47 #endif
  48
  49 /***********************************************************************/
  50
  51 #if defined(__amigaos4__)
  52 #include <stdarg.h>
  53 #endif
  54
  55 ULONG VARARGS68K
  56 DoSuperNew(struct IClass *cl,Object *obj,...)
  57 {
  58     APTR    res;
  59     va_list va;
  60
  61 #if defined(__amigaos4__)
  62     va_startlinear(va,obj);
  63     res = (APTR)DoSuperMethod(cl,obj,OM_NEW,va_getlinearva(va,ULONG),NULL);
  64 #else
  65     va_start(va,obj);
  66     res = (APTR)DoSuperMethod(cl,obj,OM_NEW,(ULONG)va->overflow_arg_area,NULL);
  67 #endif
  68     va_end(va);
  69
  70     return (ULONG)res;
  71 }
  72
  73 /***********************************************************************/
  74