MGCML.MAC;2/AU=[12,10]MGCML.VGN;1
\
-2,2
	.IDENT	/M10.12X/
-57
;
;	JGD	07-MAY-79 	IF @ CMD FILE NOT FOUND IN CURRENT UIC
;				LOOK FOR IN ON SY:[1,5]
%
-543,543,/; JGD/
	BCC	10$		;OPENED OK
	MOV	#SYSIND,6(R2)	;GET DEFAULT UIC
	MOV	#5,4(R2)	;AND LENGTH
	CALL	.PARSE		;PARSE IT
	BCS	10$		;BAD INDEED
	OFNB$R			;TRY FOR FILE IN DEF UIC
10$:	RETURN			;++002
SYSIND:	.ASCII	/[1,5]/		;
	.EVEN			;
/