camlp5 7.14 · OCaml Package

type loc = Ploc.t

type !'a v = 'a Ploc.vala

type type_var = string option Ploc.vala * bool option

type !'a class_infos = {

ciLoc : loc;
ciVir : bool Ploc.vala;
ciPrm : loc * type_var list Ploc.vala;
ciNam : string Ploc.vala;
ciExp : 'a;

}

type ctyp =

| TyAcc of loc * ctyp * ctyp
| TyAli of loc * ctyp * ctyp
| TyAny of loc
| TyApp of loc * ctyp * ctyp
| TyArr of loc * ctyp * ctyp
| TyCls of loc * string list Ploc.vala
| TyLab of loc * string Ploc.vala * ctyp
| TyLid of loc * string Ploc.vala
| TyMan of loc * ctyp * bool Ploc.vala * ctyp
| TyObj of loc * (string * ctyp) list Ploc.vala * bool Ploc.vala
| TyOlb of loc * string Ploc.vala * ctyp
| TyPck of loc * module_type
| TyPol of loc * string list Ploc.vala * ctyp
| TyPot of loc * string list Ploc.vala * ctyp
| TyQuo of loc * string Ploc.vala
| TyRec of loc * (loc * string * bool * ctyp) list Ploc.vala
| TySum of loc * (loc * string Ploc.vala * ctyp list Ploc.vala * ctyp option) list Ploc.vala
| TyTup of loc * ctyp list Ploc.vala
| TyUid of loc * string Ploc.vala
| TyVrn of loc * poly_variant list Ploc.vala * string list Ploc.vala option option
| TyXtr of loc * string * ctyp Ploc.vala option

and poly_variant =

| PvTag of loc * string Ploc.vala * bool Ploc.vala * ctyp list Ploc.vala
| PvInh of loc * ctyp

and patt =

| PaAcc of loc * patt * patt
| PaAli of loc * patt * patt
| PaAnt of loc * patt
| PaAny of loc
| PaApp of loc * patt * patt
| PaArr of loc * patt list Ploc.vala
| PaChr of loc * string Ploc.vala
| PaFlo of loc * string Ploc.vala
| PaInt of loc * string Ploc.vala * string
| PaLab of loc * (patt * patt option Ploc.vala) list Ploc.vala
| PaLaz of loc * patt
| PaLid of loc * string Ploc.vala
| PaNty of loc * string Ploc.vala
| PaOlb of loc * patt * expr option Ploc.vala
| PaOrp of loc * patt * patt
| PaRec of loc * (patt * patt) list Ploc.vala
| PaRng of loc * patt * patt
| PaStr of loc * string Ploc.vala
| PaTup of loc * patt list Ploc.vala
| PaTyc of loc * patt * ctyp
| PaTyp of loc * string list Ploc.vala
| PaUid of loc * string Ploc.vala
| PaUnp of loc * string Ploc.vala option Ploc.vala * module_type option
| PaVrn of loc * string Ploc.vala
| PaXtr of loc * string * patt Ploc.vala option

and expr =

