summaryrefslogtreecommitdiff
path: root/src/gen_lib
diff options
context:
space:
mode:
authorBrian Campbell2017-08-23 13:53:59 +0100
committerBrian Campbell2017-08-23 13:53:59 +0100
commitd97c2e366a7b14db53b0107856499b7abd573af8 (patch)
treec2ef6011a91feabe5b46bd64b3e049e4a8713de3 /src/gen_lib
parentfba5902089246ad8b2bf18392259a7fb5cb580b2 (diff)
Update monomorphisation test script
Diffstat (limited to 'src/gen_lib')
-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 ->