external
next : tree_path
->
unit =
"ml_gtk_tree_path_next"