summaryrefslogtreecommitdiff
path: root/src/gen_lib/state.lem
diff options
context:
space:
mode:
Diffstat (limited to 'src/gen_lib/state.lem')
-rw-r--r--src/gen_lib/state.lem2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/gen_lib/state.lem b/src/gen_lib/state.lem
index 4bbb3647..1ca25b74 100644
--- a/src/gen_lib/state.lem
+++ b/src/gen_lib/state.lem
@@ -213,7 +213,7 @@ val barrier : forall 'regs. barrier_kind -> M 'regs unit
let barrier _ = return ()
val footprint : forall 'regs. M 'regs unit
-let footprint = return ()
+let footprint s = return () s
val foreachM_inc : forall 'regs 'vars 'e. (integer * integer * integer) -> 'vars ->