Module `Translmod`

val transl_implementation : string -> (Typedtree.structure * Typedtree.module_coercion) -> Lambda.program
val transl_store_phrases : string -> Typedtree.structure -> int * Lambda.lambda
val transl_store_implementation : string -> (Typedtree.structure * Typedtree.module_coercion) -> Lambda.program
val transl_implementation_flambda : string -> (Typedtree.structure * Typedtree.module_coercion) -> Lambda.program
val transl_toplevel_definition : Typedtree.structure -> Lambda.lambda
val transl_package : Ident.t option list -> Ident.t -> Typedtree.module_coercion -> Lambda.lambda
val transl_store_package : Ident.t option list -> Ident.t -> Typedtree.module_coercion -> int * Lambda.lambda
val transl_package_flambda : Ident.t option list -> Typedtree.module_coercion -> int * Lambda.lambda
val toplevel_name : Ident.t -> string
val nat_toplevel_name : Ident.t -> Ident.t * int
val primitive_declarations : Primitive.description list Stdlib.ref

type unsafe_component = | Unsafe_module_binding | Unsafe_functor | Unsafe_non_function | Unsafe_typext
type unsafe_info = { reason : unsafe_component; loc : Location.t; subid : Ident.t; }
type error = | Circular_dependency of (Ident.t * unsafe_info) list | Conflicting_inline_attributes