diff options
Diffstat (limited to 'typing/envaux.ml')
| -rw-r--r-- | typing/envaux.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/typing/envaux.ml b/typing/envaux.ml index 04d6d256f..af86fd25b 100644 --- a/typing/envaux.ml +++ b/typing/envaux.ml @@ -47,9 +47,9 @@ let rec env_from_summary sum subst = Env.add_type ~check:false id (Subst.type_declaration subst desc) (env_from_summary s subst) - | Env_exception(s, id, desc) -> - Env.add_exception ~check:false id - (Subst.exception_declaration subst desc) + | Env_extension(s, id, desc) -> + Env.add_extension ~check:false id + (Subst.extension_constructor subst desc) (env_from_summary s subst) | Env_module(s, id, desc) -> Env.add_module_declaration id |