diff options
| author | herbelin | 2011-07-16 20:35:23 +0000 |
|---|---|---|
| committer | herbelin | 2011-07-16 20:35:23 +0000 |
| commit | 1ea5bb84b302b8518ad37cef2cb05a52e73ade56 (patch) | |
| tree | 7d5367ec017e01b7d952f7fc91f7677cf418effa /toplevel | |
| parent | fae8ea1520b03578aff7de10d6e59f08bb85ecb6 (diff) | |
This option disables the use of the '{| field := ... |}' notation
when printing.
Signed-off-by: Tom Prince <tom.prince@ualberta.net>
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14284 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/ide_slave.ml | 1 | ||||
| -rw-r--r-- | toplevel/vernacentries.ml | 8 |
2 files changed, 9 insertions, 0 deletions
diff --git a/toplevel/ide_slave.ml b/toplevel/ide_slave.ml index ee231b0445..41f200b4fe 100644 --- a/toplevel/ide_slave.ml +++ b/toplevel/ide_slave.ml @@ -32,6 +32,7 @@ let coqide_known_option table = List.mem table [ ["Printing";"Synth"]; ["Printing";"Notations"]; ["Printing";"All"]; + ["Printing";"Records"]; ["Printing";"Existential";"Instances"]; ["Printing";"Universes"]] diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index 3ce85c4656..c42d7acf64 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -908,6 +908,14 @@ let _ = let _ = declare_bool_option { optsync = true; + optname = "record printing"; + optkey = ["Printing";"Records"]; + optread = (fun () -> !Flags.record_print); + optwrite = (fun b -> Flags.record_print := b) } + +let _ = + declare_bool_option + { optsync = true; optname = "use of virtual machine inside the kernel"; optkey = ["Virtual";"Machine"]; optread = (fun () -> Vconv.use_vm ()); |