diff options
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/tacinterp.ml | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/proofs/tacinterp.ml b/proofs/tacinterp.ml index cb1fb94148..a68566d728 100644 --- a/proofs/tacinterp.ml +++ b/proofs/tacinterp.ml @@ -915,7 +915,10 @@ and tac_interp lfun lmatch debug ast g = try tactic_of_value (val_interp ist ast) g with | NotTactic -> errorlabstrm "Tacinterp.tac_interp" [<'sTR - "Interpretation gives a non-tactic value">] + "Must be a command or must give a tactic value">] + +(* errorlabstrm "Tacinterp.tac_interp" [<'sTR + "Interpretation gives a non-tactic value">] *) (* match (val_interp (evc,env,lfun,lmatch,(Some g),debug) ast) with | VTactic tac -> (tac g) |