;*
;*
;*  $VER: classbase.i 1.1 (7.5.96)
;*  directory.datatype 1.0
;*
;*  Header file for DataTypes class
;*
;*  Written 1996 by Roland 'Gizzy' Mainz
;*  Original example source from David N. Junod
;*
;*


	IFND CLASSBASE_I
CLASSBASE_I SET	1

;-----------------------------------------------------------------------

	INCLUDE "exec/types.i"
	INCLUDE "exec/libraries.i"
	INCLUDE "exec/lists.i"
	INCLUDE "exec/semaphores.i"
	INCLUDE	"utility/tagitem.i"

;-----------------------------------------------------------------------

   STRUCTURE ClassBase,LIB_SIZE
        UWORD	cb_Pad0
	ULONG	cb_SysBase
	ULONG	cb_DOSBase
	ULONG	cb_IntuitionBase
	ULONG	cb_GfxBase
	ULONG	cb_UtilityBase
	ULONG	cb_DataTypesBase
	ULONG	cb_SuperClassBase
	ULONG	cb_SegList
	STRUCT	cb_Lock,SS_SIZE
	ULONG	cb_Class
   LABEL ClassBase_SIZEOF

;-----------------------------------------------------------------------

	LIBINIT

	LIBDEF	_LVODispatch

;---------------------------------------------------------------------------

CALL MACRO <Function_Name>
	xref _LVO\1
 	jsr _LVO\1(A6)
     ENDM

;---------------------------------------------------------------------------

GO   MACRO <Function_Name>
	xref _LVO\1
 	jmp _LVO\1(A6)
     ENDM

;---------------------------------------------------------------------------

	ENDC	; CLASSBASE_I