From ab2a7b0da8adb0e72f7caa2a34c6edd6685ca4b6 Mon Sep 17 00:00:00 2001
From: glondu
Date: Tue, 29 Sep 2009 15:11:48 +0000
Subject: Remove legacy export_* functions

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12365 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 toplevel/metasyntax.ml | 6 ------
 1 file changed, 6 deletions(-)

(limited to 'toplevel')

diff --git a/toplevel/metasyntax.ml b/toplevel/metasyntax.ml
index 3595d2dfc0..d19a43c8df 100644
--- a/toplevel/metasyntax.ml
+++ b/toplevel/metasyntax.ml
@@ -683,9 +683,6 @@ let subst_syntax_extension (_,subst,(local,sy)) =
 let classify_syntax_definition (local,_ as o) =
   if local then Dispose else Substitute o
 
-let export_syntax_definition (local,_ as o) =
-  if local then None else Some o
-
 let (inSyntaxExtension, outSyntaxExtension) =
   declare_object {(default_object "SYNTAX-EXTENSION") with
        open_function = (fun i o -> if i=1 then cache_syntax_extension o);
@@ -874,9 +871,6 @@ let subst_notation (_,subst,(lc,scope,pat,b,ndf)) =
 let classify_notation (local,_,_,_,_ as o) =
   if local then Dispose else Substitute o
 
-let export_notation (local,_,_,_,_ as o) =
-  if local then None else Some o
-
 let (inNotation, outNotation) =
   declare_object {(default_object "NOTATION") with
        open_function = open_notation;
-- 
cgit v1.2.3