Remove outdated comment

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16770 85f007b7-540e-0410-9357-904b9bb8a0f7

1 files changed, 0 insertions, 13 deletions

diff --git a/toplevel/vernac.ml b/toplevel/vernac.ml
index 6051b65a48..45c0f68135 100644
--- a/toplevel/vernac.ml
+++ b/toplevel/vernac.ml
@@ -269,19 +269,6 @@ let rec vernac_com verbosely checknav (loc,com) =
     | v when !just_parsing -> ()
 
     | v -> Stm.process_transaction verbosely (loc,v)
-          (* FIXME elsewhere let rollback =
-            if !Flags.batch_mode then States.without_rollback
-            else States.with_heavy_rollback
-          in
-	  let psh = default_set_timeout () in
-	  try
-            rollback interpfun Cerrors.process_vernac_interp_error v;
-	    restore_timeout psh;
-	  with reraise ->
-            let reraise = Errors.push reraise in
-            restore_timeout psh;
-            raise reraise
-          *)
   in
     try
       checknav loc com;