diff options
| author |  Stephane Glondu <steph@glondu.net> | 2008-08-08 13:18:42 +0200 |
|---|---|---|
| committer | Stephane Glondu <steph@glondu.net> | 2008-08-08 13:18:42 +0200 |
| commit | 870075f34dd9fa5792bfbf413afd3b96f17e76a0 (patch) | |
| tree | 0c647056de1832cf1dba5ba58758b9121418e4be /contrib/extraction/table.ml | |
| parent | a0cfa4f118023d35b767a999d5a2ac4b082857b4 (diff) | |
Imported Upstream version 8.2~beta4+dfsgupstream/8.2.beta4+dfsg
Diffstat (limited to 'contrib/extraction/table.ml')
| -rw-r--r-- | contrib/extraction/table.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/contrib/extraction/table.ml b/contrib/extraction/table.ml index abf461c1..10f669e1 100644 --- a/contrib/extraction/table.ml +++ b/contrib/extraction/table.ml @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -(*i $Id: table.ml 10348 2007-12-06 17:36:14Z aspiwack $ i*) +(*i $Id: table.ml 11262 2008-07-24 20:59:29Z letouzey $ i*) open Names open Term @@ -175,6 +175,7 @@ let info_axioms = ref Refset.empty let log_axioms = ref Refset.empty let init_axioms () = info_axioms := Refset.empty; log_axioms := Refset.empty let add_info_axiom r = info_axioms := Refset.add r !info_axioms +let remove_info_axiom r = info_axioms := Refset.remove r !info_axioms let add_log_axiom r = log_axioms := Refset.add r !log_axioms (*s Extraction mode: modular or monolithic *) |