diff options
Diffstat (limited to 'ocamldoc/odoc_env.ml')
| -rw-r--r-- | ocamldoc/odoc_env.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ocamldoc/odoc_env.ml b/ocamldoc/odoc_env.ml index f4d1b7ce1..d6a595bd7 100644 --- a/ocamldoc/odoc_env.ml +++ b/ocamldoc/odoc_env.ml @@ -238,9 +238,9 @@ let subst_class_type env t = | Types.Cty_signature cs -> (* on ne s'occupe pas des vals et methods *) t - | Types.Cty_fun (l, texp, ct) -> + | Types.Cty_arrow (l, texp, ct) -> let new_texp = subst_type env texp in let new_ct = iter ct in - Types.Cty_fun (l, new_texp, new_ct) + Types.Cty_arrow (l, new_texp, new_ct) in iter t |