diff options
author | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2012-03-23 02:20:24 +0000 |
---|---|---|
committer | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2012-03-23 02:20:24 +0000 |
commit | b3e0f2e72a2ed928897fea51b9b9059b895cf36a (patch) | |
tree | 0ff6274dea046dd24721c7526d6500ad61ac85f4 /typing/printtyp.mli | |
parent | d9e441b8a1c3363d5ffcd7932c7cb85215e7c60b (diff) |
Fix PR#5553: do not allow a type variable to have the same name as a local type
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@12257 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'typing/printtyp.mli')
-rw-r--r-- | typing/printtyp.mli | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/typing/printtyp.mli b/typing/printtyp.mli index 5417ebf41..c9e509211 100644 --- a/typing/printtyp.mli +++ b/typing/printtyp.mli @@ -54,7 +54,8 @@ val tree_of_cltype_declaration: Ident.t -> cltype_declaration -> rec_status -> o val cltype_declaration: Ident.t -> formatter -> cltype_declaration -> unit val type_expansion: type_expr -> Format.formatter -> type_expr -> unit val prepare_expansion: type_expr * type_expr -> type_expr * type_expr -val trace: bool -> string -> formatter -> (type_expr * type_expr) list -> unit +val trace: bool -> string -> bool -> + formatter -> (type_expr * type_expr) list -> unit val unification_error: bool -> (type_expr * type_expr) list -> (formatter -> unit) -> formatter -> (formatter -> unit) -> |