diff options
Diffstat (limited to 'src/state.ml')
| -rw-r--r-- | src/state.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/state.ml b/src/state.ml index 67eda5b8..5873c472 100644 --- a/src/state.ml +++ b/src/state.ml @@ -238,7 +238,7 @@ let register_refs_lem prefix_recordtype mwords registers = separate hardline setters ^^ hardline ^^ string " Nothing" ^^ hardline ^^ hardline ^^ string "let register_accessors = (get_regval, set_regval)" ^^ hardline ^^ hardline ^^ - string "let liftS = liftState register_accessors" ^^ hardline + string "let liftS s = liftState register_accessors s" ^^ hardline in separate hardline [generic_convs; refs; getters_setters] |