let
to_node (n:
Node_callback
.node) : t =
Obj
.magic n