diff options
| author | ppedrot | 2011-11-24 14:18:19 +0000 |
|---|---|---|
| committer | ppedrot | 2011-11-24 14:18:19 +0000 |
| commit | fabae66b541378df3ff0c1e941b38759c19f6129 (patch) | |
| tree | efb605b835ce2d58378b2a15a4211698da3b017a /plugins/extraction | |
| parent | 1f26b8591f3698699ee2143f5244a5d57243e283 (diff) | |
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
Diffstat (limited to 'plugins/extraction')
| -rw-r--r-- | plugins/extraction/table.ml | 3 |
1 files changed, 3 insertions, 0 deletions
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); |