Source position: gtkrbtree.inc line 15
type TGtkRBTreeTraverseFunc = procedure(
tree: PGtkRBTree;
node: PGtkRBNode;
data: gpointer
);