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