ParseOk (Module (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 1 1 13 1, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 1 1 1 1,SrcSpan "tests/examples/DoubleHashOp.hs" 2 1 2 1,SrcSpan "tests/examples/DoubleHashOp.hs" 2 1 2 1,SrcSpan "tests/examples/DoubleHashOp.hs" 4 1 4 1,SrcSpan "tests/examples/DoubleHashOp.hs" 5 1 5 1,SrcSpan "tests/examples/DoubleHashOp.hs" 7 1 7 1,SrcSpan "tests/examples/DoubleHashOp.hs" 8 1 8 1,SrcSpan "tests/examples/DoubleHashOp.hs" 13 1 13 1,SrcSpan "tests/examples/DoubleHashOp.hs" 13 1 13 1]}) (Just (ModuleHead (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 2 1 2 26, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 2 1 2 7,SrcSpan "tests/examples/DoubleHashOp.hs" 2 21 2 26]}) (ModuleName (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 2 8 2 20, srcInfoPoints = []}) "DoubleHashOp") Nothing Nothing)) [LanguagePragma (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 1 1 1 31, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 1 1 1 13,SrcSpan "tests/examples/DoubleHashOp.hs" 1 28 1 31]}) [Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 1 14 1 27, srcInfoPoints = []}) "UnboxedTuples"]] [] [TypeSig (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 1 4 22, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 4 6 4 8]}) [Symbol (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 1 4 5, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 4 1 4 2,SrcSpan "tests/examples/DoubleHashOp.hs" 4 2 4 4,SrcSpan "tests/examples/DoubleHashOp.hs" 4 4 4 5]}) "##"] (TyFun (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 9 4 22, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 4 11 4 13]}) (TyVar (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 9 4 10, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 9 4 10, srcInfoPoints = []}) "a")) (TyFun (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 14 4 22, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 4 16 4 18]}) (TyVar (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 14 4 15, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 14 4 15, srcInfoPoints = []}) "b")) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 19 4 22, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 19 4 22, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 4 19 4 22, srcInfoPoints = []}) "Int"))))),FunBind (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 1 5 11, srcInfoPoints = []}) [InfixMatch (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 1 5 11, srcInfoPoints = []}) (PVar (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 1 5 2, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 1 5 2, srcInfoPoints = []}) "a")) (Symbol (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 3 5 5, srcInfoPoints = []}) "##") [PVar (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 6 5 7, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 6 5 7, srcInfoPoints = []}) "b")] (UnGuardedRhs (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 8 5 11, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 5 8 5 9]}) (Lit (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 10 5 11, srcInfoPoints = []}) (Int (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 5 10 5 11, srcInfoPoints = []}) 0 "0"))) Nothing],TypeSig (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 1 7 22, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 7 6 7 8]}) [Symbol (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 1 7 5, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 7 1 7 2,SrcSpan "tests/examples/DoubleHashOp.hs" 7 2 7 4,SrcSpan "tests/examples/DoubleHashOp.hs" 7 4 7 5]}) "#*"] (TyFun (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 9 7 22, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 7 11 7 13]}) (TyVar (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 9 7 10, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 9 7 10, srcInfoPoints = []}) "a")) (TyFun (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 14 7 22, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 7 16 7 18]}) (TyVar (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 14 7 15, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 14 7 15, srcInfoPoints = []}) "b")) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 19 7 22, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 19 7 22, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 7 19 7 22, srcInfoPoints = []}) "Int"))))),FunBind (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 1 8 11, srcInfoPoints = []}) [InfixMatch (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 1 8 11, srcInfoPoints = []}) (PVar (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 1 8 2, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 1 8 2, srcInfoPoints = []}) "a")) (Symbol (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 3 8 5, srcInfoPoints = []}) "#*") [PVar (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 6 8 7, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 6 8 7, srcInfoPoints = []}) "b")] (UnGuardedRhs (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 8 8 11, srcInfoPoints = [SrcSpan "tests/examples/DoubleHashOp.hs" 8 8 8 9]}) (Lit (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 10 8 11, srcInfoPoints = []}) (Int (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/DoubleHashOp.hs" 8 10 8 11, srcInfoPoints = []}) 1 "1"))) Nothing]],[Comment False (SrcSpan "tests/examples/DoubleHashOp.hs" 10 1 10 36) " This still does not work though:",Comment False (SrcSpan "tests/examples/DoubleHashOp.hs" 11 1 11 24) " (#) :: a -> b -> Int",Comment False (SrcSpan "tests/examples/DoubleHashOp.hs" 12 1 12 13) " a # b = 2"])