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/test/test3.sail | |
| parent | 90cf7a21f5de197d30c58b1f1e40f4360f0d5779 (diff) | |
Add definition of ignore to make tests executable
Diffstat (limited to 'src/test/test3.sail')
| -rw-r--r-- | src/test/test3.sail | 2 |
1 files changed, 2 insertions, 0 deletions
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 *) |