1ParseOk 2 ( Module 3 SrcSpanInfo 4 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 1 1 5 1 5 , srcInfoPoints = 6 [ SrcSpan "tests/examples/GadtStrictness.hs" 1 1 1 1 7 , SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 1 8 , SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 1 9 , SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 1 10 , SrcSpan "tests/examples/GadtStrictness.hs" 5 1 5 1 11 , SrcSpan "tests/examples/GadtStrictness.hs" 5 1 5 1 12 ] 13 } 14 Nothing 15 [ LanguagePragma 16 SrcSpanInfo 17 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 1 1 1 23 18 , srcInfoPoints = 19 [ SrcSpan "tests/examples/GadtStrictness.hs" 1 1 1 13 20 , SrcSpan "tests/examples/GadtStrictness.hs" 1 20 1 23 21 ] 22 } 23 [ Ident 24 SrcSpanInfo 25 { srcInfoSpan = 26 SrcSpan "tests/examples/GadtStrictness.hs" 1 14 1 19 27 , srcInfoPoints = [] 28 } 29 "GADTs" 30 ] 31 ] 32 [] 33 [ GDataDecl 34 SrcSpanInfo 35 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 1 5 0 36 , srcInfoPoints = 37 [ SrcSpan "tests/examples/GadtStrictness.hs" 3 8 3 13 38 , SrcSpan "tests/examples/GadtStrictness.hs" 4 3 4 3 39 , SrcSpan "tests/examples/GadtStrictness.hs" 5 1 5 0 40 ] 41 } 42 (DataType 43 SrcSpanInfo 44 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 5 45 , srcInfoPoints = [] 46 }) 47 Nothing 48 (DHead 49 SrcSpanInfo 50 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 6 3 7 51 , srcInfoPoints = [] 52 } 53 (Ident 54 SrcSpanInfo 55 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 6 3 7 56 , srcInfoPoints = [] 57 } 58 "X")) 59 Nothing 60 [ GadtDecl 61 SrcSpanInfo 62 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 3 4 17 63 , srcInfoPoints = 64 [ SrcSpan "tests/examples/GadtStrictness.hs" 4 5 4 7 ] 65 } 66 (Ident 67 SrcSpanInfo 68 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 3 4 4 69 , srcInfoPoints = [] 70 } 71 "X") 72 Nothing 73 Nothing 74 Nothing 75 (TyFun 76 SrcSpanInfo 77 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 8 4 17 78 , srcInfoPoints = 79 [ SrcSpan "tests/examples/GadtStrictness.hs" 4 13 4 15 ] 80 } 81 (TyBang 82 SrcSpanInfo 83 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 8 4 12 84 , srcInfoPoints = [] 85 } 86 (BangedTy 87 SrcSpanInfo 88 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 8 4 9 89 , srcInfoPoints = [] 90 }) 91 (NoUnpackPragma 92 SrcSpanInfo 93 { srcInfoSpan = SrcSpan "" (-1) (-1) (-1) (-1) 94 , srcInfoPoints = [] 95 }) 96 (TyCon 97 SrcSpanInfo 98 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 9 4 12 99 , srcInfoPoints = [] 100 } 101 (UnQual 102 SrcSpanInfo 103 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 9 4 12 104 , srcInfoPoints = [] 105 } 106 (Ident 107 SrcSpanInfo 108 { srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 9 4 12 109 , srcInfoPoints = [] 110 } 111 "Int")))) 112 (TyCon 113 SrcSpanInfo 114 { srcInfoSpan = 115 SrcSpan "tests/examples/GadtStrictness.hs" 4 16 4 17 116 , srcInfoPoints = [] 117 } 118 (UnQual 119 SrcSpanInfo 120 { srcInfoSpan = 121 SrcSpan "tests/examples/GadtStrictness.hs" 4 16 4 17 122 , srcInfoPoints = [] 123 } 124 (Ident 125 SrcSpanInfo 126 { srcInfoSpan = 127 SrcSpan "tests/examples/GadtStrictness.hs" 4 16 4 17 128 , srcInfoPoints = [] 129 } 130 "X")))) 131 ] 132 [] 133 ] 134 , [] 135 ) 136