# Module Pa_ocamlviz

    module Pa_ocamlviz: sig .. end

    val fun_idents : (string * int) list Stdlib.ref

    val getfilename : Camlp4.PreCast.Syntax.Loc.t -> string

    val fname : string -> Camlp4.PreCast.Syntax.Loc.t -> string

    exception CannotModifyThis

    val binding_map : bool ->
           Camlp4.PreCast.Syntax.Ast.loc ->
           Camlp4.PreCast.Syntax.Ast.binding -> Camlp4.PreCast.Syntax.Ast.binding