CMNT	 	Input:  É ¥ 0/É
CMNT	 	Output:  É ¥ É
CMNT	 	NOTE:  expects to start with a literal zero on the eval stack
PRIM	Heap/Get next	É ¥ rslt/name/É
BRFL
	PRIM	Stack/Drop	drop name
BRTR
LIST
	GSYM	General/Initialize
ELST
PRIM	Stack/Over	É ¥ name/list/name/É
PRIM	List/Splice	É ¥ new_list/name/É
PRIM	Tags/Set delegate
PRIM	Misc/Execute
CALL	354071