ocaml/camlp4/examples/apply_operator_test.ml

4 lines
104 B
OCaml
Raw Normal View History

let ( & ) = ();; (* To force it to be inlined. If not it's not well typed. *)
fun f g h x -> f& g& h x