blob: 1e925546da27e244b21c17d0b6b5325d544c3f2f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
(***********************************************************************)
(* *)
(* Caml Special Light *)
(* *)
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
(* *)
(* Copyright 1995 Institut National de Recherche en Informatique et *)
(* Automatique. Distributed only by permission. *)
(* *)
(***********************************************************************)
(* $Id$ *)
(* Type-checking of the module language *)
open Typedtree
val type_structure:
Env.t -> Parsetree.structure -> structure * signature * Env.t
val transl_signature:
Env.t -> Parsetree.signature -> signature
type error =
Unbound_module of Longident.t
| Unbound_modtype of Longident.t
| Cannot_apply of module_type
| Not_included of Includemod.error list
| Cannot_eliminate_dependency of module_type
| Signature_expected
| Structure_expected of module_type
| With_not_abstract of string
| With_arity_mismatch of string
| Repeated_name of string * string
exception Error of Location.t * error
val report_error: error -> unit
|
