let insert_after st ?parent pos = let iter = alloc_iter () in insert_after st ~iter ?parent pos; iter