ParseOk (Module (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 1 1 4 1, srcInfoPoints = [SrcSpan "tests/examples/UnboxedSingleton.hs" 1 1 1 1,SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 1,SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 1,SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 1,SrcSpan "tests/examples/UnboxedSingleton.hs" 4 1 4 1,SrcSpan "tests/examples/UnboxedSingleton.hs" 4 1 4 1]}) Nothing [LanguagePragma (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 1 1 1 31, srcInfoPoints = [SrcSpan "tests/examples/UnboxedSingleton.hs" 1 1 1 13,SrcSpan "tests/examples/UnboxedSingleton.hs" 1 28 1 31]}) [Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 1 14 1 27, srcInfoPoints = []}) "UnboxedTuples"]] [] [FunBind (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 16, srcInfoPoints = []}) [Match (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 16, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 1 3 4, srcInfoPoints = []}) "foo") [PVar (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 5 3 6, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 5 3 6, srcInfoPoints = []}) "a")] (UnGuardedRhs (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 7 3 16, srcInfoPoints = [SrcSpan "tests/examples/UnboxedSingleton.hs" 3 7 3 8]}) (Tuple (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 9 3 16, srcInfoPoints = [SrcSpan "tests/examples/UnboxedSingleton.hs" 3 9 3 11,SrcSpan "tests/examples/UnboxedSingleton.hs" 3 14 3 16]}) Unboxed [Var (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 12 3 13, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 12 3 13, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/UnboxedSingleton.hs" 3 12 3 13, srcInfoPoints = []}) "a"))])) Nothing]],[Comment False (SrcSpan "tests/examples/UnboxedSingleton.hs" 2 1 2 33) " See e.g. GHC.Prim.indexArray#"])