diff options
| author | Gabriel Kerneis | 2014-02-13 17:22:55 +0000 |
|---|---|---|
| committer | Gabriel Kerneis | 2014-02-13 17:22:55 +0000 |
| commit | 002df035df284a8a3f0dc1c724d8ae156c78332c (patch) | |
| tree | eb6822cf185b030edc03f7a142210cc404193322 /src | |
| parent | 90cf7a21f5de197d30c58b1f1e40f4360f0d5779 (diff) | |
Add definition of ignore to make tests executable
Diffstat (limited to 'src')
| -rw-r--r-- | src/test/test1.sail | 2 | ||||
| -rw-r--r-- | src/test/test3.sail | 2 |
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 *) |