diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2017-10-20 11:05:25 +0200 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2017-10-20 11:05:25 +0200 |
commit | 7e5a0e348e9686b7d75285f1ae71406a82a19170 (patch) | |
tree | 2e54113fbfeb2c70860e78e5f3e503f41bc7c804 /vernac/record.ml | |
parent | 8492fa8d2aa0e77b7c571956ee21097977b1df15 (diff) | |
parent | 26f216653aed171a70513d3f5ece059ab30bcd73 (diff) |
Merge PR #1120: Fixing BZ#5762 (supporting implicit arguments in "where" clause of an inductive definitions
Diffstat (limited to 'vernac/record.ml')
-rw-r--r-- | vernac/record.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vernac/record.ml b/vernac/record.ml index 18e7796ca..9a8657c3c 100644 --- a/vernac/record.ml +++ b/vernac/record.ml @@ -72,7 +72,7 @@ let interp_fields_evars env evars impls_env nots l = | None -> LocalAssum (i,t') | Some b' -> LocalDef (i,b',t') in - List.iter (Metasyntax.set_notation_for_interpretation impls) no; + List.iter (Metasyntax.set_notation_for_interpretation env impls) no; (EConstr.push_rel d env, impl :: uimpls, d::params, impls)) (env, [], [], impls_env) nots l |