| ExAcc of loc * expr * expr
| ExAnt of loc * expr
| ExApp of loc * expr * expr
| ExAre of loc * expr * expr
| ExArr of loc * expr list Ploc.vala
| ExAsr of loc * expr
| ExAss of loc * expr * expr
| ExBae of loc * expr * expr list Ploc.vala
| ExChr of loc * string Ploc.vala
| ExCoe of loc * expr * ctyp option * ctyp
| ExFlo of loc * string Ploc.vala
| ExFor of loc * string Ploc.vala * expr * expr * bool Ploc.vala * expr list Ploc.vala
| ExFun of loc * (patt * expr option Ploc.vala * expr) list Ploc.vala
| ExIfe of loc * expr * expr * expr
| ExInt of loc * string Ploc.vala * string
| ExJdf of loc * joinclause list Ploc.vala * expr
| ExLab of loc * (patt * expr option Ploc.vala) list Ploc.vala
| ExLaz of loc * expr
| ExLet of loc * bool Ploc.vala * (patt * expr) list Ploc.vala * expr
| ExLid of loc * string Ploc.vala
| ExLmd of loc * string Ploc.vala option Ploc.vala * module_expr * expr
| ExLop of loc * module_expr * expr
| ExMat of loc * expr * (patt * expr option Ploc.vala * expr) list Ploc.vala
| ExNew of loc * string list Ploc.vala
| ExObj of loc * patt option Ploc.vala * class_str_item list Ploc.vala
| ExOlb of loc * patt * expr option Ploc.vala
| ExOvr of loc * (string * expr) list Ploc.vala
| ExPar of loc * expr * expr
| ExPck of loc * module_expr * module_type option
| ExRec of loc * (patt * expr) list Ploc.vala * expr option
| ExRpl of loc * expr option Ploc.vala * (loc * string Ploc.vala) Ploc.vala
| ExSeq of loc * expr list Ploc.vala
| ExSpw of loc * expr
| ExSnd of loc * expr * string Ploc.vala
| ExSte of loc * expr * expr
| ExStr of loc * string Ploc.vala
| ExTry of loc * expr * (patt * expr option Ploc.vala * expr) list Ploc.vala
| ExTup of loc * expr list Ploc.vala
| ExTyc of loc * expr * ctyp
| ExUid of loc * string Ploc.vala
| ExVrn of loc * string Ploc.vala
| ExWhi of loc * expr * expr list Ploc.vala
| ExXtr of loc * string * expr Ploc.vala option

and module_type =

| MtAcc of loc * module_type * module_type
| MtApp of loc * module_type * module_type
| MtFun of loc * functor_parameter Ploc.vala * module_type
| MtLid of loc * string Ploc.vala
| MtQuo of loc * string Ploc.vala
| MtSig of loc * sig_item list Ploc.vala
| MtTyo of loc * module_expr
| MtUid of loc * string Ploc.vala
| MtWit of loc * module_type * with_constr list Ploc.vala
| MtXtr of loc * string * module_type Ploc.vala option

and functor_parameter =
  (string Ploc.vala option Ploc.vala * module_type) option

and sig_item =

| SgCls of loc * class_type class_infos list Ploc.vala
| SgClt of loc * class_type class_infos list Ploc.vala
| SgDcl of loc * sig_item list Ploc.vala
| SgDir of loc * string Ploc.vala * expr option Ploc.vala
| SgExc of loc * string Ploc.vala * ctyp list Ploc.vala
| SgExt of loc * string Ploc.vala * ctyp * string list Ploc.vala
| SgInc of loc * module_type
| SgMod of loc * bool Ploc.vala * (string Ploc.vala option Ploc.vala * module_type) list Ploc.vala
| SgMty of loc * string Ploc.vala * module_type
| SgOpn of loc * string list Ploc.vala
| SgTyp of loc * type_decl list Ploc.vala
| SgUse of loc * string Ploc.vala * (sig_item * loc) list Ploc.vala
| SgVal of loc * string Ploc.vala * ctyp
| SgXtr of loc * string * sig_item Ploc.vala option

and with_constr =

| WcMod of loc * string list Ploc.vala * module_expr
| WcMos of loc * string list Ploc.vala * module_expr
| WcTyp of loc * string list Ploc.vala * type_var list Ploc.vala * bool Ploc.vala * ctyp
| WcTys of loc * string list Ploc.vala * type_var list Ploc.vala * ctyp

and module_expr =

| MeAcc of loc * module_expr * module_expr
| MeApp of loc * module_expr * module_expr
| MeFun of loc * functor_parameter Ploc.vala * module_expr
| MeStr of loc * str_item list Ploc.vala
| MeTyc of loc * module_expr * module_type
| MeUid of loc * string Ploc.vala
| MeUnp of loc * expr * module_type option
| MeXtr of loc * string * module_expr Ploc.vala option

and str_item =

