;***************************************************************************
;	NAME: IWINIT.INC
;	COPYRIGHT:
;	"Copyright (c) 1994,1995 by e-Tek Labs"
;
;       "This software is furnished under a license and may be used,
;        copied, or disclosed only in accordance with the terms of such
;        license and with the inclusion of the above copyright notice.
;        This software or any other copies thereof may not be provided or
;        otherwise made available to any other person. No title to and
;        ownership of the software is hereby transfered."
;****************************************************************************
; $Log: iwinit.inc $
; Revision 1.1  1995/02/23 11:07:07  unknown
; Initial revision
;***************************************************************************/
INIT_SEGS Macro	func, priority
DGROUP group _DATA,_IWINITS,_IWINIT,_IWINITE
ASSUME DS:DGROUP
IFDEF __f__
public _&func&_data
extrn &func&_:near
_DATA segment word public use32 'DATA'
_&func&_data db 0
_DATA ends
_IWINITS segment word public use32 'DATA'
_IWINITS ends
_IWINIT segment word public use32 'DATA'
db 0
db &priority&
dd offset &func&_
_IWINIT ends
_IWINITE segment word public use32 'DATA'
_IWINITE ends
ELSE
public _&func&_data
_DATA segment word public use16 'DATA'
_&func&_data db 0
_DATA ends
_IWINITS segment word public use16 'DATA'
_IWINITS ends
IFDEF __t__
extrn _&func&:near
_IWINIT segment word public use16 'DATA'
db 0	; near ptr */
db &priority&
dw offset _&func&
dw 0
ELSE
extrn _&func&:far
_IWINIT segment word public use16 'DATA'
db 1	; far ptr */
db &priority&
dw offset _&func&
dw seg _&func&
ENDIF
_IWINIT ends
_IWINITE segment word public use16 'DATA'
_IWINITE ends
ENDIF
end
endm
