diff options
| author | sacerdot | 2004-09-29 14:51:29 +0000 |
|---|---|---|
| committer | sacerdot | 2004-09-29 14:51:29 +0000 |
| commit | a33f08f8060f99a6ccc33f049ea3c52fc028b3c0 (patch) | |
| tree | 60aa93c22efed3c76be3eee3fc3a1cd82cfc7eda /tactics/equality.ml | |
| parent | c3a4c70688db675c79878df33b4210a4315baf54 (diff) | |
New syntax
"setoid_rewrite dir term generate side conditions constr_list"
to specify a list of side conditions that must be a subset of the generated
new goals. Used to disambiguate in case of multiple set of generated
side conditions.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6157 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics/equality.ml')
| -rw-r--r-- | tactics/equality.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/equality.ml b/tactics/equality.ml index 7b74f6e480..03dedf7f9e 100644 --- a/tactics/equality.ml +++ b/tactics/equality.ml @@ -58,7 +58,7 @@ let general_rewrite_bindings lft2rgt (c,l) gl = match match_with_equation t with | None -> if l = NoBindings - then general_s_rewrite lft2rgt c gl + then general_s_rewrite lft2rgt c [] gl else error "The term provided does not end with an equation" | Some (hdcncl,_) -> let hdcncls = string_of_inductive hdcncl in |