diff options
| author | Arnaud Spiwack | 2014-12-12 16:58:32 +0100 |
|---|---|---|
| committer | Arnaud Spiwack | 2014-12-12 19:23:16 +0100 |
| commit | 180af0dde65e4532cdeb13ec9aa43d8e83f7408f (patch) | |
| tree | 745b35e71e0ba4124cd3418edba60488ce9856b8 /intf | |
| parent | a5ccde6f22deb1a1a2d59d3b532f74c217a05aee (diff) | |
Add Ltac syntax for the [tclIFCATCH] primitive.
[tryif t then t2 else t3] behaves like [t;t2] if [t] has at least one success, or [t3] otherwise. It generalises [t||t3] as failures from [t2] will not be caught.
Diffstat (limited to 'intf')
| -rw-r--r-- | intf/tacexpr.mli | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/intf/tacexpr.mli b/intf/tacexpr.mli index efe62f569c..0c2b754788 100644 --- a/intf/tacexpr.mli +++ b/intf/tacexpr.mli @@ -251,6 +251,10 @@ and 'a gen_tactic_expr = 'a gen_tactic_expr | TacExactlyOnce of 'a gen_tactic_expr + | TacIfThenCatch of + 'a gen_tactic_expr * + 'a gen_tactic_expr * + 'a gen_tactic_expr | TacOrelse of 'a gen_tactic_expr * 'a gen_tactic_expr |