ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 1 1 9 1 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 1 1 1 1 , SrcSpan "tests/examples/BangPatterns.hs" 2 1 2 1 , SrcSpan "tests/examples/BangPatterns.hs" 2 1 2 1 , SrcSpan "tests/examples/BangPatterns.hs" 4 1 4 1 , SrcSpan "tests/examples/BangPatterns.hs" 5 1 5 1 , SrcSpan "tests/examples/BangPatterns.hs" 9 1 9 1 , SrcSpan "tests/examples/BangPatterns.hs" 9 1 9 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 2 1 2 26 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 2 1 2 7 , SrcSpan "tests/examples/BangPatterns.hs" 2 21 2 26 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 2 8 2 20 , srcInfoPoints = [] } "BangPatterns") Nothing Nothing)) [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 1 1 1 30 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 1 1 1 13 , SrcSpan "tests/examples/BangPatterns.hs" 1 27 1 30 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 1 14 1 26 , srcInfoPoints = [] } "BangPatterns" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 1 4 51 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 4 15 4 17 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 1 4 14 , srcInfoPoints = [] } "firstnonspace" ] (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 18 4 51 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 4 28 4 30 ] } (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 18 4 27 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 18 4 21 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 18 4 21 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 18 4 21 , srcInfoPoints = [] } "Ptr"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 22 4 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 22 4 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 22 4 27 , srcInfoPoints = [] } "Word8")))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 31 4 51 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 4 35 4 37 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 31 4 34 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 31 4 34 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 31 4 34 , srcInfoPoints = [] } "Int"))) (TyFun SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 38 4 51 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 4 42 4 44 ] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 38 4 41 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 38 4 41 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 38 4 41 , srcInfoPoints = [] } "Int"))) (TyApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 45 4 51 , srcInfoPoints = [] } (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 45 4 47 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 45 4 47 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 45 4 47 , srcInfoPoints = [] } "IO"))) (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 48 4 51 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 48 4 51 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 4 48 4 51 , srcInfoPoints = [] } "Int"))))))) , FunBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 1 8 84 , srcInfoPoints = [] } [ Match SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 1 8 84 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 1 5 14 , srcInfoPoints = [] } "firstnonspace") [ PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 15 5 19 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 16 5 19 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 16 5 19 , srcInfoPoints = [] } "ptr")) , PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 20 5 22 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 21 5 22 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 21 5 22 , srcInfoPoints = [] } "n")) , PBangPat SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 23 5 25 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 24 5 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 5 24 5 25 , srcInfoPoints = [] } "m")) ] (GuardedRhss SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 5 8 84 , srcInfoPoints = [] } [ GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 5 6 27 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 6 5 6 6 , SrcSpan "tests/examples/BangPatterns.hs" 6 17 6 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 7 6 13 , srcInfoPoints = [] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 7 6 13 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 7 6 8 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 7 6 8 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 7 6 8 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 9 6 11 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 9 6 11 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 9 6 11 , srcInfoPoints = [] } ">="))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 12 6 13 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 12 6 13 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 12 6 13 , srcInfoPoints = [] } "m")))) ] (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 19 6 27 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 19 6 25 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 19 6 25 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 19 6 25 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 26 6 27 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 26 6 27 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 6 26 6 27 , srcInfoPoints = [] } "n")))) , GuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 5 8 84 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 7 5 7 6 , SrcSpan "tests/examples/BangPatterns.hs" 7 17 7 18 ] } [ Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 7 7 16 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 7 7 16 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 7 7 16 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 7 7 16 , srcInfoPoints = [] } "otherwise"))) ] (Do SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 19 8 84 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 7 19 7 21 , SrcSpan "tests/examples/BangPatterns.hs" 7 22 7 22 , SrcSpan "tests/examples/BangPatterns.hs" 8 22 8 22 , SrcSpan "tests/examples/BangPatterns.hs" 9 1 9 0 ] } [ Generator SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 22 7 44 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 7 24 7 26 ] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 22 7 23 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 22 7 23 , srcInfoPoints = [] } "w")) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 27 7 44 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 27 7 42 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 27 7 38 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 27 7 38 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 27 7 38 , srcInfoPoints = [] } "peekElemOff"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 39 7 42 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 39 7 42 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 39 7 42 , srcInfoPoints = [] } "ptr")))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 43 7 44 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 43 7 44 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 7 43 7 44 , srcInfoPoints = [] } "n")))) , Qualifier SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 22 8 84 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 8 22 8 24 , SrcSpan "tests/examples/BangPatterns.hs" 8 40 8 44 , SrcSpan "tests/examples/BangPatterns.hs" 8 71 8 75 ] } (If SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 22 8 84 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 8 22 8 24 , SrcSpan "tests/examples/BangPatterns.hs" 8 40 8 44 , SrcSpan "tests/examples/BangPatterns.hs" 8 71 8 75 ] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 25 8 39 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 25 8 37 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 25 8 37 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 25 8 37 , srcInfoPoints = [] } "isSpaceWord8"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 38 8 39 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 38 8 39 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 38 8 39 , srcInfoPoints = [] } "w")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 70 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 68 , srcInfoPoints = [] } (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 62 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 58 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 58 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 45 8 58 , srcInfoPoints = [] } "firstnonspace"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 59 8 62 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 59 8 62 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 59 8 62 , srcInfoPoints = [] } "ptr")))) (Paren SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 63 8 68 , srcInfoPoints = [ SrcSpan "tests/examples/BangPatterns.hs" 8 63 8 64 , SrcSpan "tests/examples/BangPatterns.hs" 8 67 8 68 ] } (InfixApp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 64 8 67 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 64 8 65 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 64 8 65 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 64 8 65 , srcInfoPoints = [] } "n"))) (QVarOp SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 65 8 66 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 65 8 66 , srcInfoPoints = [] } (Symbol SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 65 8 66 , srcInfoPoints = [] } "+"))) (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 66 8 67 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 66 8 67 , srcInfoPoints = [] } 1 "1"))))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 69 8 70 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 69 8 70 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 69 8 70 , srcInfoPoints = [] } "m")))) (App SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 76 8 84 , srcInfoPoints = [] } (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 76 8 82 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 76 8 82 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 76 8 82 , srcInfoPoints = [] } "return"))) (Var SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 83 8 84 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 83 8 84 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/BangPatterns.hs" 8 83 8 84 , srcInfoPoints = [] } "n"))))) ]) ]) Nothing ] ] , [] )