From 51a2b40567bd48c19c2103f6c19ae39d3215ca86 Mon Sep 17 00:00:00 2001
From: pboutill
Date: Tue, 31 Jan 2012 16:17:12 +0000
Subject: Fix camlp4 compilation

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14951 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 parsing/g_vernac.ml4        | 2 +-
 plugins/subtac/g_subtac.ml4 | 1 +
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/parsing/g_vernac.ml4 b/parsing/g_vernac.ml4
index f6b31f5478..d056149897 100644
--- a/parsing/g_vernac.ml4
+++ b/parsing/g_vernac.ml4
@@ -813,7 +813,7 @@ GEXTEND Gram
     [ [ IDENT "Eval"; r = Tactic.red_expr; "in"; c = lconstr ->
           fun g -> VernacCheckMayEval (Some r, g, c)
       | IDENT "Compute"; c = lconstr ->
-	  fun g -> VernacCheckMayEval (Some Glob_term.CbvVm None, g, c)
+	  fun g -> VernacCheckMayEval (Some (Glob_term.CbvVm None), g, c)
       | IDENT "Check"; c = lconstr ->
 	  fun g -> VernacCheckMayEval (None, g, c) ] ]
   ;
diff --git a/plugins/subtac/g_subtac.ml4 b/plugins/subtac/g_subtac.ml4
index 6aee94bae3..c37f0db5ad 100644
--- a/plugins/subtac/g_subtac.ml4
+++ b/plugins/subtac/g_subtac.ml4
@@ -43,6 +43,7 @@ end
 open Glob_term
 open SubtacGram
 open Util
+open Tok
 open Pcoq
 open Prim
 open Constr
-- 
cgit v1.2.3