projects
/
ghc-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
beecd0ff22bcd1e933c3f59679483eb312701274
[ghc-hetmet.git]
/
ghc
/
compiler
/
tests
/
deSugar
/
ds030.stderr
1
2
3
================================================================================
4
Desugared:
5
Rec {
6
{-# L #-}
7
d.Num_aHE =
8
PrelBase.$d3
9
{-# L #-}
10
fromInt_aKm =
11
PrelBase.fromInt
12
_@_ PrelBase.Int d.Num_aHE
13
{-# L #-}
14
lit_aKx =
15
let {
16
{-# L #-}
17
ds_dKW =
18
PrelBase.I#
19
3
20
} in
21
fromInt_aKm
22
ds_dKW
23
{-# L #-}
24
fromInt_aKw =
25
fromInt_aKm
26
{-# L #-}
27
lit_aKt =
28
let {
29
{-# L #-}
30
ds_dLb =
31
PrelBase.I#
32
4
33
} in
34
fromInt_aKw
35
ds_dLb
36
{-# L #-}
37
f = _/\_ t{-aHm-} -> \ {-# L #-}
38
x_r3d ->
39
let {
40
{-# L #-}
41
ds_dLw =
42
x_r3d } in
43
let {
44
{-# L #-}
45
fail_dLy =
46
lit_aKt
47
} in
48
case ds_dLw of {
49
PrelBase.: ds_dLG ds_dLF ->
50
fail_dLy;
51
PrelBase.[] ->
52
lit_aKx;
53
}
54
end Rec }