(*i $Id$ i*) (*s Production of Ocaml syntax. *) open Miniml module Make : functor(P : Mlpp_param) -> Mlpp