Source

orakuda / pa / pa_format.mli

The default branch has multiple heads

module Make (Syntax : Camlp4.Sig.Camlp4Syntax) : sig

  open Syntax.Ast

  val parse :
    char list (* escape chars *)
    -> loc 
    -> 'a (* CR jfuruse: bad type *)
    -> string 
    -> [> `Const of expr
       | `Fun of int list * (expr -> expr) ] * string option (** remains *)
end