diff options
| author | Hugo Herbelin | 2014-08-20 22:30:37 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2014-09-12 10:39:33 +0200 |
| commit | b006f10e7d591417844ffa1f04eeb926d6092d7b (patch) | |
| tree | 9253b32cb1adabafce28f123ef9eb11d4fa122f4 /plugins/Derive | |
| parent | ca300977724a6b065a98c025d400c71f41b9df4b (diff) | |
Uniformisation of the order of arguments env and sigma.
Diffstat (limited to 'plugins/Derive')
| -rw-r--r-- | plugins/Derive/derive.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/Derive/derive.ml b/plugins/Derive/derive.ml index 26bf18a43a..156c9771aa 100644 --- a/plugins/Derive/derive.ml +++ b/plugins/Derive/derive.ml @@ -34,7 +34,7 @@ let start_deriving f suchthat lemma = TCons ( env , sigma , f_type , (fun sigma ef -> let env' = Environ.push_named (f , (Some ef) , f_type) env in let evdref = ref sigma in - let suchthat = Constrintern.interp_type_evars evdref env' suchthat in + let suchthat = Constrintern.interp_type_evars env' evdref suchthat in TCons ( env' , !evdref , suchthat , (fun sigma _ -> TNil sigma)))))) in |