STRE
	SGLB	Misc/Class Reference
		CLAS	354008
	ESBR
ESTR
STRE
	SGLB	Misc/Class Reference	NOT superclass reference!
		CSYM	354009
		PRIM	Stack/Drop	drop symbol
	ESBR
	SGLB	General/Initialize
		PRIM	Heap/Store self
	ESBR
	SGLB	Hierarchy/Attach Conn
		CMNT	 	Expects:  É ¥ inst/list/É
		CMNT	 	List:  -->output#-->connector--X
		PRIM	Stack/Swap	É ¥ list/inst/É
		PRIM	List/Behead	É ¥ output#/conn/inst/É
		PRIM	Stack/Second to aux	É/conn ¥ output#/inst/É
		PRIM	S_tree/Test for entry	É/conn ¥ rslt/output#/inst/É
		BRFL	 	branch if no such entry
			PRIM	Stack/Push from aux	É ¥ conn/output#/inst/É
			PRIM	S_tree/Put	É ¥ inst/É
			PRIM	Heap/Store self	É ¥ É
		BRTR
		PRIM	S_tree/Get exact	É/conn ¥ conn_list/output#/inst/É
		PRIM	Stack/Push from aux	É ¥ conn/conn_list/output#/inst/É
		PRIM	List/List to item	É ¥ conn'/conn_list/output#/inst/É
		PRIM	List/Splice	É ¥ conn_list'/output#/inst/É
		PRIM	S_tree/Put	É ¥ inst/É
		PRIM	Heap/Store self	É ¥ É
	ESBR
	SGLB	Hierarchy/Remove Conn
		CMNT	 	Expects:  É ¥ inst/list/É
		CMNT	 	List:  -->output#-->route--X
		PRIM	Stack/Swap	É ¥ list/inst/É
		PRIM	List/Behead	É ¥ output#/route/inst/É
		PRIM	Stack/Xswap	É ¥ output#/inst/route/É
		PRIM	S_tree/Test for entry	É ¥ rslt/output#/inst/route/É
		BRFL	 	branch if no such entry
			PRIM	Stack/Drop	É ¥ inst/route/É
			PRIM	Stack/Xdrop	É ¥ inst/É
			PRIM	Heap/Store self	É ¥ É
		BRTR
		PRIM	S_tree/Get exact	É ¥ conn_list/output#/inst/route/É
		PRIM	List/Test for leaf	É ¥ rslt/conn_list/output#/inst/route/É
		BRFL	 	branch if not a leaf
			PRIM	List/Behead	É ¥ conn/conn_list/output#/inst/route/É
			PRIM	Stack/Pop to aux	É/conn ¥ conn_list/output#/inst/route/É
			PRIM	S_tree/Put	É/conn ¥ inst/route/É
			PRIM	Stack/Push from aux	É ¥ conn/inst/route/É
			CALL	354056	É ¥ É
		BRTR
		PRIM	List/List to item	É ¥ conn/output#/inst/route/É
		PRIM	Stack/Xdrop	É ¥ conn/inst/route/É
		CALL	354056	É ¥ É
	ESBR
ESTR