perm filename TSTGO.SAI[S,AIL] blob sn#050633 filedate 1973-06-28 generic text, type T, neo UTF8
COMMENT ⊗   VALID 00002 PAGES 
RECORD PAGE   DESCRIPTION
 00001 00001
 00002 00002	BEGIN "TSTGO"
 00003 ENDMK
⊗;
BEGIN "TSTGO"
	PROCEDURE FOOBAR;
	BEGIN "FOOBAR"
		LABEL ERR;
		SIMPLE PROCEDURE S1;
		BEGIN GO TO ERR END;
		SIMPLE PROCEDURE S2;
			S1;
		S2;
ERR:
	END "FOOBAR";
	FOOBAR;
	OUTSTR("MUMBLE");
END;