diff options
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/indschemes.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/toplevel/indschemes.ml b/toplevel/indschemes.ml index 3c06471128..1cd00068b3 100644 --- a/toplevel/indschemes.ml +++ b/toplevel/indschemes.ml @@ -60,8 +60,8 @@ let _ = { optsync = true; optname = "automatic declaration of case analysis schemes"; optkey = ["Case";"Analysis";"Schemes"]; - optread = (fun () -> !elim_flag) ; - optwrite = (fun b -> elim_flag := b) } + optread = (fun () -> !case_flag) ; + optwrite = (fun b -> case_flag := b) } let eq_flag = ref true let _ = |