diff options
| author | ppedrot | 2011-11-25 18:12:41 +0000 |
|---|---|---|
| committer | ppedrot | 2011-11-25 18:12:41 +0000 |
| commit | 5c995f9bf8408662c23079e19d1b285ef814e8d9 (patch) | |
| tree | 753ee04cc68ec47bfa01d2a9fee6c19401395820 /tools | |
| parent | 90aab584680d4fab9286eafe0a2e918df8889c53 (diff) | |
Added an API call to retrieve and change the option state
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14731 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tools')
| -rw-r--r-- | tools/fake_ide.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tools/fake_ide.ml b/tools/fake_ide.ml index e06ebb78e8..f2255981a7 100644 --- a/tools/fake_ide.ml +++ b/tools/fake_ide.ml @@ -32,6 +32,8 @@ let commands = "INTERP", (fun s -> eval_call (Ide_intf.interp (false,true,s))); "REWIND", (fun s -> eval_call (Ide_intf.rewind (int_of_string s))); "GOALS", (fun _ -> eval_call Ide_intf.goals); + "HINTS", (fun _ -> eval_call Ide_intf.hints); + "GETOPTIONS", (fun _ -> eval_call Ide_intf.get_options); "STATUS", (fun _ -> eval_call Ide_intf.status); "INLOADPATH", (fun s -> eval_call (Ide_intf.inloadpath s)); "MKCASES", (fun s -> eval_call (Ide_intf.mkcases s)); |