summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/test/test1.sail2
-rw-r--r--src/test/test3.sail2
2 files changed, 4 insertions, 0 deletions
diff --git a/src/test/test1.sail b/src/test/test1.sail
index da9e43fb..34210f97 100644
--- a/src/test/test1.sail
+++ b/src/test/test1.sail
@@ -13,6 +13,8 @@ let bool e = true
let bit v = bitzero
let ( bit [ 32 ] ) v1 = 0b101
+function unit ignore(x) = ()
+
(* scattered function definition and union definition *)
scattered typedef ast = const union
scattered function ast f
diff --git a/src/test/test3.sail b/src/test/test3.sail
index e4844204..154ce5b6 100644
--- a/src/test/test3.sail
+++ b/src/test/test3.sail
@@ -6,6 +6,8 @@ val nat -> nat effect { wmem , rmem } MEM
val nat -> nat effect { wmem , rmem } MEM_GPU
val ( nat * nat ) -> nat effect { wmem , rmem } MEM_SIZE
+function unit ignore(x) = ()
+
(* extern functions *)
val extern ( nat * nat ) -> nat effect pure add = "add"
val extern ( nat * nat ) -> nat effect pure (deinfix + ) = "add_infix" (* infix plus *)