diff options
| author |  corbinea <corbinea@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-01-17 15:58:50 +0000 |
|---|---|---|
| committer | corbinea <corbinea@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-01-17 15:58:50 +0000 |
| commit | 6a018defe4db779522f6ab6ae31f04adb886d49c (patch) | |
| tree | 612b6495550f87371b35fbc1963af5c908bc5121 /parsing/ppdecl_proof.ml | |
| parent | eb28d2cbb17543389d41584db7528a3fc34c0bd9 (diff) | |
fixed script printing
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10445 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing/ppdecl_proof.ml')
| -rw-r--r-- | parsing/ppdecl_proof.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/ppdecl_proof.ml b/parsing/ppdecl_proof.ml index 9e3de9838..ab912cca8 100644 --- a/parsing/ppdecl_proof.ml +++ b/parsing/ppdecl_proof.ml @@ -155,7 +155,7 @@ let rec pr_bare_proof_instr _then _thus env = function | Pcast (id,typ) -> str "reconsider" ++ spc () ++ pr_or_thesis (fun _ -> pr_id) env id ++ spc () ++ - str "as" ++ (pr_constr env typ) + str "as" ++ spc () ++ (pr_constr env typ) | Psuppose hyps -> str "suppose" ++ print_hyps pr_constr _I env false false "we have" hyps |