ParseOk
( Module
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 1 1 31 1
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 1 1 1 1
, SrcSpan "tests/examples/HappyDoAction.hs" 2 1 2 1
, SrcSpan "tests/examples/HappyDoAction.hs" 2 1 2 1
, SrcSpan "tests/examples/HappyDoAction.hs" 4 1 4 1
, SrcSpan "tests/examples/HappyDoAction.hs" 6 1 6 1
, SrcSpan "tests/examples/HappyDoAction.hs" 31 1 31 1
, SrcSpan "tests/examples/HappyDoAction.hs" 31 1 31 1
]
}
(Just
(ModuleHead
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 2 1 2 27
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 2 1 2 7
, SrcSpan "tests/examples/HappyDoAction.hs" 2 22 2 27
]
}
(ModuleName
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 2 8 2 21
, srcInfoPoints = []
}
"HappyDoAction")
Nothing
Nothing))
[ LanguagePragma
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 1 1 1 27
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 1 1 1 13
, SrcSpan "tests/examples/HappyDoAction.hs" 1 24 1 27
]
}
[ Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 1 14 1 23
, srcInfoPoints = []
}
"MagicHash"
]
]
[]
[ TypeSig
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 4 1 4 12
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 4 5 4 7 ]
}
[ Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 4 1 4 4
, srcInfoPoints = []
}
"foo"
]
(TyCon
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 4 8 4 12
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 4 8 4 12
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 4 8 4 12
, srcInfoPoints = []
}
"Int#")))
, FunBind
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 1 30 67
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 24 4 24 9 ]
}
[ Match
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 1 30 67
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 24 4 24 9 ]
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 1 6 14
, srcInfoPoints = []
}
"happyDoAction")
[ PVar
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 15 6 16
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 15 6 16
, srcInfoPoints = []
}
"i")
, PVar
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 17 6 19
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 17 6 19
, srcInfoPoints = []
}
"tk")
, PVar
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 20 6 22
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 6 20 6 22
, srcInfoPoints = []
}
"st")
]
(UnGuardedRhs
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/HappyDoAction.hs" 7 5 23 59
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 7 5 7 6 ]
}
(Case
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 10 7 23 59
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 10 7 10 11
, SrcSpan "tests/examples/HappyDoAction.hs" 10 19 10 21
, SrcSpan "tests/examples/HappyDoAction.hs" 11 9 11 9
, SrcSpan "tests/examples/HappyDoAction.hs" 13 9 13 9
, SrcSpan "tests/examples/HappyDoAction.hs" 15 9 15 9
, SrcSpan "tests/examples/HappyDoAction.hs" 19 9 19 9
, SrcSpan "tests/examples/HappyDoAction.hs" 24 4 24 0
]
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 10 12 10 18
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 10 12 10 18
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 10 12 10 18
, srcInfoPoints = []
}
"action")))
[ Alt
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 11 9 12 39
, srcInfoPoints = []
}
(PLit
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 11 9 11 11
, srcInfoPoints = []
}
(Signless
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 11 9 11 11
, srcInfoPoints = []
})
(PrimInt
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 11 9 11 11
, srcInfoPoints = []
}
0
"0"))
(UnGuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 11 19 12 39
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 11 19 11 21 ]
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 12 22 12 39
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 12 22 12 36
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 12 22 12 33
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 12 22 12 31
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 12 22 12 31
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 12 22 12 31
, srcInfoPoints = []
}
"happyFail")))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 12 32 12 33
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 12 32 12 33
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 12 32 12 33
, srcInfoPoints = []
}
"i"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 12 34 12 36
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 12 34 12 36
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 12 34 12 36
, srcInfoPoints = []
}
"tk"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 12 37 12 39
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 12 37 12 39
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 12 37 12 39
, srcInfoPoints = []
}
"st")))))
Nothing
, Alt
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 13 9 14 41
, srcInfoPoints = []
}
(PLit
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 13 9 13 12
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 13 9 13 10 ]
}
(Negative
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 13 9 13 10
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 13 9 13 10 ]
})
(PrimInt
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 13 10 13 12
, srcInfoPoints = []
}
1
"1"))
(UnGuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 13 19 14 41
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 13 19 13 21 ]
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 14 22 14 41
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 14 22 14 38
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 14 22 14 35
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 14 22 14 33
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 14 22 14 33
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 14 22 14 33
, srcInfoPoints = []
}
"happyAccept")))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 14 34 14 35
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 14 34 14 35
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 14 34 14 35
, srcInfoPoints = []
}
"i"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 14 36 14 38
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 14 36 14 38
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 14 36 14 38
, srcInfoPoints = []
}
"tk"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 14 39 14 41
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 14 39 14 41
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 14 39 14 41
, srcInfoPoints = []
}
"st")))))
Nothing
, Alt
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 15 9 18 76
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 18 22 18 27 ]
}
(PVar
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 15 9 15 10
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 15 9 15 10
, srcInfoPoints = []
}
"n"))
(GuardedRhss
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 15 11 17 53
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 15 11 15 12
, SrcSpan "tests/examples/HappyDoAction.hs" 15 33 15 35
]
}
[ GuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 15 11 17 53
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 15 11 15 12
, SrcSpan "tests/examples/HappyDoAction.hs" 15 33 15 35
]
}
[ Qualifier
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 15 13 15 32
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 15 13 15 14
, SrcSpan "tests/examples/HappyDoAction.hs" 15 31 15 32
]
}
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 15 13 15 32
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 15 13 15 14
, SrcSpan "tests/examples/HappyDoAction.hs" 15 31 15 32
]
}
(InfixApp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 15 14 15 31
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 15 14 15 15
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 15 14 15 15
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
15
14
15
15
, srcInfoPoints = []
}
"n")))
(QVarOp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 15 16 15 18
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 15 16 15 18
, srcInfoPoints = []
}
(Symbol
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
15
16
15
18
, srcInfoPoints = []
}
"<#")))
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 15 19 15 31
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs" 15 19 15 20
, SrcSpan
"tests/examples/HappyDoAction.hs" 15 30 15 31
]
}
(ExpTypeSig
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 15 20 15 30
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs"
15
23
15
25
]
}
(Lit
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
15
20
15
22
, srcInfoPoints = []
}
(PrimInt
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
15
20
15
22
, srcInfoPoints = []
}
0
"0"))
(TyCon
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
15
26
15
30
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
15
26
15
30
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
15
26
15
30
, srcInfoPoints = []
}
"Int#")))))))
]
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 17 22 17 53
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 17 22 17 50
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 17 22 17 47
, srcInfoPoints = []
}
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 17 22 17 45
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs" 17 22 17 23
, SrcSpan
"tests/examples/HappyDoAction.hs" 17 44 17 45
]
}
(InfixApp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 17 23 17 44
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
17
23
17
37
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
17
23
17
37
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
17
23
17
37
, srcInfoPoints = []
}
"happyReduceArr")))
(QVarOp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
17
38
17
39
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
17
38
17
39
, srcInfoPoints = []
}
(Symbol
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
17
38
17
39
, srcInfoPoints = []
}
"!")))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
17
40
17
44
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
17
40
17
44
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
17
40
17
44
, srcInfoPoints = []
}
"rule")))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 17 46 17 47
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 17 46 17 47
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
17
46
17
47
, srcInfoPoints = []
}
"i"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 17 48 17 50
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 17 48 17 50
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 17 48 17 50
, srcInfoPoints = []
}
"tk"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 17 51 17 53
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 17 51 17 53
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 17 51 17 53
, srcInfoPoints = []
}
"st"))))
])
(Just
(BDecls
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 18 28 18 76
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 18 28 18 28
, SrcSpan "tests/examples/HappyDoAction.hs" 19 9 19 0
]
}
[ PatBind
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 18 28 18 76
, srcInfoPoints = []
}
(PVar
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 18 28 18 32
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 18 28 18 32
, srcInfoPoints = []
}
"rule"))
(UnGuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 18 33 18 76
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 18 33 18 34 ]
}
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 18 35 18 76
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs" 18 35 18 36
, SrcSpan
"tests/examples/HappyDoAction.hs" 18 75 18 76
]
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 18 36 18 75
, srcInfoPoints = []
}
(Con
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 18 36 18 38
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
36
18
38
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
36
18
38
, srcInfoPoints = []
}
"I#")))
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 18 39 18 75
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs"
18
39
18
40
, SrcSpan
"tests/examples/HappyDoAction.hs"
18
74
18
75
]
}
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
40
18
74
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs"
18
40
18
41
, SrcSpan
"tests/examples/HappyDoAction.hs"
18
73
18
74
]
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
41
18
73
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
41
18
51
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
41
18
51
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
41
18
51
, srcInfoPoints = []
}
"negateInt#")))
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
52
18
73
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs"
18
52
18
53
, SrcSpan
"tests/examples/HappyDoAction.hs"
18
72
18
73
]
}
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
53
18
72
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs"
18
53
18
54
, SrcSpan
"tests/examples/HappyDoAction.hs"
18
71
18
72
]
}
(InfixApp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
54
18
71
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
54
18
55
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
54
18
55
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
54
18
55
, srcInfoPoints = []
}
"n")))
(QVarOp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
56
18
58
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
56
18
58
, srcInfoPoints = []
}
(Symbol
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
56
18
58
, srcInfoPoints = []
}
"+#")))
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
59
18
71
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs"
18
59
18
60
, SrcSpan
"tests/examples/HappyDoAction.hs"
18
70
18
71
]
}
(ExpTypeSig
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
60
18
70
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs"
18
63
18
65
]
}
(Lit
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
60
18
62
, srcInfoPoints = []
}
(PrimInt
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
60
18
62
, srcInfoPoints = []
}
1
"1"))
(TyCon
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
66
18
70
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
66
18
70
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
18
66
18
70
, srcInfoPoints = []
}
"Int#"))))))))))))))
Nothing
]))
, Alt
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 19 9 23 59
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 23 22 23 27 ]
}
(PVar
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 19 9 19 10
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 19 9 19 10
, srcInfoPoints = []
}
"n"))
(UnGuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 19 19 22 50
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 19 19 19 21 ]
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 50
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 47
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 44
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 22 22 22 42
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 22 22 22 32
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 22 22 22 32
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
22
22
22
32
, srcInfoPoints = []
}
"happyShift")))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 22 33 22 42
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 22 33 22 42
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
22
33
22
42
, srcInfoPoints = []
}
"new_state"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 22 43 22 44
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 22 43 22 44
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 22 43 22 44
, srcInfoPoints = []
}
"i"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 22 45 22 47
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 22 45 22 47
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 22 45 22 47
, srcInfoPoints = []
}
"tk"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 22 48 22 50
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 22 48 22 50
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 22 48 22 50
, srcInfoPoints = []
}
"st")))))
(Just
(BDecls
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 23 28 23 59
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 23 28 23 28
, SrcSpan "tests/examples/HappyDoAction.hs" 24 4 24 0
]
}
[ PatBind
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 23 28 23 59
, srcInfoPoints = []
}
(PVar
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 23 28 23 37
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 23 28 23 37
, srcInfoPoints = []
}
"new_state"))
(UnGuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 23 38 23 59
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 23 38 23 39 ]
}
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 23 40 23 59
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs" 23 40 23 41
, SrcSpan
"tests/examples/HappyDoAction.hs" 23 58 23 59
]
}
(InfixApp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 23 41 23 58
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 23 41 23 42
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
23
41
23
42
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
23
41
23
42
, srcInfoPoints = []
}
"n")))
(QVarOp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 23 43 23 45
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
23
43
23
45
, srcInfoPoints = []
}
(Symbol
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
23
43
23
45
, srcInfoPoints = []
}
"-#")))
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 23 46 23 58
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs"
23
46
23
47
, SrcSpan
"tests/examples/HappyDoAction.hs"
23
57
23
58
]
}
(ExpTypeSig
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
23
47
23
57
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs"
23
50
23
52
]
}
(Lit
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
23
47
23
49
, srcInfoPoints = []
}
(PrimInt
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
23
47
23
49
, srcInfoPoints = []
}
1
"1"))
(TyCon
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
23
53
23
57
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
23
53
23
57
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
23
53
23
57
, srcInfoPoints = []
}
"Int#"))))))))
Nothing
]))
]))
(Just
(BDecls
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 10 30 67
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 24 10 24 10
, SrcSpan "tests/examples/HappyDoAction.hs" 25 10 25 10
, SrcSpan "tests/examples/HappyDoAction.hs" 26 10 26 10
, SrcSpan "tests/examples/HappyDoAction.hs" 29 10 29 10
, SrcSpan "tests/examples/HappyDoAction.hs" 31 1 31 0
]
}
[ PatBind
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 10 24 55
, srcInfoPoints = []
}
(PVar
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 10 24 13
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 10 24 13
, srcInfoPoints = []
}
"off"))
(UnGuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 17 24 55
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 24 17 24 18 ]
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 19 24 55
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 19 24 52
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 19 24 36
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 19 24 36
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 24 19 24 36
, srcInfoPoints = []
}
"indexShortOffAddr")))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 37 24 52
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 37 24 52
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 24 37 24 52
, srcInfoPoints = []
}
"happyActOffsets"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 53 24 55
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 53 24 55
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 24 53 24 55
, srcInfoPoints = []
}
"st")))))
Nothing
, PatBind
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 10 25 29
, srcInfoPoints = []
}
(PVar
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 10 25 15
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 10 25 15
, srcInfoPoints = []
}
"off_i"))
(UnGuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 17 25 29
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 25 17 25 18 ]
}
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 19 25 29
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 25 19 25 20
, SrcSpan "tests/examples/HappyDoAction.hs" 25 28 25 29
]
}
(InfixApp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 20 25 28
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 20 25 23
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 20 25 23
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 25 20 25 23
, srcInfoPoints = []
}
"off")))
(QVarOp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 24 25 26
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 24 25 26
, srcInfoPoints = []
}
(Symbol
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 25 24 25 26
, srcInfoPoints = []
}
"+#")))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 27 25 28
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 25 27 25 28
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 25 27 25 28
, srcInfoPoints = []
}
"i"))))))
Nothing
, PatBind
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 26 10 28 30
, srcInfoPoints = []
}
(PVar
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 26 10 26 15
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 26 10 26 15
, srcInfoPoints = []
}
"check"))
(UnGuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 26 17 28 30
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 26 17 26 18 ]
}
(If
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 26 19 28 30
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 26 19 26 21
, SrcSpan "tests/examples/HappyDoAction.hs" 27 20 27 24
, SrcSpan "tests/examples/HappyDoAction.hs" 28 20 28 24
]
}
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 26 22 26 46
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 26 22 26 23
, SrcSpan "tests/examples/HappyDoAction.hs" 26 45 26 46
]
}
(InfixApp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 26 23 26 45
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 26 23 26 28
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 26 23 26 28
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 26 23 26 28
, srcInfoPoints = []
}
"off_i")))
(QVarOp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 26 29 26 32
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 26 29 26 32
, srcInfoPoints = []
}
(Symbol
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 26 29 26 32
, srcInfoPoints = []
}
">=#")))
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 26 33 26 45
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 26 33 26 34
, SrcSpan "tests/examples/HappyDoAction.hs" 26 44 26 45
]
}
(ExpTypeSig
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 26 34 26 44
, srcInfoPoints =
[ SrcSpan
"tests/examples/HappyDoAction.hs" 26 37 26 39
]
}
(Lit
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 26 34 26 36
, srcInfoPoints = []
}
(PrimInt
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
26
34
26
36
, srcInfoPoints = []
}
0
"0"))
(TyCon
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 26 40 26 44
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
26
40
26
44
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
26
40
26
44
, srcInfoPoints = []
}
"Int#")))))))
(Paren
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 27 25 27 68
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 27 25 27 26
, SrcSpan "tests/examples/HappyDoAction.hs" 27 67 27 68
]
}
(InfixApp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 27 26 27 67
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 27 26 27 60
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 27 26 27 54
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 27 26 27 43
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
27
26
27
43
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
27
26
27
43
, srcInfoPoints = []
}
"indexShortOffAddr")))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 27 44 27 54
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
27
44
27
54
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
27
44
27
54
, srcInfoPoints = []
}
"happyCheck"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 27 55 27 60
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 27 55 27 60
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs"
27
55
27
60
, srcInfoPoints = []
}
"off_i"))))
(QVarOp
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 27 61 27 64
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 27 61 27 64
, srcInfoPoints = []
}
(Symbol
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 27 61 27 64
, srcInfoPoints = []
}
"==#")))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 27 66 27 67
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 27 66 27 67
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 27 66 27 67
, srcInfoPoints = []
}
"i")))))
(Con
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 28 25 28 30
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 28 25 28 30
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 28 25 28 30
, srcInfoPoints = []
}
"False")))))
Nothing
, PatBind
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 10 30 67
, srcInfoPoints = []
}
(PVar
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 10 29 16
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 10 29 16
, srcInfoPoints = []
}
"action"))
(GuardedRhss
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 17 30 67
, srcInfoPoints = []
}
[ GuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 17 29 65
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 29 17 29 18
, SrcSpan "tests/examples/HappyDoAction.hs" 29 29 29 30
]
}
[ Qualifier
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 19 29 24
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 19 29 24
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 19 29 24
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 29 19 29 24
, srcInfoPoints = []
}
"check")))
]
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 31 29 65
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 31 29 59
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 31 29 48
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 29 31 29 48
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 29 31 29 48
, srcInfoPoints = []
}
"indexShortOffAddr")))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 49 29 59
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 29 49 29 59
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 29 49 29 59
, srcInfoPoints = []
}
"happyTable"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 60 29 65
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 29 60 29 65
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 29 60 29 65
, srcInfoPoints = []
}
"off_i"))))
, GuardedRhs
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 30 17 30 67
, srcInfoPoints =
[ SrcSpan "tests/examples/HappyDoAction.hs" 30 17 30 18
, SrcSpan "tests/examples/HappyDoAction.hs" 30 29 30 30
]
}
[ Qualifier
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 30 19 30 28
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 30 19 30 28
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 30 19 30 28
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 30 19 30 28
, srcInfoPoints = []
}
"otherwise")))
]
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 30 31 30 67
, srcInfoPoints = []
}
(App
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 30 31 30 64
, srcInfoPoints = []
}
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 30 31 30 48
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 30 31 30 48
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 30 31 30 48
, srcInfoPoints = []
}
"indexShortOffAddr")))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 30 49 30 64
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 30 49 30 64
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 30 49 30 64
, srcInfoPoints = []
}
"happyDefActions"))))
(Var
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 30 65 30 67
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan =
SrcSpan "tests/examples/HappyDoAction.hs" 30 65 30 67
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan =
SrcSpan
"tests/examples/HappyDoAction.hs" 30 65 30 67
, srcInfoPoints = []
}
"st"))))
])
Nothing
]))
]
]
, [ Comment
True
(SrcSpan "tests/examples/HappyDoAction.hs" 7 7 7 20)
" nothing "
, Comment
True
(SrcSpan "tests/examples/HappyDoAction.hs" 11 22 11 35)
" nothing "
, Comment
True
(SrcSpan "tests/examples/HappyDoAction.hs" 13 22 13 35)
" nothing "
, Comment
True
(SrcSpan "tests/examples/HappyDoAction.hs" 15 36 15 49)
" nothing "
, Comment
True
(SrcSpan "tests/examples/HappyDoAction.hs" 19 22 19 35)
" nothing "
]
)