PiqiSourceval add_imported_typedefs :
C.T.typedef Idtable.M.t ->
C.T.typedef list ->
C.T.typedef Idtable.M.tval resolve_def_typenames :
[< C.T.piqtype ] Idtable.M.t ->
[< `alias of C.A.t
| `enum of 'a
| `list of C.L.t
| `record of C.R.t
| `variant of C.V.t ] ->
unitval check_extension_name :
[< `field of string
| `func of string
| `import of string
| `name of string
| `option of string
| `typedef of string ] ->
unitval check_extension_spec :
[< `field of string
| `func of string
| `import of string
| `name of string
| `option of string
| `typedef of string name ] ->
unitval copy_def :
copy_parts:bool ->
C.T.typedef ->
[> `alias of C.T.Piqi_impl_piqi.alias
| `enum of C.E.t
| `list of C.T.Piqi_impl_piqi.piqi_list
| `record of C.R.t
| `variant of C.V.t ]val copy_defs :
?copy_parts:bool ->
C.T.typedef list ->
[> `alias of C.T.Piqi_impl_piqi.alias
| `enum of C.E.t
| `list of C.T.Piqi_impl_piqi.piqi_list
| `record of C.R.t
| `variant of C.V.t ]
listval resolve_defs :
piqi:C.T.Piqi_impl_piqi.piqi ->
C.T.typedef Idtable.M.t ->
C.T.typedef list ->
C.T.typedef Idtable.M.tval check_defs :
piqi:C.T.Piqi_impl_piqi.piqi ->
C.T.typedef Idtable.M.t ->
C.T.typedef list ->
unitval read_piqi_common :
string ->
(string * (Piq_parser.L.token * (int * int)) Stream.t) ->
C.piq_astval check_assign_module_name :
?modname:Piqi_impl_piqi.Piqi_impl_piqi.word ->
string ->
C.T.piqi ->
unitval mlobj_to_piqobj :
Piqobj_of_protobuf.C.T.piqtype ->
(int -> 'a -> C.Piqirun.OBuf.t) ->
'a ->
Piqobj.objval mlobj_to_ast :
Piqobj_of_protobuf.C.T.piqtype ->
(int -> 'a -> C.Piqirun.OBuf.t) ->
'a ->
Piqobj_to_piq.C.piq_astval mlobj_of_ast :
Piqobj_of_piq.C.T.piqtype ->
(C.Piqirun.t -> 'a) ->
Piqobj_of_piq.C.piq_ast ->
'aval is_unknown_field :
string list ->
[> `name of string | `named of Piq_ast.Named.t ] ->
boolval check_unknown_fields :
?prepend:(unit -> unit) ->
Piq_gen.C.piq_ast list ->
string list ->
unitval replace_field :
C.R.t ->
Piqi_impl_piqi.Piqi_impl_piqi.field ->
Piqi_impl_piqi.Piqi_impl_piqi.name ->
C.R.tval replace_option :
C.V.t ->
Piqi_impl_piqi.Piqi_impl_piqi.option ->
Piqi_impl_piqi.Piqi_impl_piqi.name ->
C.V.tval apply_extensions :
'a ->
Piqobj_of_protobuf.C.T.piqtype ->
(C.Piqirun.t -> 'b) ->
(int -> 'a -> C.Piqirun.OBuf.t) ->
Piqi_impl_piqi.any list ->
string list ->
override:bool ->
'bval apply_option_extensions :
([> `variant of C.V.t ] as 'a) Idtable.M.t ->
string ->
Piqi_impl_piqi.any list ->
string list ->
override:bool ->
'a Idtable.M.tval apply_field_extensions :
([> `record of C.R.t ] as 'a) Idtable.M.t ->
string ->
Piqi_impl_piqi.any list ->
string list ->
override:bool ->
'a Idtable.M.tval extend_import :
C.T.Piqi_impl_piqi.import Idtable.M.t ->
Idtable.M.key ->
Piqi_impl_piqi.any list ->
string list ->
override:bool ->
C.T.Piqi_impl_piqi.import Idtable.M.tval extend_imports :
C.Import.t list ->
([> `import of Idtable.M.key ] * bool * Piqi_impl_piqi.any list) list ->
string list ->
C.T.Piqi_impl_piqi.import listval extend_function :
C.T.Piqi_impl_piqi.func Idtable.M.t ->
Idtable.M.key ->
Piqi_impl_piqi.any list ->
string list ->
override:bool ->
C.T.Piqi_impl_piqi.func Idtable.M.tval extend_functions :
C.T.Func.t list ->
([> `func of Idtable.M.key ] * bool * Piqi_impl_piqi.any list) list ->
string list ->
C.T.Piqi_impl_piqi.func listval apply_def_extensions :
C.T.Piqi_impl_piqi.typedef Idtable.M.t ->
[> `field of string
| `name of Idtable.M.key
| `option of string
| `typedef of Idtable.M.key ] ->
Piqi_impl_piqi.any list ->
string list ->
override:bool ->
C.T.Piqi_impl_piqi.typedef Idtable.M.tval apply_defs_extensions :
C.T.typedef list ->
([> `field of string
| `name of Idtable.M.key
| `option of string
| `typedef of Idtable.M.key ]
* bool
* Piqi_impl_piqi.any list)
list ->
string list ->
C.T.Piqi_impl_piqi.typedef listval partition_extensions :
C.Extend.t list ->
(Piqi_impl_piqi.Piqi_impl_piqi.extend_target
* bool
* Piqi_impl_piqi.Piqi_impl_piqi.piqi_any list)
list
* (Piqi_impl_piqi.Piqi_impl_piqi.extend_target
* bool
* Piqi_impl_piqi.Piqi_impl_piqi.piqi_any list)
list
* (Piqi_impl_piqi.Piqi_impl_piqi.extend_target
* bool
* Piqi_impl_piqi.Piqi_impl_piqi.piqi_any list)
listval get_imported_defs :
C.Import.t list ->
[> `alias of C.T.Piqi_impl_piqi.alias
| `enum of C.E.t
| `list of C.T.Piqi_impl_piqi.piqi_list
| `record of C.R.t
| `variant of C.V.t ]
listval make_param_alias_from_name :
Piqi_impl_piqi.Piqi_impl_piqi.name ->
Piqi_impl_piqi.Piqi_impl_piqi.typename ->
C.T.Alias.tval resolve_param :
C.T.Func.t ->
string ->
[< `alias of C.A.t
| `enum of C.E.t
| `list of C.L.t
| `name of Piqi_impl_piqi.Piqi_impl_piqi.typename
| `record of C.R.t
| `variant of C.V.t ] ->
[> `alias of C.T.Alias.t
| `enum of C.E.t
| `list of C.L.t
| `record of C.R.t
| `variant of C.V.t ]val process_func :
C.T.Func.t ->
([> `alias of C.T.Alias.t
| `enum of C.E.t
| `list of C.L.t
| `record of C.R.t
| `variant of C.V.t ]
* (Piqi_impl_piqi.Piqi_impl_piqi.name
* (Piqi_impl_piqi.Piqi_impl_piqi.typedef ->
unit)))
listval get_function_defs :
C.T.typedef list ->
C.T.Func.t list ->
[> `alias of C.A.t
| `enum of C.E.t
| `list of C.L.t
| `record of C.R.t
| `variant of C.V.t ]
list
* (Piqi_impl_piqi.Piqi_impl_piqi.typedef -> unit) Idtable.M.tval prepare_included_piqi_ast :
[> `list of ([> `named of Piq_ast.Named.t ] as 'a) list ] ->
'a listval pre_process_piqi :
?modname:Piqi_impl_piqi.Piqi_impl_piqi.word ->
fname:string ->
?ast:C.piq_ast ->
C.T.piqi ->
C.T.piqival load_piqi_file :
?modname:Piqi_impl_piqi.Piqi_impl_piqi.word ->
?include_path:C.P.t list ->
string ->
C.T.piqival load_piqi_ast :
?modname:Piqi_impl_piqi.Piqi_impl_piqi.word ->
?include_path:C.P.t list ->
cache:bool ->
string ->
C.piq_ast ->
C.T.piqival load_piqi_module :
?include_path:C.P.t list ->
Piqi_db.Piqitable.M.key ->
string ->
C.T.piqival load_includes :
include_path:C.P.t list ->
C.T.piqi ->
C.Includ.t list ->
Piqi_impl_piqi.Piqi_impl_piqi.piqi listval piqi_to_ast :
?is_external_mode:bool ->
C.T.Piqi_impl_piqi.piqi ->
Piqobj_to_piq.C.piq_ast