aboutsummaryrefslogtreecommitdiffhomepage
path: root/toplevel/metasyntax.ml
diff options
context:
space:
mode:
authorGravatar glondu <glondu@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-09-29 15:11:48 +0000
committerGravatar glondu <glondu@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-09-29 15:11:48 +0000
commitab2a7b0da8adb0e72f7caa2a34c6edd6685ca4b6 (patch)
tree2bd8779bc91b43ce1bdbebc2ef6a00ba84ed5b53 /toplevel/metasyntax.ml
parentc555e8464414a42c33235f31c84545a86290eb31 (diff)
Remove legacy export_* functions
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12365 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel/metasyntax.ml')
-rw-r--r--toplevel/metasyntax.ml6
1 files changed, 0 insertions, 6 deletions
diff --git a/toplevel/metasyntax.ml b/toplevel/metasyntax.ml
index 3595d2dfc..d19a43c8d 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;