1ParseOk 2 ( Module 3 SrcSpanInfo 4 { srcInfoSpan = 5 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 5 1 6 , srcInfoPoints = 7 [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 1 1 8 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 1 9 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 1 10 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 1 11 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 1 12 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 5 1 5 1 13 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 5 1 5 1 14 ] 15 } 16 Nothing 17 [ LanguagePragma 18 SrcSpanInfo 19 { srcInfoSpan = 20 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 2 4 21 , srcInfoPoints = 22 [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 1 13 23 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 2 1 2 1 24 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 2 1 2 4 25 ] 26 } 27 [ Ident 28 SrcSpanInfo 29 { srcInfoSpan = 30 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 14 1 35 31 , srcInfoPoints = [] 32 } 33 "MultiParamTypeClasses" 34 ] 35 ] 36 [] 37 [ TypeSig 38 SrcSpanInfo 39 { srcInfoSpan = 40 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 9 41 , srcInfoPoints = 42 [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 3 3 5 ] 43 } 44 [ Ident 45 SrcSpanInfo 46 { srcInfoSpan = 47 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 2 48 , srcInfoPoints = [] 49 } 50 "f" 51 ] 52 (TyCon 53 SrcSpanInfo 54 { srcInfoSpan = 55 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 6 3 9 56 , srcInfoPoints = [] 57 } 58 (UnQual 59 SrcSpanInfo 60 { srcInfoSpan = 61 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 6 3 9 62 , srcInfoPoints = [] 63 } 64 (Ident 65 SrcSpanInfo 66 { srcInfoSpan = 67 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 6 3 9 68 , srcInfoPoints = [] 69 } 70 "Int"))) 71 , PatBind 72 SrcSpanInfo 73 { srcInfoSpan = 74 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 6 75 , srcInfoPoints = [] 76 } 77 (PVar 78 SrcSpanInfo 79 { srcInfoSpan = 80 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 2 81 , srcInfoPoints = [] 82 } 83 (Ident 84 SrcSpanInfo 85 { srcInfoSpan = 86 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 2 87 , srcInfoPoints = [] 88 } 89 "f")) 90 (UnGuardedRhs 91 SrcSpanInfo 92 { srcInfoSpan = 93 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 3 4 6 94 , srcInfoPoints = 95 [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 3 4 4 ] 96 } 97 (Lit 98 SrcSpanInfo 99 { srcInfoSpan = 100 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 5 4 6 101 , srcInfoPoints = [] 102 } 103 (Int 104 SrcSpanInfo 105 { srcInfoSpan = 106 SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 5 4 6 107 , srcInfoPoints = [] 108 } 109 4 110 "4"))) 111 Nothing 112 ] 113 , [] 114 ) 115