diff options
| author | Gabriel Kerneis | 2014-02-18 17:02:13 +0000 |
|---|---|---|
| committer | Gabriel Kerneis | 2014-02-18 17:02:13 +0000 |
| commit | 02b78a552d92582b54c78560c791bad4f1532fc1 (patch) | |
| tree | aad82a1b125b3c1a8cdf6ca5c71f2003d134057b /src/test/test3.sail | |
| parent | 669ced036bc511f6c75b91a9abb3dd3f607cf0a1 (diff) | |
Remove spurious add infix
Diffstat (limited to 'src/test/test3.sail')
| -rw-r--r-- | src/test/test3.sail | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/test/test3.sail b/src/test/test3.sail index ed30d243..b07ffb7d 100644 --- a/src/test/test3.sail +++ b/src/test/test3.sail @@ -17,7 +17,7 @@ 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 *) +val extern ( nat * nat ) -> nat effect pure (deinfix + ) = "add" (* infix plus *) function nat (deinfix * ) ( (nat) x, (nat) y ) = 42 |