aboutsummaryrefslogtreecommitdiff
path: root/tools
diff options
context:
space:
mode:
Diffstat (limited to 'tools')
-rw-r--r--tools/fake_ide.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/fake_ide.ml b/tools/fake_ide.ml
index 5bfa377f0b..19a82d6ea3 100644
--- a/tools/fake_ide.ml
+++ b/tools/fake_ide.ml
@@ -46,7 +46,7 @@ let store_id = function
let rec erase_ids n =
if n = 0 then
match !ids with
- | [] -> Stateid.initial_state_id
+ | [] -> Stateid.initial
| x :: _ -> x
else match !ids with
| id :: rest -> ids := rest; erase_ids (n-1)