home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 3 / goldfish_volume_3.bin / files / fish / disks / d1074.lha / Programs / C_dt / source / classbase.i < prev    next >
Encoding:
Text File  |  1995-03-07  |  1.7 KB  |  67 lines
  1.  
  2.         IFND CLASSBASE_I
  3. CLASSBASE_I SET 1
  4.  
  5. ;-----------------------------------------------------------------------
  6.  
  7.         INCLUDE "exec/types.i"
  8.         INCLUDE "exec/libraries.i"
  9.         INCLUDE "exec/lists.i"
  10.         INCLUDE "exec/semaphores.i"
  11.         INCLUDE "utility/tagitem.i"
  12.  
  13.         INCLUDE "c_rev.i"
  14.  
  15. ;-----------------------------------------------------------------------
  16.  
  17.    STRUCTURE ClassBase,LIB_SIZE
  18.         UWORD   cb_UsageCnt
  19.         ULONG   cb_SysBase
  20.         ULONG   cb_DOSBase
  21.         ULONG   cb_IntuitionBase
  22.         ULONG   cb_GfxBase
  23.         ULONG   cb_UtilityBase
  24.         ULONG   cb_IFFParseBase
  25.         ULONG   cb_DataTypesBase
  26.         ULONG   cb_SuperClassBase
  27.         ULONG   cb_SegList
  28.         STRUCT  cb_Lock,SS_SIZE
  29.         ULONG   cb_Class
  30.    LABEL ClassBase_SIZEOF
  31.  
  32. ;-----------------------------------------------------------------------
  33. ; set here some defines for the generic classinit.asm module
  34. ; Note: that define a string using a equ is only working if the string
  35. ;       is larger than 4 characters (SAS asm) ! In this case it works,
  36. ;       because of the '.datatype' suffix !
  37.  
  38. DATATYPENAME   equ 'c.datatype'
  39. ENGINE         equ _ObtainCEngine
  40.  
  41.         XREF _ObtainCEngine
  42.  
  43. ;-----------------------------------------------------------------------
  44.  
  45.         LIBINIT
  46.  
  47.         LIBDEF  _LVODispatch
  48.  
  49. ;-----------------------------------------------------------------------
  50.  
  51. CALL MACRO <Function_Name>
  52.         xref _LVO\1
  53.         jsr _LVO\1(A6)
  54.      ENDM
  55.  
  56. ;-----------------------------------------------------------------------
  57.  
  58. GO   MACRO <Function_Name>
  59.         xref _LVO\1
  60.         jmp _LVO\1(A6)
  61.      ENDM
  62.  
  63. ;----------------------------------------------------------------------
  64.  
  65.         ENDC    ; CLASSBASE_I
  66.  
  67.