.TITLE	LIBTST
	.MCALL	QIOW$,DIR$
MSG:	.ASCII	/THIS MESSAGE IS FROM THE LOADED LIBRARY/
MSGL=.-MSG
	.EVEN
OUT:	QIOW$	IO.WLB,5,1,,,,<MSG,MSGL,40>
MESSAG::DIR$	#OUT
	RETURN
	.END