diff options
author | glondu <glondu@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-09-17 15:58:38 +0000 |
---|---|---|
committer | glondu <glondu@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-09-17 15:58:38 +0000 |
commit | f8a790f577366f74645d15e767ce827dfa1f0908 (patch) | |
tree | 1a0482bea0ff9a62525df9a5d73a6bc4dfe5c3d3 /library/libobject.mli | |
parent | 61ccbc81a2f3b4662ed4a2bad9d07d2003dda3a2 (diff) |
Remove useless Liboject.export_function field
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12338 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'library/libobject.mli')
-rw-r--r-- | library/libobject.mli | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/library/libobject.mli b/library/libobject.mli index 6211ab378..834a70c64 100644 --- a/library/libobject.mli +++ b/library/libobject.mli @@ -59,13 +59,6 @@ open Mod_subst rebuild the non volatile content of a section from the data collected by the discharge function - * an export function, to enable optional writing of its contents - to disk (.vo). This function is also the opportunity to remove - redundant information in order to keep .vo size small - - The export function is a little obsolete and will be removed - in the near future... - *) type 'a substitutivity = @@ -79,8 +72,7 @@ type 'a object_declaration = { classify_function : 'a -> 'a substitutivity; subst_function : object_name * substitution * 'a -> 'a; discharge_function : object_name * 'a -> 'a option; - rebuild_function : 'a -> 'a; - export_function : 'a -> 'a option } + rebuild_function : 'a -> 'a } (* The default object is a "Keep" object with empty methods. Object creators are advised to use the construction @@ -112,7 +104,6 @@ val load_object : int -> object_name * obj -> unit val open_object : int -> object_name * obj -> unit val subst_object : object_name * substitution * obj -> obj val classify_object : obj -> obj substitutivity -val export_object : obj -> obj option val discharge_object : object_name * obj -> obj option val rebuild_object : obj -> obj val relax : bool -> unit |