summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBrian Campbell2017-08-23 13:53:59 +0100
committerBrian Campbell2017-08-23 13:53:59 +0100
commitd97c2e366a7b14db53b0107856499b7abd573af8 (patch)
treec2ef6011a91feabe5b46bd64b3e049e4a8713de3
parentfba5902089246ad8b2bf18392259a7fb5cb580b2 (diff)
Update monomorphisation test script
-rw-r--r--src/gen_lib/state.lem2
-rwxr-xr-xtest/mono/test.sh4
2 files changed, 3 insertions, 3 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 ->
diff --git a/test/mono/test.sh b/test/mono/test.sh
index 153b09f8..0e2ad40b 100755
--- a/test/mono/test.sh
+++ b/test/mono/test.sh
@@ -30,9 +30,9 @@ while read -u 3 TEST ARGS; do
echo "$TEST lem - ocaml"
rm -f -- "$OUTDIR"/*
"$SAILDIR/sail" -lem "$SAILDIR/lib/prelude.sail" "$DIR/$TEST".sail -o "$OUTDIR/testout" $ARGS $@
- "$LEMDIR/bin/lem" -ocaml -lib "$SAILDIR/src/lem_interp" "$SAILDIR/src/gen_lib/sail_values.lem" "$SAILDIR/src/gen_lib/state.lem" testout_embed_types.lem testout_embed_sequential.lem -outdir "$OUTDIR"
+ "$LEMDIR/bin/lem" -ocaml -lib "$SAILDIR/src/lem_interp" "$SAILDIR/src/gen_lib/sail_values.lem" "$SAILDIR/src/gen_lib/state.lem" testout_embed_types_sequential.lem testout_embed_sequential.lem -outdir "$OUTDIR"
cp -- "$DIR"/test.ml "$OUTDIR"
- ocamlc -I "$ZARITH" "$ZARITH/zarith.cma" -dllpath "$ZARITH" -I "$LEMDIR/ocaml-lib" "$LEMDIR/ocaml-lib/extract.cma" -I "$SAILDIR/src/_build/lem_interp" "$SAILDIR/src/_build/lem_interp/extract.cma" sail_values.ml state.ml testout_embed_types.ml testout_embed_sequential.ml test.ml -o test
+ ocamlc -I "$ZARITH" "$ZARITH/zarith.cma" -dllpath "$ZARITH" -I "$LEMDIR/ocaml-lib" "$LEMDIR/ocaml-lib/extract.cma" -I "$SAILDIR/src/_build/lem_interp" "$SAILDIR/src/_build/lem_interp/extract.cma" sail_values.ml state.ml testout_embed_types_sequential.ml testout_embed_sequential.ml test.ml -o test
./test
fi
done