	.ENABLE SUBSTITUTION
 
; ASSEMBLE AND TASK BUILD THE SKELETON DEVICE DRIVER
; 
;	(RSX-11M VERSION)
 
	PIP XXDRV.LST;*/DE/NM,.OBJ;*,XXTAB.LST;*/DE/NM,.OBJ;*
	PIP XXDRV.TSK;*/DE/NM,.STB;*,.MAP;*
	PIP XXDRV.*/PU,XXTAB
	.ASK SUP ASSEMBLE SUPERMAC DRIVER
	.IFF SUP .GOTO 10
	PIP XXDRV.SRC;*/DE/NM
	PIP XXDRV.SRC=LB:[11,10]RSXMC.MAC,SY:'<UIC>'XXDF,XXDRV.SMC
MAC XXDRV,XXDRV=LB:[1,1]EXEMC/ML,SUPERMAC/ML,SY:'<UIC>'XXDRV.SRC
	PIP XXDRV.SRC;*/DE
	.GOTO 20
.10:
MAC XXDRV,XXDRV=LB:[1,1]EXEMC/ML,[11,10]RSXMC/PA:1,SY:'<UIC>'XXDF,XXDRV
	.GOTO 20
.20:
MAC XXTAB,XXTAB=LB:[1,1]EXEMC/ML,[11,10]RSXMC/PA:1,SY:'<UIC>'XXDF,XXTAB
 
	.ASK BLD BUILD THE DRIVER
	.IFF BLD .GOTO 99
; BUILD SKELETON DRIVER WITH LOADABLE DATA BASE
; ASSUME TARGET IS HOST SYSTEM
	PIP XXDRVBLD.CMD;*/DE
	.OPEN XXDRVBLD.CMD
 
	.DATA '<UIC>'XXDRV/-MM/-HD/SQ,SY:'<UIC>'XXDRV/-SP,SY:'<UIC>'XXDRV=
	.DATA '<UIC>'XXDRV,XXTAB
	.DATA LB:[1,54]RSX11M.STB/SS
	.DATA /
	.DATA STACK=0
	.DATA PAR=XXPAR:120000:40000
	.DATA //
	.CLOSE 
	TKB @XXDRVBLD
.99:
	PIP XXDRVBLD.CMD;*/DE
;
; TA-DUM.
;
