(to x (begin ...)).
Use <> vt names.
Simplify.
Remove unused with-parent-size.
Removed with-parent.
Removed vtable:delegated.
Typo.