diff options
| author |  Matthieu Sozeau <mattam@mattam.org> | 2013-10-31 11:56:30 +0100 |
|---|---|---|
| committer | Matthieu Sozeau <mattam@mattam.org> | 2014-05-06 09:58:54 +0200 |
| commit | 05c87ba330a9b4d02b150c196e390b9dd30be341 (patch) | |
| tree | fc19f68a21198754134aee6fe68a5cb5516b41b7 /library/global.ml | |
| parent | 1c1accf7186438228be9c426db9071aa95a7e992 (diff) | |
Fix interface for template polymorphism, cleaning up code in all typing algorithms.
Diffstat (limited to 'library/global.ml')
| -rw-r--r-- | library/global.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/global.ml b/library/global.ml index fbba81b51..812178bbb 100644 --- a/library/global.ml +++ b/library/global.ml @@ -192,7 +192,7 @@ let type_of_global_in_context env r = Inductive.type_of_constructor (cstr,inst) specif, univs let is_polymorphic r = - let env = env() in + let env = env() in match r with | VarRef id -> false | ConstRef c -> |