scalos/include/pragmas/iconobject_pragmas.h

   1 #ifndef PRAGMAS_ICONOBJECT_PRAGMAS_H
   2 #define PRAGMAS_ICONOBJECT_PRAGMAS_H
   3
   4 /*
   5 **      $Id$
   6 **
   7 **      Direct ROM interface (pragma) definitions.
   8 **
   9 **      ©1999-2002 The Scalos Team
  10 **          All Rights Reserved
  11 */
  12
  13 #if defined(LATTICE) || defined(__SASC) || defined(_DCC)
  14 #ifndef __CLIB_PRAGMA_LIBCALL
  15 #define __CLIB_PRAGMA_LIBCALL
  16 #endif /* __CLIB_PRAGMA_LIBCALL */
  17 #else /* __MAXON__, __STORM__ or AZTEC_C */
  18 #ifndef __CLIB_PRAGMA_AMICALL
  19 #define __CLIB_PRAGMA_AMICALL
  20 #endif /* __CLIB_PRAGMA_AMICALL */
  21 #endif /* */
  22
  23 #if defined(__SASC) || defined(__STORM__)
  24 #ifndef __CLIB_PRAGMA_TAGCALL
  25 #define __CLIB_PRAGMA_TAGCALL
  26 #endif /* __CLIB_PRAGMA_TAGCALL */
  27 #endif /* __MAXON__, __STORM__ or AZTEC_C */
  28
  29 #ifndef CLIB_ICONOBJECT_PROTOS_H
  30 #include <clib/iconobject_protos.h>
  31 #endif /* CLIB_ICONOBJECT_PROTOS_H */
  32
  33 #ifdef __CLIB_PRAGMA_LIBCALL
  34  #pragma libcall IconobjectBase NewIconObject 1e 9802
  35 #endif /* __CLIB_PRAGMA_LIBCALL */
  36 #ifdef __CLIB_PRAGMA_TAGCALL
  37  #ifdef __CLIB_PRAGMA_LIBCALL
  38   #pragma tagcall IconobjectBase NewIconObjectTags 1e 9802
  39  #endif /* __CLIB_PRAGMA_LIBCALL */
  40  #ifdef __CLIB_PRAGMA_AMICALL
  41   #pragma tagcall(IconobjectBase, 0x1e, NewIconObjectTags(a0,a1))
  42  #endif /* __CLIB_PRAGMA_AMICALL */
  43 #endif /* __CLIB_PRAGMA_TAGCALL */
  44 #ifdef __CLIB_PRAGMA_LIBCALL
  45  #pragma libcall IconobjectBase DisposeIconObject 24 801
  46 #endif /* __CLIB_PRAGMA_LIBCALL */
  47 #ifdef __CLIB_PRAGMA_LIBCALL
  48  #pragma libcall IconobjectBase GetDefIconObject 2a 8002
  49 #endif /* __CLIB_PRAGMA_LIBCALL */
  50 #ifdef __CLIB_PRAGMA_TAGCALL
  51  #ifdef __CLIB_PRAGMA_LIBCALL
  52   #pragma tagcall IconobjectBase GetDefIconObjectTags 2a 8002
  53  #endif /* __CLIB_PRAGMA_LIBCALL */
  54  #ifdef __CLIB_PRAGMA_AMICALL
  55   #pragma tagcall(IconobjectBase, 0x2a, GetDefIconObjectTags(d0,a0))
  56  #endif /* __CLIB_PRAGMA_AMICALL */
  57 #endif /* __CLIB_PRAGMA_TAGCALL */
  58 #ifdef __CLIB_PRAGMA_LIBCALL
  59  #pragma libcall IconobjectBase PutIconObject 30 A9803
  60 #endif /* __CLIB_PRAGMA_LIBCALL */
  61 #ifdef __CLIB_PRAGMA_TAGCALL
  62  #ifdef __CLIB_PRAGMA_LIBCALL
  63   #pragma tagcall IconobjectBase PutIconObjectTags 30 A9803
  64  #endif /* __CLIB_PRAGMA_LIBCALL */
  65  #ifdef __CLIB_PRAGMA_AMICALL
  66   #pragma tagcall(IconobjectBase, 0x30, PutIconObjectTags(a0,a1,a2))
  67  #endif /* __CLIB_PRAGMA_AMICALL */
  68 #endif /* __CLIB_PRAGMA_TAGCALL */
  69 #ifdef __CLIB_PRAGMA_LIBCALL
  70  #pragma libcall IconobjectBase IsIconName 36 801
  71 #endif /* __CLIB_PRAGMA_LIBCALL */
  72 #ifdef __CLIB_PRAGMA_LIBCALL
  73  #pragma libcall IconobjectBase Convert2IconObject 3c 801
  74 #endif /* __CLIB_PRAGMA_LIBCALL */
  75 #ifdef __CLIB_PRAGMA_LIBCALL
  76  #pragma libcall IconobjectBase Convert2IconObjectA 42 9802
  77 #endif /* __CLIB_PRAGMA_LIBCALL */
  78 #ifdef __CLIB_PRAGMA_TAGCALL
  79  #ifdef __CLIB_PRAGMA_LIBCALL
  80   #pragma tagcall IconobjectBase Convert2IconObjectTags 42 9802
  81  #endif /* __CLIB_PRAGMA_LIBCALL */
  82  #ifdef __CLIB_PRAGMA_AMICALL
  83   #pragma tagcall(IconobjectBase, 0x42, Convert2IconObjectTags(a0,a1))
  84  #endif /* __CLIB_PRAGMA_AMICALL */
  85 #endif /* __CLIB_PRAGMA_TAGCALL */
  86
  87 #endif /* PRAGMAS_ICONOBJECT_PRAGMAS_H */