blob: 1cc94f80b84a3c926e0a7886f7e2890f8689cfae (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
==================== Parser AST ====================
(L
{ T23315.hsig:1:1 }
(HsModule
(XModulePs
(EpAnn
(Anchor
{ T23315.hsig:1:1 }
(UnchangedAnchor))
(AnnsModule
[(AddEpAnn AnnSignature (EpaSpan { T23315.hsig:1:1-9 }))
,(AddEpAnn AnnWhere (EpaSpan { T23315.hsig:1:18-22 }))]
[]
(Nothing))
(EpaComments
[]))
(VirtualBraces
(1))
(Nothing)
(Nothing))
(Just
(L
(SrcSpanAnn (EpAnnNotUsed) { T23315.hsig:1:11-16 })
{ModuleName: T23315}))
(Nothing)
[]
[(L
(SrcSpanAnn (EpAnnNotUsed) { T23315.hsig:2:1-12 })
(DocD
(NoExtField)
(DocCommentNext
(L
{ T23315.hsig:2:1-12 }
(WithHsDocIdentifiers
(MultiLineDocString
(HsDocStringNext)
(:|
(L
{ T23315.hsig:2:5-12 }
(HsDocStringChunk
" My unit"))
[]))
[])))))
,(L
(SrcSpanAnn (EpAnn
(Anchor
{ T23315.hsig:3:1-7 }
(UnchangedAnchor))
(AnnListItem
[])
(EpaComments
[])) { T23315.hsig:3:1-7 })
(SigD
(NoExtField)
(TypeSig
(EpAnn
(Anchor
{ T23315.hsig:3:1 }
(UnchangedAnchor))
(AnnSig
(AddEpAnn AnnDcolon (EpaSpan { T23315.hsig:3:3-4 }))
[])
(EpaComments
[]))
[(L
(SrcSpanAnn (EpAnnNotUsed) { T23315.hsig:3:1 })
(Unqual
{OccName: a}))]
(HsWC
(NoExtField)
(L
(SrcSpanAnn (EpAnnNotUsed) { T23315.hsig:3:6-7 })
(HsSig
(NoExtField)
(HsOuterImplicit
(NoExtField))
(L
(SrcSpanAnn (EpAnnNotUsed) { T23315.hsig:3:6-7 })
(HsTupleTy
(EpAnn
(Anchor
{ T23315.hsig:3:6 }
(UnchangedAnchor))
(AnnParen
(AnnParens)
(EpaSpan { T23315.hsig:3:6 })
(EpaSpan { T23315.hsig:3:7 }))
(EpaComments
[]))
(HsBoxedOrConstraintTuple)
[]))))))))
,(L
(SrcSpanAnn (EpAnnNotUsed) { T23315.hsig:4:1-14 })
(DocD
(NoExtField)
(DocCommentPrev
(L
{ T23315.hsig:4:1-14 }
(WithHsDocIdentifiers
(MultiLineDocString
(HsDocStringPrevious)
(:|
(L
{ T23315.hsig:4:5-14 }
(HsDocStringChunk
" More docs"))
[]))
[])))))]))
|