diff options
Diffstat (limited to 'compiler/ilxGen/tests/test3.hs')
| -rw-r--r-- | compiler/ilxGen/tests/test3.hs | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/compiler/ilxGen/tests/test3.hs b/compiler/ilxGen/tests/test3.hs deleted file mode 100644 index 0254ee41c4..0000000000 --- a/compiler/ilxGen/tests/test3.hs +++ /dev/null @@ -1,24 +0,0 @@ -foreign import "ilxHello" unsafe ilxHello :: IO () -foreign import "ilxBad" unsafe ilxBad :: IO () - -class Eqq a where - eqq :: a -> Bool - eqq2 :: a -> Bool - --- x /= y = not (x == y) --- x == y = not (x /= y) --- x /= y = True - eqq x = False - eqq2 x = True - - -data Unit = Unit - -instance Eqq Unit --- where --- eqq Unit = True --- eqq2 Unit = False - -choose x = if eqq x then ilxHello else if eqq2 x then ilxBad else ilxBad - -main = choose Unit |