Alessandro Baretta <a.baretta@barettadeit.com> writes:

   Short of writing my own Pr_stdout module, is there any way to achieve
   the result of interactively getting camlp4 to preprocess some code and
   print it back to stdout?
   
cat - | camlp4 pa_o.cmo pr_r.cmo -impl -
let f = function | [] -> 0 | _ -> 1;;
<CONTROL-D>
value f =
  fun
  [ [] -> 0
  | _ -> 1 ]
;