diff options
| author |  gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-04-19 15:12:38 +0000 |
|---|---|---|
| committer | gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-04-19 15:12:38 +0000 |
| commit | 4d4edf9cc4bec63eb9569a5584f73256bd2d9917 (patch) | |
| tree | 7b00422d1373c313e6759f1dfc06dc29a2e57f56 /tools | |
| parent | 440019295b8eaa3caa2ea09f22637611e6045d58 (diff) | |
Fix compilation of fake_ide
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16439 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tools')
| -rw-r--r-- | tools/fake_ide.ml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tools/fake_ide.ml b/tools/fake_ide.ml index 8580bec01..d3b927a59 100644 --- a/tools/fake_ide.ml +++ b/tools/fake_ide.ml @@ -43,10 +43,10 @@ let commands = "INTERPSILENT", (fun s -> eval_call (Serialize.interp (false,false,s))); "INTERP", (fun s -> eval_call (Serialize.interp (false,true,s))); "REWIND", (fun s -> eval_call (Serialize.rewind (int_of_string s))); - "GOALS", (fun _ -> eval_call Serialize.goals); - "HINTS", (fun _ -> eval_call Serialize.hints); - "GETOPTIONS", (fun _ -> eval_call Serialize.get_options); - "STATUS", (fun _ -> eval_call Serialize.status); + "GOALS", (fun _ -> eval_call (Serialize.goals ())); + "HINTS", (fun _ -> eval_call (Serialize.hints ())); + "GETOPTIONS", (fun _ -> eval_call (Serialize.get_options ())); + "STATUS", (fun _ -> eval_call (Serialize.status ())); "INLOADPATH", (fun s -> eval_call (Serialize.inloadpath s)); "MKCASES", (fun s -> eval_call (Serialize.mkcases s)); "#", (fun _ -> raise Comment); |