diff options
| author | Arnaud Spiwack | 2014-12-23 13:27:10 +0100 |
|---|---|---|
| committer | Arnaud Spiwack | 2014-12-23 13:40:05 +0100 |
| commit | 239fe70ae8a39f5c5619cf88f1ae264c31bda65e (patch) | |
| tree | 739ad87d4c4fb4cf1fe1c4dd7552b6fcb29bd9e9 /tactics | |
| parent | 8e1a7e3e6a4c84db18f6fd5334776489015b368d (diff) | |
Fix compilation error in some configurations.
This was due to the unqualified uses of "Lazy" being disambiguated in different manners. I just changed the constructor name to "Select".
Fixes #3877.
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/tacinterp.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/tacinterp.ml b/tactics/tacinterp.ml index a8da8c81f5..a088070342 100644 --- a/tactics/tacinterp.ml +++ b/tactics/tacinterp.ml @@ -1559,7 +1559,7 @@ and interp_match_successes lz ist s = match lz with | General -> general - | Lazy -> + | Select -> begin (** Only keep the first matching result, we don't backtrack on it *) let s = Proofview.tclONCE s in |