summaryrefslogtreecommitdiff
path: root/testdata/typeclass.out
diff options
context:
space:
mode:
Diffstat (limited to 'testdata/typeclass.out')
-rw-r--r--testdata/typeclass.out12
1 files changed, 11 insertions, 1 deletions
diff --git a/testdata/typeclass.out b/testdata/typeclass.out
index b74a7e31..aecc4686 100644
--- a/testdata/typeclass.out
+++ b/testdata/typeclass.out
@@ -1,12 +1,21 @@
1main is not found
1------------ desugared source code 2------------ desugared source code
2infix 4 == 3infix 4 ==
4
3infix 4 /= 5infix 4 /=
6
4infix 4 < 7infix 4 <
8
5infixr 3 && 9infixr 3 &&
10
6infixr 2 || 11infixr 2 ||
12
7not = \(a :: _) -> case'Bool (\_ -> _) (_rhs True) (_rhs False) a 13not = \(a :: _) -> case'Bool (\_ -> _) (_rhs True) (_rhs False) a
14
8(&&) = \(a :: _) (b :: _) -> case'Bool (\_ -> _) (_rhs False) (_rhs b) a 15(&&) = \(a :: _) (b :: _) -> case'Bool (\_ -> _) (_rhs False) (_rhs b) a
16
9(||) = \(a :: _) (b :: _) -> case'Bool (\_ -> _) (_rhs b) (_rhs True) a 17(||) = \(a :: _) (b :: _) -> case'Bool (\_ -> _) (_rhs b) (_rhs True) a
18
10'Eq :: Type -> Type 19'Eq :: Type -> Type
11'Eq 20'Eq
12 = \(a :: _) -> match'Bool 21 = \(a :: _) -> match'Bool
@@ -14,6 +23,7 @@ not = \(a :: _) -> case'Bool (\_ -> _) (_rhs True) (_rhs False) a
14 (_rhs 'Unit) 23 (_rhs 'Unit)
15 a 24 a
16 (_rhs ('Empty "no instance of 'Eq on ???")) 25 (_rhs ('Empty "no instance of 'Eq on ???"))
26
17(==) :: forall a . Eq a => a -> a -> Bool 27(==) :: forall a . Eq a => a -> a -> Bool
18(==) 28(==)
19 = \ @a @_ -> match'Bool 29 = \ @a @_ -> match'Bool
@@ -23,8 +33,8 @@ not = \(a :: _) -> case'Bool (\_ -> _) (_rhs True) (_rhs False) a
23 := \(c :: _) (d :: _) -> case'Bool (\_ -> _) (_rhs (not d)) (_rhs d) c) -> b) 33 := \(c :: _) (d :: _) -> case'Bool (\_ -> _) (_rhs (not d)) (_rhs d) c) -> b)
24 a 34 a
25 (_rhs undefined) 35 (_rhs undefined)
36
26(/=) = \(a :: _) (b :: _) -> _rhs (not (a == b)) 37(/=) = \(a :: _) (b :: _) -> _rhs (not (a == b))
27main is not found
28------------ trace 38------------ trace
29not :: Bool -> Bool 39not :: Bool -> Bool
30(&&) :: Bool -> Bool -> Bool 40(&&) :: Bool -> Bool -> Bool