From b5d11e695f935bfc28f833baaa481d604009db33 Mon Sep 17 00:00:00 2001
From: letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7>
Date: Sat, 3 Nov 2001 14:29:15 +0000
Subject: Creation de Recursive Extarction Module

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2152 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 contrib/extraction/Extraction.v | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'contrib/extraction/Extraction.v')

diff --git a/contrib/extraction/Extraction.v b/contrib/extraction/Extraction.v
index b8c7eeb9a..7153d652a 100644
--- a/contrib/extraction/Extraction.v
+++ b/contrib/extraction/Extraction.v
@@ -29,6 +29,13 @@ Grammar vernac vernac : ast :=
 | haskell_extr_module 
      [ "Haskell" "Extraction" "Module" identarg($m) "." ]
   -> [ (ExtractionModule "haskell" $m) ]
+| rec_extr_module 
+     [ "Recursive" "Extraction" "Module" identarg($m) "." ]
+  -> [ (RecursiveExtractionModule "ocaml" $m) ]
+| rec_haskell_extr_module 
+     [ "Haskell" "Recursive" "Extraction" "Module" identarg($m) "." ]
+  -> [ (RecursiveExtractionModule "haskell" $m) ]
+
 
 (* Custum inlining directives *)
 | inline_constant
-- 
cgit v1.2.3