CMNT	 	Input:  É/data ¥ conn list/É
CMNT	 	Output:  É ¥ É
CMNT	 	NOTE: data item must be tagged literal
CMNT	 	connector node numbers MUST be local
PRIM	List/Test for leaf	É/data ¥ rslt/conn list/É
BRFL
	PRIM	List/Behead	É/data ¥ conn/rest/É
	PRIM	List/Behead	É/data ¥ type/conn body/rest/É
	STRE
		SGLB	Misc/Exception
			GSYM	OS error/Invalid connector type
			LITO	2
			PRIM	Misc/Invoke handler
		ESBR
		SGLB	Conns/Notify[ignore]
			PRIM	List/Behead	É ¥ node/tail/rest/É
			PRIM	Stack/Drop	É ¥ tail/rest/É
			PRIM	List/List to item	É ¥ MSGE/rest/É
			PRIM	Misc/Execute	É ¥ rest/É
			CALL	354061
		ESBR
		SGLB	Conns/Update[ignore]
			PRIM	List/Remove	É ¥ list/data/rest/É
			PRIM	List/Behead	É ¥ node/tail/data/rest/É
			PRIM	Stack/Drop	É ¥ tail/data/rest/É
			PRIM	List/List to item	É ¥ MSGE/data/rest/É
			PRIM	Misc/Execute	É ¥ rest/É
			CALL	354061
		ESBR
		SGLB	Conns/Update[attach]
			PRIM	List/Behead	É ¥ node/tail/rest/É
			PRIM	Stack/Drop	É ¥ tail/rest/É
			PRIM	List/List to item	É ¥ MSGE/rest/É
			PRIM	Stack/Dup from aux	É ¥ data/MSGE/rest/É
			PRIM	Stack/Swap	É ¥ MSGE/data/rest/É
			PRIM	Misc/Execute	É ¥ rest/É
			CALL	354061
		ESBR
		SGLB	Conns/Slot[attach]
			PRIM	Stack/Dup from aux	É/data ¥ data/conn body/rest/É
			PRIM	Stack/Swap	É/data ¥ conn body/data/rest/É
			PRIM	List/Remove	É/data ¥ tail/node/data/rest/É
			PRIM	List/List to item	É/data ¥ slot/node/data/rest/É
			PRIM	Misc/Send to slot	É/data ¥ rest/É
			CALL	354061
		ESBR
	ESTR
BRTR
PRIM	List/List to item	É/data ¥ conn/É
PRIM	List/Behead	É/data ¥ type/conn body/É
STRE
	SGLB	Misc/Exception
		GSYM	OS error/Invalid connector type
		LITO	2
		PRIM	Misc/Invoke handler
	ESBR
	SGLB	Conns/Notify[ignore]
		PRIM	List/Behead	É ¥ node/tail/É
		PRIM	Stack/Drop	É ¥ tail/É
		PRIM	List/List to item	É ¥ MSGE/É
		PRIM	Misc/Execute	É ¥ É
		PRIM	Stack/Drop from aux
	ESBR
	SGLB	Conns/Update[ignore]
		PRIM	List/Remove	É ¥ list/data/rest/É
		PRIM	List/Behead	É ¥ node/tail/data/rest/É
		PRIM	Stack/Drop	É ¥ tail/data/rest/É
		PRIM	List/List to item	É ¥ MSGE/data/rest/É
		PRIM	Misc/Execute	É ¥ rest/É
		PRIM	Stack/Drop from aux
	ESBR
	SGLB	Conns/Update[attach]
		PRIM	List/Behead	É ¥ node/tail/rest/É
		PRIM	Stack/Drop	É ¥ tail/rest/É
		PRIM	List/List to item	É ¥ MSGE/rest/É
		PRIM	Stack/Push from aux	É ¥ data/MSGE/rest/É
		PRIM	Stack/Swap	É ¥ MSGE/data/rest/É
		PRIM	Misc/Execute	É ¥ rest/É
	ESBR
	SGLB	Conns/Slot[attach]
		PRIM	Stack/Push from aux	É/data ¥ data/conn body/É
		PRIM	Stack/Swap	É/data ¥ conn body/data/É
		PRIM	List/Remove	É/data ¥ tail/node/data/É
		PRIM	List/List to item	É/data ¥ slot/node/data/É
		PRIM	Misc/Send to slot
	ESBR
ESTR