CMNT	 	This is a patch instruction for 'S_tree/Entry to stack'
CMNT	 	Input:  É ¥ key/tree/É
CMNT	 	Output:  É ¥ elementsÉ/tree/É
LITO	0	É ¥ 0/key/tree/É
PRIM	Stack/Swap	É ¥ key/0/tree/É
PRIM	S_tree/Read	É ¥ entry/tree/É
PRIM	List/List to stack	É ¥ elementsÉ/tree/É