| StCls of loc * class_expr class_infos list Ploc.vala
| StClt of loc * class_type class_infos list Ploc.vala
| StDcl of loc * str_item list Ploc.vala
| StDef of loc * joinclause list Ploc.vala
| StDir of loc * string Ploc.vala * expr option Ploc.vala
| StExc of loc * string Ploc.vala * ctyp list Ploc.vala * string list Ploc.vala
| StExp of loc * expr
| StExt of loc * string Ploc.vala * ctyp * string list Ploc.vala
| StInc of loc * module_expr
| StMod of loc * bool Ploc.vala * (string Ploc.vala option Ploc.vala * module_expr) list Ploc.vala
| StMty of loc * string Ploc.vala * module_type
| StOpn of loc * string list Ploc.vala
| StTyp of loc * bool Ploc.vala * type_decl list Ploc.vala
| StUse of loc * string Ploc.vala * (str_item * loc) list Ploc.vala
| StVal of loc * bool Ploc.vala * (patt * expr) list Ploc.vala
| StXtr of loc * string * str_item Ploc.vala option

and joinclause = {

jcLoc : loc;
jcVal : (loc * (loc * (loc * string Ploc.vala) * patt option Ploc.vala) list Ploc.vala * expr) list Ploc.vala;

}

and type_decl = {

tdNam : (loc * string Ploc.vala) Ploc.vala;
tdPrm : type_var list Ploc.vala;
tdPrv : bool Ploc.vala;
tdDef : ctyp;
tdCon : (ctyp * ctyp) list Ploc.vala;

}

and class_type =

| CtAcc of loc * class_type * class_type
| CtApp of loc * class_type * class_type
| CtCon of loc * class_type * ctyp list Ploc.vala
| CtFun of loc * ctyp * class_type
| CtIde of loc * string Ploc.vala
| CtSig of loc * ctyp option Ploc.vala * class_sig_item list Ploc.vala
| CtXtr of loc * string * class_type Ploc.vala option

and class_sig_item =

| CgCtr of loc * ctyp * ctyp
| CgDcl of loc * class_sig_item list Ploc.vala
| CgInh of loc * class_type
| CgMth of loc * bool Ploc.vala * string Ploc.vala * ctyp
| CgVal of loc * bool Ploc.vala * string Ploc.vala * ctyp
| CgVir of loc * bool Ploc.vala * string Ploc.vala * ctyp

and class_expr =

| CeApp of loc * class_expr * expr
| CeCon of loc * string list Ploc.vala * ctyp list Ploc.vala
| CeFun of loc * patt * class_expr
| CeLet of loc * bool Ploc.vala * (patt * expr) list Ploc.vala * class_expr
| CeStr of loc * patt option Ploc.vala * class_str_item list Ploc.vala
| CeTyc of loc * class_expr * class_type
| CeXtr of loc * string * class_expr Ploc.vala option

and class_str_item =

| CrCtr of loc * ctyp * ctyp
| CrDcl of loc * class_str_item list Ploc.vala
| CrInh of loc * class_expr * string option Ploc.vala
| CrIni of loc * expr
| CrMth of loc * bool Ploc.vala * bool Ploc.vala * string Ploc.vala * ctyp option Ploc.vala * expr
| CrVal of loc * bool Ploc.vala * bool Ploc.vala * string Ploc.vala * expr
| CrVav of loc * bool Ploc.vala * string Ploc.vala * ctyp
| CrVir of loc * bool Ploc.vala * string Ploc.vala * ctyp

val loc_of_ctyp : ctyp -> loc

val loc_of_patt : patt -> loc

val loc_of_expr : expr -> loc

val loc_of_module_type : module_type -> loc

val loc_of_module_expr : module_expr -> loc

val loc_of_sig_item : sig_item -> loc

val loc_of_str_item : str_item -> loc

val loc_of_with_constr : with_constr -> loc

val loc_of_class_type : class_type -> loc

val loc_of_class_sig_item : class_sig_item -> loc

val loc_of_class_expr : class_expr -> loc

val loc_of_class_str_item : class_str_item -> loc

package camlp5