;:ts=8

	xref	_ToolBase
	xdef	_CloseDir
_CloseDir:
	move.l	a6,-(sp)
	move.l	_ToolBase,a6
	move.l	8(sp),a0
	jsr	-264(a6)
	move.l	(sp)+,a6
	rts