aboutsummaryrefslogtreecommitdiff
path: root/toplevel/vernac.ml
diff options
context:
space:
mode:
authornotin2006-09-12 14:52:07 +0000
committernotin2006-09-12 14:52:07 +0000
commitade5ae3ee5931180211260b943e5095188518c03 (patch)
tree3303546664bf62dcbe65fba0d3083d25497ca46b /toplevel/vernac.ml
parent87722d2a5d9592f08fafa2b4d56c9ba7aadd1033 (diff)
Indentation + svnprop
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9133 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel/vernac.ml')
-rw-r--r--toplevel/vernac.ml12
1 files changed, 6 insertions, 6 deletions
diff --git a/toplevel/vernac.ml b/toplevel/vernac.ml
index f3bc0793f2..746a9a9f4d 100644
--- a/toplevel/vernac.ml
+++ b/toplevel/vernac.ml
@@ -162,12 +162,12 @@ let rec vernac_com interpfun (loc,com) =
| v -> if not !just_parsing then interpfun v
in
- try
- if do_translate () then pr_new_syntax loc (Some com);
- interp com
- with e ->
- Format.set_formatter_out_channel stdout;
- raise (DuringCommandInterp (loc, e))
+ try
+ if do_translate () then pr_new_syntax loc (Some com);
+ interp com
+ with e ->
+ Format.set_formatter_out_channel stdout;
+ raise (DuringCommandInterp (loc, e))
and vernac interpfun input =
vernac_com interpfun (parse_phrase input)