From fabae66b541378df3ff0c1e941b38759c19f6129 Mon Sep 17 00:00:00 2001
From: ppedrot
Date: Thu, 24 Nov 2011 14:18:19 +0000
Subject: Added a DEPRECATED flag in declaration of options. For now only two
 options are declared as such, but I suspect Coq to contain some more.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14724 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 plugins/extraction/table.ml | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'plugins/extraction')

diff --git a/plugins/extraction/table.ml b/plugins/extraction/table.ml
index 75584ead38..567b0727cd 100644
--- a/plugins/extraction/table.ml
+++ b/plugins/extraction/table.ml
@@ -398,6 +398,7 @@ let my_bool_option name initval =
   let access = fun () -> !flag in
   let _ = declare_bool_option
     {optsync = true;
+     optdepr = false;
      optname = "Extraction "^name;
      optkey = ["Extraction"; name];
      optread = access;
@@ -470,6 +471,7 @@ let optims () = !opt_flag_ref
 
 let _ = declare_bool_option
 	  {optsync = true;
+           optdepr = false;
 	   optname = "Extraction Optimize";
 	   optkey = ["Extraction"; "Optimize"];
 	   optread = (fun () -> !int_flag_ref <> 0);
@@ -477,6 +479,7 @@ let _ = declare_bool_option
 
 let _ = declare_int_option
           { optsync = true;
+            optdepr = false;
             optname = "Extraction Flag";
             optkey = ["Extraction";"Flag"];
             optread = (fun _ -> Some !int_flag_ref);
-- 
cgit v1.2.3