summaryrefslogtreecommitdiff
path: root/src/state.ml
diff options
context:
space:
mode:
authorRobert Norton2018-02-23 17:09:45 +0000
committerRobert Norton2018-02-23 17:09:45 +0000
commit038feaf840206572c155ab0555e7025799cc8776 (patch)
tree7c95669b21b886c40d0eed18b0304c33de933a62 /src/state.ml
parent5b068e01517bb461b8864581ce97799986cb0739 (diff)
parentcd37e0dd062f6af04c56e01103f2046fd390bbe6 (diff)
Merge branch 'sail2' of github.com:rems-project/sail into sail2
Diffstat (limited to 'src/state.ml')
-rw-r--r--src/state.ml2
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]