module Pack: functor (X : sigtype 'a t end) -> sig .. end
functor (
X
:
sig
type 'a t
'a
end
) ->
sig type 'a t end
type pack
val pack : 'a Camlp4.Sig.DynAst.tag -> 'a X.t -> pack
'a Camlp4.Sig.DynAst.tag -> 'a X.t -> pack
val unpack : 'a Camlp4.Sig.DynAst.tag -> pack -> 'a X.t
'a Camlp4.Sig.DynAst.tag -> pack -> 'a X.t
val print_tag : Format.formatter -> pack -> unit
Format.formatter -> pack -> unit