Source position: msebintree.pas line 48
type nodeprocty = procedure(
const anode: tavlnode
) of object;