diff options
| author | Maxime Dénès | 2018-11-05 10:28:44 +0100 |
|---|---|---|
| committer | Maxime Dénès | 2018-11-05 10:28:44 +0100 |
| commit | eb842684456c5a965507c83e7b169ae0d0f6cc90 (patch) | |
| tree | 3e7a55ef60b50af0bab3b4f5db99be35b488a068 /engine/termops.ml | |
| parent | d813a48dcc80ca9763fd48d9e369bd21062c21d8 (diff) | |
| parent | c367e7cd962089d2932b986e5764b8e3844ad4b0 (diff) | |
Merge PR #8842: Towards seeing Global purely as a wrapper on top of kernel functions
Diffstat (limited to 'engine/termops.ml')
| -rw-r--r-- | engine/termops.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/engine/termops.ml b/engine/termops.ml index 181efa0ade..52880846f8 100644 --- a/engine/termops.ml +++ b/engine/termops.ml @@ -1179,7 +1179,7 @@ let isGlobalRef sigma c = | Const _ | Ind _ | Construct _ | Var _ -> true | _ -> false -let is_template_polymorphic env sigma f = +let is_template_polymorphic_ind env sigma f = match EConstr.kind sigma f with | Ind (ind, u) -> if not (EConstr.EInstance.is_empty u) then false |