%
% stack: new-root-mark
%
_\ exch
root\
_\ Tree.!Mark
!\