diff options
| author | Matthieu Sozeau | 2013-12-17 16:23:16 +0100 |
|---|---|---|
| committer | Matthieu Sozeau | 2013-12-17 16:23:16 +0100 |
| commit | 5080f91a191aa08bf29790addb5b8614ba8323a8 (patch) | |
| tree | 733d449608a0e392c7033e18d3f699b144ba0948 /plugins/decl_mode | |
| parent | 35e47b6be8d9e97b58464daccc28d179951b5e47 (diff) | |
| parent | 16677f3d4e71b2f971ed36bbbc3b95d8908a1b13 (diff) | |
Merge branch 'trunk' of github.com:coq/coq into trunk
Diffstat (limited to 'plugins/decl_mode')
| -rw-r--r-- | plugins/decl_mode/decl_proof_instr.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/plugins/decl_mode/decl_proof_instr.ml b/plugins/decl_mode/decl_proof_instr.ml index b21037d252..6e53ae6a21 100644 --- a/plugins/decl_mode/decl_proof_instr.ml +++ b/plugins/decl_mode/decl_proof_instr.ml @@ -1456,8 +1456,7 @@ let do_instr raw_instr pts = let { it=gls ; sigma=sigma; } = Proof.V82.subgoals pts in let gl = { it=List.hd gls ; sigma=sigma; } in let env= pf_env gl in - let ist = {ltacvars = Id.Set.empty; ltacrecvars = Id.Map.empty; - gsigma = sigma; genv = env} in + let ist = {ltacvars = Id.Set.empty; ltacrecvars = Id.Map.empty; genv = env} in let glob_instr = intern_proof_instr ist raw_instr in let instr = interp_proof_instr (get_its_info gl) sigma env glob_instr in |