diff options
| author | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2014-05-04 23:08:45 +0000 |
|---|---|---|
| committer | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2014-05-04 23:08:45 +0000 |
| commit | b56dc4b3df8d022b54f40682a9d5d4168c690413 (patch) | |
| tree | a83e174d531c9865aae84769e7bfbf0c1fa353d4 /typing/envaux.ml | |
| parent | 0f1bb864df2b92d2ffc87d62a539d6cd2f1ab403 (diff) | |
PR#5584: merge open extensible types, extension-patch-4.0.2
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@14737 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
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 |