From 2de1c607e1e30a2d0057760fa4357e6adbe58c89 Mon Sep 17 00:00:00 2001 From: gareuselesinge Date: Thu, 12 Sep 2013 12:45:20 +0000 Subject: Remove outdated comment git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16770 85f007b7-540e-0410-9357-904b9bb8a0f7 --- toplevel/vernac.ml | 13 ------------- 1 file changed, 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; -- cgit v1.2.3