summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-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 3cbcd4c8..736b8abc 100644
--- a/src/gen_lib/state.lem
+++ b/src/gen_lib/state.lem
@@ -205,7 +205,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 ->