[(Data.Attoparsec.ByteString.Internal.$WT [InlPrag=INLINE] :: forall s. GHC.Types.Int -> s -> Data.Attoparsec.ByteString.Internal.T s [GblId[DataConWrapper], Arity=2, Caf=NoCafRefs, Str=DmdType SLm, Unf=OtherCon []] = \r [tpl_snXX tpl_snY1] case tpl_snXX of _ { GHC.Types.I# tpl_snY0 [Occ=Once] -> Data.Attoparsec.ByteString.Internal.T [tpl_snY0 tpl_snY1]; };, [(Data.Attoparsec.ByteString.Internal.$WT, [])]), (a :: forall a. Data.Attoparsec.ByteString.Internal.Parser a -> GHC.Base.String -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString a r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=7, Caf=NoCafRefs, Str=DmdType C(C(C(C(C(S)))))LLLLLL, Unf=OtherCon []] = sat-only \r [eta eta1 i0 a0 m0 kf ks] let { sat_soBY :: Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r [LclId] = \r [i a16 m strs msg] let { sat_soBX :: [GHC.Base.String] [LclId] = NO_CCS :! [eta1 strs]; } in kf i a16 m sat_soBX msg; } in eta i0 a0 m0 sat_soBY ks;, [(a, [])]), (Data.Attoparsec.ByteString.Internal. [InlPrag=INLINE (sat-args=2)] :: forall a. Data.Attoparsec.ByteString.Internal.Parser a -> GHC.Base.String -> Data.Attoparsec.ByteString.Internal.Parser a [GblId, Arity=7, Caf=NoCafRefs, Str=DmdType C(C(C(C(C(S)))))LLLLLL, Unf=OtherCon []] = \r [eta_B7 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a eta_B7 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal., [])]), (Data.Attoparsec.ByteString.Internal.inClass [InlPrag=INLINE (sat-args=1)] :: GHC.Base.String -> GHC.Word.Word8 -> GHC.Types.Bool [GblId, Arity=1, Str=DmdType L, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta] let { mySet [InlPrag=NOINLINE, Dmd=Just L] :: Data.Attoparsec.ByteString.FastSet.FastSet [LclId, Str=DmdType] = \u srt:(0,*bitmap*) [] Data.Attoparsec.ByteString.FastSet.charClass eta; } in let { sat_soBZ :: GHC.Word.Word8 -> GHC.Types.Bool [LclId] = \r [ds] Data.Attoparsec.ByteString.FastSet.memberWord8 ds mySet; } in sat_soBZ;, [(Data.Attoparsec.ByteString.Internal.inClass, [Data.Attoparsec.ByteString.FastSet.charClass])]), (Data.Attoparsec.ByteString.Internal.notInClass [InlPrag=INLINE (sat-args=1)] :: GHC.Base.String -> GHC.Word.Word8 -> GHC.Types.Bool [GblId, Arity=1, Str=DmdType L, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta] let { mySet [InlPrag=NOINLINE, Dmd=Just L] :: Data.Attoparsec.ByteString.FastSet.FastSet [LclId, Str=DmdType] = \u srt:(0,*bitmap*) [] Data.Attoparsec.ByteString.FastSet.charClass eta; } in let { sat_soC0 :: GHC.Word.Word8 -> GHC.Types.Bool [LclId] = \r [x] case Data.Attoparsec.ByteString.FastSet.memberWord8 x mySet of _ { GHC.Types.False -> GHC.Types.True []; GHC.Types.True -> GHC.Types.False []; }; } in sat_soC0;, [(Data.Attoparsec.ByteString.Internal.notInClass, [Data.Attoparsec.ByteString.FastSet.charClass])]), (Data.Attoparsec.ByteString.Internal.try [InlPrag=INLINE (sat-args=1)] :: forall a. Data.Attoparsec.ByteString.Internal.Parser a -> Data.Attoparsec.ByteString.Internal.Parser a [GblId, Arity=1, Caf=NoCafRefs, Str=DmdType S, Unf=OtherCon []] = \r [eta] eta;, [(Data.Attoparsec.ByteString.Internal.try, [])]), (Data.Attoparsec.ByteString.Internal.anyWord1 :: Data.ByteString.Internal.ByteString -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Caf=NoCafRefs, Str=DmdType LALLAC(C(C(C(S)))), Unf=OtherCon []] = \r [s1 _i0 a0 m0 _kf ks] ks s1 a0 m0 GHC.Tuple.();, [(Data.Attoparsec.ByteString.Internal.anyWord1, [])]), (Data.Attoparsec.ByteString.Internal.put :: Data.ByteString.Internal.ByteString -> Data.Attoparsec.ByteString.Internal.Parser () [GblId, Arity=6, Caf=NoCafRefs, Str=DmdType LALLAC(C(C(C(S)))), Unf=OtherCon []] = \r [eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.anyWord1 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.put, [])]), (Data.Attoparsec.ByteString.Internal.failK [InlPrag=INLINE (sat-args=5)] :: forall a. Data.Attoparsec.ByteString.Internal.Failure a [GblId, Arity=5, Caf=NoCafRefs, Str=DmdType LAALL, Unf=OtherCon []] = \r [eta eta1 eta2 eta3 eta4] Data.Attoparsec.Internal.Types.Fail [eta eta3 eta4];, [(Data.Attoparsec.ByteString.Internal.failK, [])]), (Data.Attoparsec.ByteString.Internal.successK [InlPrag=INLINE (sat-args=4)] :: forall a. Data.Attoparsec.ByteString.Internal.Success a a [GblId, Arity=4, Caf=NoCafRefs, Str=DmdType LAAL, Unf=OtherCon []] = \r [eta eta1 eta2 eta3] Data.Attoparsec.Internal.Types.Done [eta eta3];, [(Data.Attoparsec.ByteString.Internal.successK, [])]), (Data.Attoparsec.ByteString.Internal.scan1 :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Caf=NoCafRefs, Str=DmdType LLLAC(C(C(C(S)))), Unf=OtherCon []] = \r [i0 a0 m0 _kf ks] ks i0 a0 m0 i0;, [(Data.Attoparsec.ByteString.Internal.scan1, [])]), (Data.Attoparsec.ByteString.Internal.get :: Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Internal.ByteString [GblId, Arity=5, Caf=NoCafRefs, Str=DmdType LLLAC(C(C(C(S)))), Unf=OtherCon []] = \r [eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.scan1 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.get, [])]), (Data.Attoparsec.ByteString.Internal.$wprompt :: forall r. Data.Attoparsec.ByteString.Internal.Input -> Data.Attoparsec.ByteString.Internal.Added -> (Data.Attoparsec.ByteString.Internal.Input -> Data.Attoparsec.ByteString.Internal.Added -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.ByteString.Internal.Result r) -> (Data.Attoparsec.ByteString.Internal.Input -> Data.Attoparsec.ByteString.Internal.Added -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.ByteString.Internal.Result r) -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=4, Str=DmdType LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3] let { lvl5 :: Data.Attoparsec.ByteString.Internal.Result r [LclId, Str=DmdType] = \u [] w2 w w1 Data.Attoparsec.Internal.Types.Complete; } in let { sat_soC4 :: Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId] = \r srt:(0,*bitmap*) [s1] case s1 of _ { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case <=# [rb3 0] of _ { GHC.Types.False -> let { sat_soC2 :: Data.Attoparsec.ByteString.Internal.Added [LclId] = \u srt:(0,*bitmap*) [] case w1 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> Data.ByteString.Internal.$w$cmappend ww ww1 ww2 ww3 rb rb1 rb2 rb3; }; } in let { sat_soC3 :: Data.Attoparsec.ByteString.Internal.Input [LclId] = \u srt:(0,*bitmap*) [] case w of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> Data.ByteString.Internal.$w$cmappend ww ww1 ww2 ww3 rb rb1 rb2 rb3; }; } in w3 sat_soC3 sat_soC2 Data.Attoparsec.Internal.Types.Incomplete; GHC.Types.True -> lvl5; }; }; } in Data.Attoparsec.Internal.Types.Partial [sat_soC4];, [(Data.Attoparsec.ByteString.Internal.$wprompt, [Data.ByteString.Internal.$w$cmappend])]), (Data.Attoparsec.ByteString.Internal.prompt [InlPrag=INLINE[0]] :: forall r. Data.Attoparsec.ByteString.Internal.Input -> Data.Attoparsec.ByteString.Internal.Added -> Data.Attoparsec.Internal.Types.More -> (Data.Attoparsec.ByteString.Internal.Input -> Data.Attoparsec.ByteString.Internal.Added -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.ByteString.Internal.Result r) -> (Data.Attoparsec.ByteString.Internal.Input -> Data.Attoparsec.ByteString.Internal.Added -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.ByteString.Internal.Result r) -> Data.Attoparsec.ByteString.Internal.Result r [GblId, Arity=5, Str=DmdType LLALL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3 w4] Data.Attoparsec.ByteString.Internal.$wprompt w w1 w3 w4;, [(Data.Attoparsec.ByteString.Internal.prompt, [Data.ByteString.Internal.$w$cmappend])]), (Data.Attoparsec.ByteString.Internal.$wa1 :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=4, Str=DmdType S(LLLL)LLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3] case w of wild { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case <=# [rb3 0] of _ { GHC.Types.False -> w3 wild w1 w2 GHC.Types.True; GHC.Types.True -> case w2 of _ { Data.Attoparsec.Internal.Types.Complete -> w3 wild w1 Data.Attoparsec.Internal.Types.Complete GHC.Types.False; Data.Attoparsec.Internal.Types.Incomplete -> let { lvl5 :: Data.Attoparsec.ByteString.Internal.Result r [LclId, Str=DmdType] = \u [] w3 wild w1 Data.Attoparsec.Internal.Types.Complete GHC.Types.False; } in let { sat_soCd :: Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId] = \r srt:(0,*bitmap*) [s1] case s1 of _ { Data.ByteString.Internal.PS rb4 rb5 rb6 rb7 -> case <=# [rb7 0] of _ { GHC.Types.False -> let { sat_soCb :: Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString [LclId] = \u srt:(0,*bitmap*) [] case w1 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> Data.ByteString.Internal.$w$cmappend ww ww1 ww2 ww3 rb4 rb5 rb6 rb7; }; } in let { sat_soCc :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = \u srt:(0,*bitmap*) [] Data.ByteString.Internal.$w$cmappend rb rb1 rb2 rb3 rb4 rb5 rb6 rb7; } in w3 sat_soCc sat_soCb Data.Attoparsec.Internal.Types.Incomplete GHC.Types.True; GHC.Types.True -> lvl5; }; }; } in Data.Attoparsec.Internal.Types.Partial [sat_soCd]; }; }; };, [(Data.Attoparsec.ByteString.Internal.$wa1, [Data.ByteString.Internal.$w$cmappend])]), (Data.Attoparsec.ByteString.Internal.atEnd1 [InlPrag=INLINE[0]] :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType S(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3 w4] Data.Attoparsec.ByteString.Internal.$wa1 w w1 w2 w4;, [(Data.Attoparsec.ByteString.Internal.atEnd1, [Data.ByteString.Internal.$w$cmappend])]), (Data.Attoparsec.ByteString.Internal.wantInput :: Data.Attoparsec.ByteString.Internal.Parser GHC.Types.Bool [GblId, Arity=5, Str=DmdType S(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.atEnd1 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.wantInput, [Data.ByteString.Internal.$w$cmappend])]), ($wa9 :: (GHC.Word.Word8 -> GHC.Types.Bool) -> forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=8, Str=DmdType LLLLLLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w ww ww1 ww2 ww3 w1 w2 w3] let { $wa16 [Occ=LoopBreaker] :: forall r1. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r1 -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r1 [LclId, Arity=7, Str=DmdType LLLLLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [ww4 ww5 ww6 ww7 w4 w5 w6] let { l :: GHC.Types.Int [LclId, Str=DmdType m, Unf=OtherCon []] = NO_CCS GHC.Types.I#! [ww7]; } in let { $wa17 [Occ=LoopBreaker] :: GHC.Prim.Addr# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Types.Int #) [LclId, Arity=3, Str=DmdType LLL, Unf=OtherCon []] = sat-only \r [ww8 ww9 w7] case >=# [ww9 ww7] of _ { GHC.Types.False -> case readWord8OffAddr# [ww8 0 w7] of _ { (#,#) ipv ipv1 -> let { sat_soCi :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv1]; } in case w sat_soCi of _ { GHC.Types.False -> let { sat_soCh :: GHC.Types.Int [LclId] = NO_CCS GHC.Types.I#! [ww9]; } in (#,#) [ipv sat_soCh]; GHC.Types.True -> case +# [ww9 1] of sat_soCj { __DEFAULT -> case plusAddr# [ww8 1] of sat_soCk { __DEFAULT -> $wa17 sat_soCk sat_soCj ipv; }; }; }; }; GHC.Types.True -> (#,#) [w7 l]; }; } in case plusAddr# [ww4 ww6] of sat_soCm { __DEFAULT -> case $wa17 sat_soCm 0 GHC.Prim.realWorld# of _ { (#,#) ipv ipv1 -> case touch# [ww5 ipv] of _ { __DEFAULT -> case ipv1 of _ { GHC.Types.I# y -> case -# [ww7 y] of rb3 [Dmd=Just L] { __DEFAULT -> case <=# [rb3 0] of _ { GHC.Types.False -> case +# [ww6 y] of sat_so23 { __DEFAULT -> let { sat_soCl :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_so23 rb3]; } in w6 sat_soCl w4 w5 GHC.Tuple.(); }; GHC.Types.True -> let { sat_soCo :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r1 [LclId] = \r [i1 a17 m1 a18] case a18 of _ { GHC.Types.False -> w6 i1 a17 m1 GHC.Tuple.(); GHC.Types.True -> case i1 of _ { Data.ByteString.Internal.PS ww8 ww9 ww10 ww11 -> $wa16 ww8 ww9 ww10 ww11 a17 m1 w6; }; }; } in case +# [ww6 y] of sat_soCn { __DEFAULT -> let { sat_soCp :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_soCn rb3]; } in Data.Attoparsec.ByteString.Internal.$wa1 sat_soCp w4 w5 sat_soCo; }; }; }; }; }; }; }; } in $wa16 ww ww1 ww2 ww3 w1 w2 w3;, [($wa9, [Data.ByteString.Internal.$w$cmappend])]), (a1 :: (GHC.Word.Word8 -> GHC.Types.Bool) -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType LU(LLLL)LLAL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w w1 w2 w3 w4 w5] case w1 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> $wa9 w ww ww1 ww2 ww3 w2 w3 w5; };, [(a1, [Data.ByteString.Internal.$w$cmappend])]), (Data.Attoparsec.ByteString.Internal.skipWhile [InlPrag=INLINE (sat-args=1)] :: (GHC.Word.Word8 -> GHC.Types.Bool) -> Data.Attoparsec.ByteString.Internal.Parser () [GblId, Arity=6, Str=DmdType LU(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a1 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.skipWhile, [Data.ByteString.Internal.$w$cmappend])]), (Data.Attoparsec.ByteString.Internal.$wa6 [Occ=LoopBreaker] :: [Data.ByteString.Internal.ByteString] -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType LS(LLLL)LLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3 w4] let { a17 :: [Data.ByteString.Internal.ByteString] [LclId, Str=DmdType] = \u [] GHC.List.reverse1 w GHC.Types.[]; } in let { sat_soCA :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r [LclId] = \r srt:(0,*bitmap*) [i1 a16 m1 a18] case a18 of _ { GHC.Types.False -> w4 i1 a16 m1 a17; GHC.Types.True -> let { sat_soCB :: [Data.ByteString.Internal.ByteString] [LclId] = NO_CCS :! [i1 w]; } in Data.Attoparsec.ByteString.Internal.$wa6 sat_soCB Data.ByteString.empty a16 m1 w4; }; } in Data.Attoparsec.ByteString.Internal.$wa1 w1 w2 w3 sat_soCA;, [(Data.Attoparsec.ByteString.Internal.$wa6, [Data.ByteString.empty, Data.ByteString.Internal.$w$cmappend, Data.Attoparsec.ByteString.Internal.$wa6])]), ($wa10 :: forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString (Data.Maybe.Maybe GHC.Word.Word8) r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=7, Str=DmdType LLLLLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [ww ww1 ww2 ww3 w w1 w2] case <=# [ww3 0] of _ { GHC.Types.False -> case plusAddr# [ww ww2] of sat_soCF { __DEFAULT -> case readWord8OffAddr# [sat_soCF 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [ww1 ipv] of _ { __DEFAULT -> let { sat_so3G :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv1]; } in let { sat_soCD :: Data.Maybe.Maybe GHC.Word.Word8 [LclId] = NO_CCS Data.Maybe.Just! [sat_so3G]; } in let { sat_soCE :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 ww2 ww3]; } in w2 sat_soCE w w1 sat_soCD; }; }; }; GHC.Types.True -> case w1 of _ { Data.Attoparsec.Internal.Types.Complete -> let { sat_soCJ :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 ww2 ww3]; } in w2 sat_soCJ w Data.Attoparsec.Internal.Types.Complete Data.Maybe.Nothing; Data.Attoparsec.Internal.Types.Incomplete -> let { lvl5 :: Data.Attoparsec.ByteString.Internal.Result r [LclId, Str=DmdType] = \u [] let { sat_so3M :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 ww2 ww3]; } in w2 sat_so3M w Data.Attoparsec.Internal.Types.Complete Data.Maybe.Nothing; } in let { sat_soCO :: Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId] = \r srt:(0,*bitmap*) [s1] case s1 of _ { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case <=# [rb3 0] of _ { GHC.Types.False -> case Data.ByteString.Internal.$w$cmappend ww ww1 ww2 ww3 rb rb1 rb2 rb3 of wild4 { Data.ByteString.Internal.PS rb4 rb5 rb6 rb7 -> case plusAddr# [rb4 rb6] of sat_soCN { __DEFAULT -> case readWord8OffAddr# [sat_soCN 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [rb5 ipv] of _ { __DEFAULT -> let { sat_so4r :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv1]; } in let { sat_soCL :: Data.Maybe.Maybe GHC.Word.Word8 [LclId] = NO_CCS Data.Maybe.Just! [sat_so4r]; } in let { sat_soCM :: Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString [LclId] = \u srt:(0,*bitmap*) [] case w of _ { Data.ByteString.Internal.PS ww4 ww5 ww6 ww7 -> Data.ByteString.Internal.$w$cmappend ww4 ww5 ww6 ww7 rb rb1 rb2 rb3; }; } in w2 wild4 sat_soCM Data.Attoparsec.Internal.Types.Incomplete sat_soCL; }; }; }; }; GHC.Types.True -> lvl5; }; }; } in Data.Attoparsec.Internal.Types.Partial [sat_soCO]; }; };, [($wa10, [Data.ByteString.Internal.$w$cmappend])]), (a2 :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString (Data.Maybe.Maybe GHC.Word.Word8) r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType U(LLLL)LLAL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w w1 w2 w3 w4] case w of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> $wa10 ww ww1 ww2 ww3 w1 w2 w4; };, [(a2, [Data.ByteString.Internal.$w$cmappend])]), (Data.Attoparsec.ByteString.Internal.peekWord8 [InlPrag=INLINE (sat-args=0)] :: Data.Attoparsec.ByteString.Internal.Parser (Data.Maybe.Maybe GHC.Word.Word8) [GblId, Arity=5, Str=DmdType U(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a2 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.peekWord8, [Data.ByteString.Internal.$w$cmappend])]), (Data.Attoparsec.ByteString.Internal.anyWord4 :: [GHC.Types.Char] [GblId, Str=DmdType] = \u [] GHC.CString.unpackCString# "demandInput";, [(Data.Attoparsec.ByteString.Internal.anyWord4, [])]), (Data.Attoparsec.ByteString.Internal.anyWord3 :: [GHC.Base.String] [GblId, Str=DmdType, Unf=OtherCon []] = NO_CCS :! [Data.Attoparsec.ByteString.Internal.anyWord4 GHC.Types.[]];, [(Data.Attoparsec.ByteString.Internal.anyWord3, [])]), (Data.Attoparsec.ByteString.Internal.anyWord5 :: [GHC.Types.Char] [GblId, Str=DmdType] = \u [] GHC.CString.unpackCString# "not enough bytes";, [(Data.Attoparsec.ByteString.Internal.anyWord5, [])]), (Data.Attoparsec.ByteString.Internal.anyWord6 :: [GHC.Base.String] [GblId, Str=DmdType, Unf=OtherCon []] = NO_CCS :! [Data.Attoparsec.ByteString.Internal.anyWord4 GHC.Types.[]];, [(Data.Attoparsec.ByteString.Internal.anyWord6, [])]), (Data.Attoparsec.ByteString.Internal.anyWord2 :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType LLSLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [i0 a0 m0 kf ks] case m0 of _ { Data.Attoparsec.Internal.Types.Complete -> kf i0 a0 Data.Attoparsec.Internal.Types.Complete Data.Attoparsec.ByteString.Internal.anyWord6 Data.Attoparsec.ByteString.Internal.anyWord5; Data.Attoparsec.Internal.Types.Incomplete -> let { lvl5 :: Data.Attoparsec.ByteString.Internal.Result r [LclId, Str=DmdType] = \u srt:(1,*bitmap*) [] kf i0 a0 Data.Attoparsec.Internal.Types.Complete Data.Attoparsec.ByteString.Internal.anyWord3 Data.Attoparsec.ByteString.Internal.anyWord5; } in let { sat_soCZ :: Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId] = \r srt:(0,*bitmap*) [s1] case s1 of _ { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case <=# [rb3 0] of _ { GHC.Types.False -> let { sat_soCX :: Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString [LclId] = \u srt:(0,*bitmap*) [] case a0 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> Data.ByteString.Internal.$w$cmappend ww ww1 ww2 ww3 rb rb1 rb2 rb3; }; } in let { sat_soCY :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = \u srt:(0,*bitmap*) [] case i0 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> Data.ByteString.Internal.$w$cmappend ww ww1 ww2 ww3 rb rb1 rb2 rb3; }; } in ks sat_soCY sat_soCX Data.Attoparsec.Internal.Types.Incomplete GHC.Tuple.(); GHC.Types.True -> lvl5; }; }; } in Data.Attoparsec.Internal.Types.Partial [sat_soCZ]; };, [(Data.Attoparsec.ByteString.Internal.anyWord2, [Data.ByteString.Internal.$w$cmappend, Data.Attoparsec.ByteString.Internal.anyWord3, Data.Attoparsec.ByteString.Internal.anyWord5, Data.Attoparsec.ByteString.Internal.anyWord6])]), (lvl :: [GHC.Types.Char] [GblId] = \u [] GHC.CString.unpackCString# "parseOnly: impossible error!";, [(lvl, [])]), (lvl1 :: forall a. Data.Either.Either GHC.Base.String a [GblId, Str=DmdType b] = \u srt:(0,*bitmap*) [] GHC.Err.error lvl;, [(lvl1, [GHC.Err.error, lvl])]), (Data.Attoparsec.ByteString.Internal.parseOnly [InlPrag=INLINE (sat-args=2)] :: forall a. Data.Attoparsec.ByteString.Internal.Parser a -> Data.ByteString.Internal.ByteString -> Data.Either.Either GHC.Base.String a [GblId, Arity=2, Str=DmdType C(C(C(C(C(S)))))L, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta eta1] case eta eta1 Data.ByteString.Internal.$fMonoidByteString_$cmempty Data.Attoparsec.Internal.Types.Complete Data.Attoparsec.ByteString.Internal.failK Data.Attoparsec.ByteString.Internal.successK of _ { Data.Attoparsec.Internal.Types.Fail _ _ err -> Data.Either.Left [err]; Data.Attoparsec.Internal.Types.Partial _ -> lvl1; Data.Attoparsec.Internal.Types.Done _ a16 -> Data.Either.Right [a16]; };, [(Data.Attoparsec.ByteString.Internal.parseOnly, [Data.ByteString.Internal.$fMonoidByteString_$cmempty, lvl1])]), (Data.Attoparsec.ByteString.Internal.parse [InlPrag=INLINE (sat-args=2)] :: forall a. Data.Attoparsec.ByteString.Internal.Parser a -> Data.ByteString.Internal.ByteString -> Data.Attoparsec.ByteString.Internal.Result a [GblId, Arity=2, Str=DmdType C(C(C(C(C(S)))))L, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta eta1] eta eta1 Data.ByteString.Internal.$fMonoidByteString_$cmempty Data.Attoparsec.Internal.Types.Incomplete Data.Attoparsec.ByteString.Internal.failK Data.Attoparsec.ByteString.Internal.successK;, [(Data.Attoparsec.ByteString.Internal.parse, [Data.ByteString.Internal.$fMonoidByteString_$cmempty])]), (lvl2 :: [GHC.Types.Char] [GblId, Str=DmdType] = \u [] GHC.CString.unpackCString# "endOfInput";, [(lvl2, [])]), (Data.Attoparsec.ByteString.Internal.$wa2 :: forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=8, Str=DmdType LLLLLLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [ww ww1 ww2 ww3 w w1 w2 w3] case <=# [ww3 0] of _ { GHC.Types.False -> let { sat_soD9 :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 ww2 ww3]; } in w2 sat_soD9 w w1 GHC.Types.[] lvl2; GHC.Types.True -> case w1 of _ { Data.Attoparsec.Internal.Types.Complete -> let { sat_soDb :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 ww2 ww3]; } in w3 sat_soDb w Data.Attoparsec.Internal.Types.Complete GHC.Tuple.(); Data.Attoparsec.Internal.Types.Incomplete -> let { lvl5 :: Data.Attoparsec.ByteString.Internal.Result r [LclId, Str=DmdType] = \u srt:(1,*bitmap*) [] case w of _ { Data.ByteString.Internal.PS ww4 ww5 ww6 ww7 -> case Data.ByteString.Internal.$w$cmappend ww ww1 ww2 ww3 ww4 ww5 ww6 ww7 of nt { Data.ByteString.Internal.PS ipv ipv1 ipv2 ipv3 -> let { sat_soDd :: Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString [LclId] = \u srt:(1,*bitmap*) [] Data.ByteString.Internal.$w$cmappend ww4 ww5 ww6 ww7 ww4 ww5 ww6 ww7; } in w3 nt sat_soDd Data.Attoparsec.Internal.Types.Complete GHC.Tuple.(); }; }; } in let { sat_soDo :: Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId] = \r srt:(0,*bitmap*) [s1] case s1 of _ { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case <=# [rb3 0] of _ { GHC.Types.False -> case w of _ { Data.ByteString.Internal.PS ww4 ww5 ww6 ww7 -> let-no-escape { $j :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.ByteString.Internal.Result r [LclId, Arity=4, Str=DmdType LLLL, Unf=OtherCon []] = sat-only \r srt:(1,*bitmap*) [ww8 ww9 ww10 ww11] case Data.ByteString.Internal.$w$cmappend ww ww1 ww2 ww3 ww8 ww9 ww10 ww11 of nt { Data.ByteString.Internal.PS ipv ipv1 ipv2 ipv3 -> let { sat_soDe :: Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString [LclId] = \u srt:(1,*bitmap*) [] Data.ByteString.Internal.$w$cmappend ww4 ww5 ww6 ww7 ww8 ww9 ww10 ww11; } in w2 nt sat_soDe Data.Attoparsec.Internal.Types.Incomplete GHC.Types.[] lvl2; }; } in case ww7 of ds { __DEFAULT -> case rb3 of ds1 { __DEFAULT -> case +# [ds ds1] of a16 { __DEFAULT -> let { sat_soDl :: GHC.Types.IO Data.ByteString.Internal.ByteString [LclId] = \r srt:(0,*bitmap*) [s2] case <# [a16 0] of _ { GHC.Types.False -> case newPinnedByteArray# [a16 s2] of _ { (#,#) ipv ipv1 -> case byteArrayContents# [ipv1] of a17 [Dmd=Just L] { __DEFAULT -> case int2Word# [ds] of sat_soDj { __DEFAULT -> case plusAddr# [ww4 ww6] of sat_soDk { __DEFAULT -> case __pkg_ccall bytestring-0.10.0.2 memcpy [a17 sat_soDk sat_soDj ipv] of _ { (#,#) ds3 _ -> case touch# [ww5 ds3] of s' { __DEFAULT -> case int2Word# [ds1] of sat_soDg { __DEFAULT -> case plusAddr# [rb rb2] of sat_soDh { __DEFAULT -> case plusAddr# [a17 ds] of sat_soDi { __DEFAULT -> case __pkg_ccall bytestring-0.10.0.2 memcpy [sat_soDi sat_soDh sat_soDg s'] of _ { (#,#) ds5 _ -> case touch# [rb1 ds5] of s'1 { __DEFAULT -> let { a18 :: GHC.ForeignPtr.ForeignPtrContents [LclId, Str=DmdType, Unf=OtherCon []] = NO_CCS GHC.ForeignPtr.PlainPtr! [ipv1]; } in case touch# [a18 s'1] of s'2 { __DEFAULT -> let { sat_soDf :: Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [a17 a18 0 a16]; } in (#,#) [s'2 sat_soDf]; }; }; }; }; }; }; }; }; }; }; }; }; GHC.Types.True -> GHC.ForeignPtr.mallocPlainForeignPtrBytes2; }; } in case GHC.IO.unsafeDupablePerformIO sat_soDl of _ { Data.ByteString.Internal.PS ww8 ww9 ww10 ww11 -> $j ww8 ww9 ww10 ww11; }; }; 0 -> $j ww4 ww5 ww6 ds; }; 0 -> $j rb rb1 rb2 rb3; }; }; GHC.Types.True -> lvl5; }; }; } in Data.Attoparsec.Internal.Types.Partial [sat_soDo]; }; };, [(Data.Attoparsec.ByteString.Internal.$wa2, [GHC.ForeignPtr.mallocPlainForeignPtrBytes2, Data.ByteString.Internal.$w$cmappend, lvl2])]), (Data.Attoparsec.ByteString.Internal.endOfInput1 [InlPrag=INLINE[0]] :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType U(LLLL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3 w4] case w of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> Data.Attoparsec.ByteString.Internal.$wa2 ww ww1 ww2 ww3 w1 w2 w3 w4; };, [(Data.Attoparsec.ByteString.Internal.endOfInput1, [Data.Attoparsec.ByteString.Internal.$wa2])]), (Data.Attoparsec.ByteString.Internal.endOfInput :: Data.Attoparsec.ByteString.Internal.Parser () [GblId, Arity=5, Str=DmdType U(LLLL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.endOfInput1 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.endOfInput, [Data.Attoparsec.ByteString.Internal.$wa2])]), (Data.Attoparsec.ByteString.Internal.$wa [Occ=LoopBreaker] :: GHC.Prim.Int# -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType LS(AAAL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [ww w w1 w2 w3 w4] case w of wild { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case >=# [rb3 ww] of _ { GHC.Types.False -> let { sat_soDI :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r [LclId] = \r srt:(0,*bitmap*) [i1 a17 m1 a18] Data.Attoparsec.ByteString.Internal.$wa ww i1 a17 m1 w3 w4; } in Data.Attoparsec.ByteString.Internal.anyWord2 wild w1 w2 w3 sat_soDI; GHC.Types.True -> w4 wild w1 w2 wild; }; };, [(Data.Attoparsec.ByteString.Internal.$wa, [Data.Attoparsec.ByteString.Internal.$wa, Data.Attoparsec.ByteString.Internal.anyWord2])]), (Data.Attoparsec.ByteString.Internal.$wensure' :: forall r. GHC.Prim.Int# -> Data.Attoparsec.ByteString.Internal.Input -> Data.Attoparsec.ByteString.Internal.Added -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.ByteString.Internal.Failure r -> Data.Attoparsec.ByteString.Internal.Success Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType LLLSLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [ww w w1 w2 w3 w4] let { sat_soDO :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r [LclId] = \r srt:(0,*bitmap*) [i1 a17 m1 a18] Data.Attoparsec.ByteString.Internal.$wa ww i1 a17 m1 w3 w4; } in Data.Attoparsec.ByteString.Internal.anyWord2 w w1 w2 w3 sat_soDO;, [(Data.Attoparsec.ByteString.Internal.$wensure', [Data.Attoparsec.ByteString.Internal.$wa, Data.Attoparsec.ByteString.Internal.anyWord2])]), (Data.Attoparsec.ByteString.Internal.ensure' [InlPrag=INLINE[0]] :: forall r. GHC.Types.Int -> Data.Attoparsec.ByteString.Internal.Input -> Data.Attoparsec.ByteString.Internal.Added -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.ByteString.Internal.Failure r -> Data.Attoparsec.ByteString.Internal.Success Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType U(L)LLSLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3 w4 w5] case w of _ { GHC.Types.I# ww -> Data.Attoparsec.ByteString.Internal.$wensure' ww w1 w2 w3 w4 w5; };, [(Data.Attoparsec.ByteString.Internal.ensure', [Data.Attoparsec.ByteString.Internal.$wensure'])]), (msg2 :: [GHC.Types.Char] [GblId, Str=DmdType] = \u [] GHC.CString.unpackCString# "Failed reading: takeWith";, [(msg2, [])]), (Data.Attoparsec.ByteString.Internal.$wa4 :: GHC.Prim.Int# -> (Data.ByteString.Internal.ByteString -> GHC.Types.Bool) -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=7, Str=DmdType LLS(AAAL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [ww w w1 w2 w3 w4 w5] case <=# [ww 0] of _ { GHC.Types.False -> case w1 of wild { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case >=# [rb3 ww] of _ { GHC.Types.False -> let { sat_soDT :: Data.Attoparsec.ByteString.Internal.Success Data.ByteString.Internal.ByteString r [LclId] = \r srt:(1,*bitmap*) [i1 a17 m1 a18] let { h [Dmd=Just L] :: Data.ByteString.Internal.ByteString [LclId, Str=DmdType] = \u [] case a18 of _ { Data.ByteString.Internal.PS rb4 rb5 rb6 rb7 -> Data.ByteString.Internal.PS [rb4 rb5 rb6 ww]; }; } in case w h of _ { GHC.Types.False -> w4 i1 a17 m1 GHC.Types.[] msg2; GHC.Types.True -> let { sat_soDS :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = \u [] case a18 of _ { Data.ByteString.Internal.PS rb4 rb5 rb6 rb7 -> case -# [rb7 ww] of sat_soDQ { __DEFAULT -> case +# [rb6 ww] of sat_soDR { __DEFAULT -> Data.ByteString.Internal.PS [rb4 rb5 sat_soDR sat_soDQ]; }; }; }; } in w5 sat_soDS a17 m1 h; }; } in Data.Attoparsec.ByteString.Internal.$wensure' ww wild w2 w3 w4 sat_soDT; GHC.Types.True -> let { h :: Data.ByteString.Internal.ByteString [LclId, Str=DmdType, Unf=OtherCon []] = NO_CCS Data.ByteString.Internal.PS! [rb rb1 rb2 ww]; } in case w h of _ { GHC.Types.False -> w4 wild w2 w3 GHC.Types.[] msg2; GHC.Types.True -> case -# [rb3 ww] of sat_soaf { __DEFAULT -> case +# [rb2 ww] of sat_soag { __DEFAULT -> let { sat_soE0 :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [rb rb1 sat_soag sat_soaf]; } in w5 sat_soE0 w2 w3 h; }; }; }; }; }; GHC.Types.True -> case w1 of wild { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case >=# [rb3 0] of _ { GHC.Types.False -> let { sat_soE2 :: Data.Attoparsec.ByteString.Internal.Success Data.ByteString.Internal.ByteString r [LclId] = \r srt:(1,*bitmap*) [i1 a17 m1 a18] let { h [Dmd=Just L] :: Data.ByteString.Internal.ByteString [LclId, Str=DmdType] = \u [] case a18 of _ { Data.ByteString.Internal.PS rb4 rb5 rb6 rb7 -> Data.ByteString.Internal.PS [rb4 rb5 rb6 0]; }; } in case w h of _ { GHC.Types.False -> w4 i1 a17 m1 GHC.Types.[] msg2; GHC.Types.True -> w5 a18 a17 m1 h; }; } in Data.Attoparsec.ByteString.Internal.$wensure' 0 wild w2 w3 w4 sat_soE2; GHC.Types.True -> let { h :: Data.ByteString.Internal.ByteString [LclId, Str=DmdType, Unf=OtherCon []] = NO_CCS Data.ByteString.Internal.PS! [rb rb1 rb2 0]; } in case w h of _ { GHC.Types.False -> w4 wild w2 w3 GHC.Types.[] msg2; GHC.Types.True -> let { sat_soE7 :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [rb rb1 rb2 rb3]; } in w5 sat_soE7 w2 w3 h; }; }; }; };, [(Data.Attoparsec.ByteString.Internal.$wa4, [Data.Attoparsec.ByteString.Internal.$wensure', msg2])]), (Data.Attoparsec.ByteString.Internal.string1 [InlPrag=INLINE[0]] :: GHC.Types.Int -> (Data.ByteString.Internal.ByteString -> GHC.Types.Bool) -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=7, Str=DmdType U(L)LS(AAAL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3 w4 w5 w6] case w of _ { GHC.Types.I# ww -> Data.Attoparsec.ByteString.Internal.$wa4 ww w1 w2 w3 w4 w5 w6; };, [(Data.Attoparsec.ByteString.Internal.string1, [Data.Attoparsec.ByteString.Internal.$wa4])]), (Data.Attoparsec.ByteString.Internal.takeWith :: GHC.Types.Int -> (Data.ByteString.Internal.ByteString -> GHC.Types.Bool) -> Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Internal.ByteString [GblId, Arity=7, Str=DmdType U(L)LS(AAAL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B7 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.string1 eta_B7 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.takeWith, [Data.Attoparsec.ByteString.Internal.$wa4])]), (lvl3 :: Data.ByteString.Internal.ByteString -> GHC.Types.Bool [GblId, Arity=1, Caf=NoCafRefs, Str=DmdType A, Unf=OtherCon []] = \r [ds] GHC.Types.True [];, [(lvl3, [])]), (a3 :: GHC.Types.Int -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType U(L)S(AAAL)LLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [eta eta1 eta2 eta3 eta4 eta5] case eta of _ { GHC.Types.I# ww -> Data.Attoparsec.ByteString.Internal.$wa4 ww lvl3 eta1 eta2 eta3 eta4 eta5; };, [(a3, [Data.Attoparsec.ByteString.Internal.$wa4])]), (Data.Attoparsec.ByteString.Internal.take [InlPrag=INLINE (sat-args=1)] :: GHC.Types.Int -> Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Internal.ByteString [GblId, Arity=6, Str=DmdType U(L)S(AAAL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a3 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.take, [Data.Attoparsec.ByteString.Internal.$wa4])]), (a4 :: (Data.ByteString.Internal.ByteString -> Data.ByteString.Internal.ByteString) -> Data.ByteString.Internal.ByteString -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=2, Str=DmdType LL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [eta eta1] let { ds [Dmd=Just D(LTLL)] :: Data.ByteString.Internal.ByteString [LclId, Str=DmdType] = \u [] eta eta1; } in let { w :: Data.ByteString.Internal.ByteString -> GHC.Types.Bool [LclId, Arity=1, Unf=OtherCon []] = \r [x] case eta x of _ { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case ds of _ { Data.ByteString.Internal.PS rb4 rb5 rb6 rb7 -> case /=# [rb3 rb7] of _ { GHC.Types.False -> case eqAddr# [rb rb4] of _ { GHC.Types.False -> case Data.ByteString.Internal.$wcompareBytes rb rb1 rb2 rb3 rb4 rb5 rb6 rb7 of _ { __DEFAULT -> GHC.Types.False []; GHC.Types.EQ -> GHC.Types.True []; }; GHC.Types.True -> case ==# [rb2 rb6] of _ { GHC.Types.False -> case Data.ByteString.Internal.$wcompareBytes rb rb1 rb2 rb3 rb4 rb5 rb6 rb7 of _ { __DEFAULT -> GHC.Types.False []; GHC.Types.EQ -> GHC.Types.True []; }; GHC.Types.True -> GHC.Types.True []; }; }; GHC.Types.True -> GHC.Types.False []; }; }; }; } in let { w1 :: GHC.Types.Int [LclId] = \u [] case eta1 of _ { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> GHC.Types.I# [rb3]; }; } in let { sat_soEb :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId] = \r srt:(0,*bitmap*) [w2 w3 w4 w5 w6] case w1 of _ { GHC.Types.I# ww -> Data.Attoparsec.ByteString.Internal.$wa4 ww w w2 w3 w4 w5 w6; }; } in sat_soEb;, [(a4, [Data.Attoparsec.ByteString.Internal.$wa4])]), (Data.Attoparsec.ByteString.Internal.stringTransform [InlPrag=INLINE (sat-args=2)] :: (Data.ByteString.Internal.ByteString -> Data.ByteString.Internal.ByteString) -> Data.ByteString.Internal.ByteString -> Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Internal.ByteString [GblId, Arity=2, Str=DmdType LL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B2 eta_B1] a4 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.stringTransform, [Data.Attoparsec.ByteString.Internal.$wa4])]), (a5 :: Data.ByteString.Internal.ByteString -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType L, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [eta eta1 eta2 eta3 eta4 eta5] case eta of _ { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> let { sat_soEo :: Data.ByteString.Internal.ByteString -> GHC.Types.Bool [LclId] = \r [ds] case ds of _ { Data.ByteString.Internal.PS rb4 rb5 rb6 rb7 -> case /=# [rb7 rb3] of _ { GHC.Types.False -> let-no-escape { $j :: GHC.Prim.State# GHC.Prim.RealWorld -> GHC.Types.Bool [LclId, Arity=1, Unf=OtherCon []] = sat-only \r [w] case Data.ByteString.Internal.$wcompareBytes rb4 rb5 rb6 rb7 rb rb1 rb2 rb3 of _ { __DEFAULT -> GHC.Types.False []; GHC.Types.EQ -> GHC.Types.True []; }; } in case eqAddr# [rb4 rb] of _ { GHC.Types.False -> $j GHC.Prim.realWorld#; GHC.Types.True -> case ==# [rb6 rb2] of _ { GHC.Types.False -> $j GHC.Prim.realWorld#; GHC.Types.True -> GHC.Types.True []; }; }; GHC.Types.True -> GHC.Types.False []; }; }; } in Data.Attoparsec.ByteString.Internal.$wa4 rb3 sat_soEo eta1 eta2 eta3 eta4 eta5; };, [(a5, [Data.Attoparsec.ByteString.Internal.$wa4])]), (Data.Attoparsec.ByteString.Internal.string [InlPrag=INLINE (sat-args=1)] :: Data.ByteString.Internal.ByteString -> Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Internal.ByteString [GblId, Arity=6, Str=DmdType L, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a5 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.string, [Data.Attoparsec.ByteString.Internal.$wa4])]), (Data.Attoparsec.ByteString.Internal.skip_msg2 :: [GHC.Types.Char] [GblId, Str=DmdType] = \u [] GHC.CString.unpackCString# "Failed reading: skip";, [(Data.Attoparsec.ByteString.Internal.skip_msg2, [])]), (Data.Attoparsec.ByteString.Internal.skip1 :: (GHC.Word.Word8 -> GHC.Types.Bool) -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType LS(AAAL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [p eta eta1 eta2 eta3 eta4] case eta of wild { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case >=# [rb3 1] of _ { GHC.Types.False -> let { ks0 :: Data.Attoparsec.ByteString.Internal.Success Data.ByteString.Internal.ByteString r [LclId, Arity=4, Str=DmdType LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [i1 a17 m1 a18] let { sat_soEv :: GHC.Word.Word8 [LclId] = \u [] Data.ByteString.Unsafe.unsafeHead a18; } in case p sat_soEv of _ { GHC.Types.False -> eta3 i1 a17 m1 GHC.Types.[] Data.Attoparsec.ByteString.Internal.skip_msg2; GHC.Types.True -> let { sat_soEy :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = \u [] case a18 of _ { Data.ByteString.Internal.PS rb4 rb5 rb6 rb7 -> case -# [rb7 1] of sat_soEw { __DEFAULT -> case +# [rb6 1] of sat_soEx { __DEFAULT -> Data.ByteString.Internal.PS [rb4 rb5 sat_soEx sat_soEw]; }; }; }; } in eta4 sat_soEy a17 m1 GHC.Tuple.(); }; } in let { sat_soEA :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r [LclId] = \r srt:(1,*bitmap*) [i1 a17 m1 a18] Data.Attoparsec.ByteString.Internal.$wa 1 i1 a17 m1 eta3 ks0; } in Data.Attoparsec.ByteString.Internal.anyWord2 wild eta1 eta2 eta3 sat_soEA; GHC.Types.True -> let { sat_soEF :: GHC.Word.Word8 [LclId] = \u [] case plusAddr# [rb rb2] of sat_soEE { __DEFAULT -> case readWord8OffAddr# [sat_soEE 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [rb1 ipv] of _ { __DEFAULT -> GHC.Word.W8# [ipv1]; }; }; }; } in case p sat_soEF of _ { GHC.Types.False -> eta3 wild eta1 eta2 GHC.Types.[] Data.Attoparsec.ByteString.Internal.skip_msg2; GHC.Types.True -> case -# [rb3 1] of sat_soe1 { __DEFAULT -> case +# [rb2 1] of sat_soe2 { __DEFAULT -> let { sat_soEG :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [rb rb1 sat_soe2 sat_soe1]; } in eta4 sat_soEG eta1 eta2 GHC.Tuple.(); }; }; }; }; };, [(Data.Attoparsec.ByteString.Internal.skip1, [Data.Attoparsec.ByteString.Internal.skip_msg2, Data.Attoparsec.ByteString.Internal.$wa, Data.Attoparsec.ByteString.Internal.anyWord2])]), (Data.Attoparsec.ByteString.Internal.skip :: (GHC.Word.Word8 -> GHC.Types.Bool) -> Data.Attoparsec.ByteString.Internal.Parser () [GblId, Arity=6, Str=DmdType LS(AAAL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.skip1 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.skip, [Data.Attoparsec.ByteString.Internal.skip1])]), (msg1 :: [GHC.Types.Char] [GblId, Str=DmdType] = \u [] GHC.CString.unpackCString# "Failed reading: satisfy";, [(msg1, [])]), (a6 :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Word.Word8 r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType LLLC(C(C(C(C(S)))))A, Unf=OtherCon []] = \r srt:(0,*bitmap*) [i0 a0 m0 kf _ks] kf i0 a0 m0 GHC.Types.[] msg1;, [(a6, [msg1])]), (a7 :: (GHC.Word.Word8 -> GHC.Types.Bool) -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Word.Word8 r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType LS(AAAL)LLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [eta eta1 eta2 eta3 eta4 eta5] case eta1 of wild { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> let { $wg :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> forall r1. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r1 -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Word.Word8 r1 -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r1 [LclId, Arity=4, Str=DmdType LLLL, Unf=OtherCon []] = sat-only \r srt:(2,*bitmap*) [ww ww1 ww2 ww3] case plusAddr# [ww ww2] of sat_soEL { __DEFAULT -> case readWord8OffAddr# [sat_soEL 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [ww1 ipv] of _ { __DEFAULT -> let { w :: GHC.Word.Word8 [LclId, Str=DmdType m, Unf=OtherCon []] = NO_CCS GHC.Word.W8#! [ipv1]; } in case eta w of _ { GHC.Types.False -> a6; GHC.Types.True -> case -# [ww3 1] of a16 [Dmd=Just L] { __DEFAULT -> case +# [ww2 1] of a17 [Dmd=Just L] { __DEFAULT -> let { s1 :: Data.ByteString.Internal.ByteString [LclId, Str=DmdType m, Unf=OtherCon []] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 a17 a16]; } in let { sat_soEK :: forall r1. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r1 -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Word.Word8 r1 -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r1 [LclId] = \r [i0 a0 m0 kf ks] ks s1 a0 m0 w; } in sat_soEK; }; }; }; }; }; }; } in case >=# [rb3 1] of _ { GHC.Types.False -> let { ks0 :: Data.Attoparsec.ByteString.Internal.Success Data.ByteString.Internal.ByteString r [LclId, Arity=4, Str=DmdType LLLU(LLLL), Unf=OtherCon []] = \r [i1 a17 m1 a18] case a18 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> $wg ww ww1 ww2 ww3 i1 a17 m1 eta4 eta5; }; } in let { sat_soEN :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r [LclId] = \r srt:(0,*bitmap*) [i1 a17 m1 a18] Data.Attoparsec.ByteString.Internal.$wa 1 i1 a17 m1 eta4 ks0; } in Data.Attoparsec.ByteString.Internal.anyWord2 wild eta2 eta3 eta4 sat_soEN; GHC.Types.True -> $wg rb rb1 rb2 rb3 wild eta2 eta3 eta4 eta5; }; };, [(a7, [Data.Attoparsec.ByteString.Internal.$wa, Data.Attoparsec.ByteString.Internal.anyWord2, msg1])]), (Data.Attoparsec.ByteString.Internal.satisfy [InlPrag=INLINE (sat-args=1)] :: (GHC.Word.Word8 -> GHC.Types.Bool) -> Data.Attoparsec.ByteString.Internal.Parser GHC.Word.Word8 [GblId, Arity=6, Str=DmdType LS(AAAL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a7 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.satisfy, [a7])]), (Data.Attoparsec.ByteString.Internal.word8 [InlPrag=INLINE (sat-args=1)] :: GHC.Word.Word8 -> Data.Attoparsec.ByteString.Internal.Parser GHC.Word.Word8 [GblId, Arity=1, Str=DmdType L, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta] let { msg0 :: GHC.Base.String [LclId, Str=DmdType] = \u [] case eta of _ { GHC.Word.W8# x# -> case word2Int# [x#] of sat_soET { __DEFAULT -> GHC.Show.itos sat_soET GHC.Types.[]; }; }; } in let { lvl5 :: [GHC.Base.String] [LclId, Unf=OtherCon []] = NO_CCS :! [msg0 GHC.Types.[]]; } in let { sat_soEX :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Word.Word8 r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId] = \r srt:(0,*bitmap*) [i0 a0 m0 kf ks] case i0 of wild { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> let { $wks :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId, Arity=7, Str=DmdType LLLLLLL, Unf=OtherCon []] = sat-only \r srt:(1,*bitmap*) [w w1 w2 ww ww1 ww2 ww3] case plusAddr# [ww ww2] of sat_soEU { __DEFAULT -> case readWord8OffAddr# [sat_soEU 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [ww1 ipv] of _ { __DEFAULT -> case eta of _ { GHC.Word.W8# b1 -> case eqWord# [ipv1 b1] of _ { GHC.Types.False -> kf w w1 w2 lvl5 msg1; GHC.Types.True -> let { sat_soEY :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv1]; } in case -# [ww3 1] of sat_sogF { __DEFAULT -> case +# [ww2 1] of sat_sogG { __DEFAULT -> let { sat_soEZ :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 sat_sogG sat_sogF]; } in ks sat_soEZ w1 w2 sat_soEY; }; }; }; }; }; }; }; } in case >=# [rb3 1] of _ { GHC.Types.False -> let { ks1 [InlPrag=INLINE[0]] :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r [LclId, Arity=4, Str=DmdType LLLU(LLLL), Unf=OtherCon []] = \r [w w1 w2 w3] case w3 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> $wks w w1 w2 ww ww1 ww2 ww3; }; } in let { sat_soEW :: Data.Attoparsec.ByteString.Internal.Failure r [LclId] = \r [i a16 m strs msg] let { sat_soEV :: [GHC.Base.String] [LclId] = NO_CCS :! [msg0 strs]; } in kf i a16 m sat_soEV msg; } in Data.Attoparsec.ByteString.Internal.$wensure' 1 wild a0 m0 sat_soEW ks1; GHC.Types.True -> $wks wild a0 m0 rb rb1 rb2 rb3; }; }; } in sat_soEX;, [(Data.Attoparsec.ByteString.Internal.word8, [Data.Attoparsec.ByteString.Internal.$wensure', msg1])]), (Data.Attoparsec.ByteString.Internal.notWord8 [InlPrag=INLINE (sat-args=1)] :: GHC.Word.Word8 -> Data.Attoparsec.ByteString.Internal.Parser GHC.Word.Word8 [GblId, Arity=1, Str=DmdType L, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta] let { msg0 :: GHC.Base.String [LclId, Str=DmdType] = \u [] let { sat_sohw :: [GHC.Types.Char] [LclId] = \u [] case eta of _ { GHC.Word.W8# x# -> case word2Int# [x#] of sat_soF7 { __DEFAULT -> GHC.Show.itos sat_soF7 GHC.Types.[]; }; }; } in GHC.CString.unpackAppendCString# "not " sat_sohw; } in let { lvl5 :: [GHC.Base.String] [LclId, Unf=OtherCon []] = NO_CCS :! [msg0 GHC.Types.[]]; } in let { sat_soFd :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Word.Word8 r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId] = \r srt:(0,*bitmap*) [i0 a0 m0 kf ks] case i0 of wild { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> let { $wks :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId, Arity=7, Str=DmdType LLLLLLL, Unf=OtherCon []] = sat-only \r srt:(1,*bitmap*) [w w1 w2 ww ww1 ww2 ww3] case plusAddr# [ww ww2] of sat_soFa { __DEFAULT -> case readWord8OffAddr# [sat_soFa 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [ww1 ipv] of _ { __DEFAULT -> case eta of _ { GHC.Word.W8# b1 -> case eqWord# [ipv1 b1] of _ { GHC.Types.False -> let { sat_soF8 :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv1]; } in case -# [ww3 1] of sat_soib { __DEFAULT -> case +# [ww2 1] of sat_soic { __DEFAULT -> let { sat_soF9 :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 sat_soic sat_soib]; } in ks sat_soF9 w1 w2 sat_soF8; }; }; GHC.Types.True -> kf w w1 w2 lvl5 msg1; }; }; }; }; }; } in case >=# [rb3 1] of _ { GHC.Types.False -> let { ks1 [InlPrag=INLINE[0]] :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r [LclId, Arity=4, Str=DmdType LLLU(LLLL), Unf=OtherCon []] = \r [w w1 w2 w3] case w3 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> $wks w w1 w2 ww ww1 ww2 ww3; }; } in let { sat_soFc :: Data.Attoparsec.ByteString.Internal.Failure r [LclId] = \r [i a16 m strs msg] let { sat_soFb :: [GHC.Base.String] [LclId] = NO_CCS :! [msg0 strs]; } in kf i a16 m sat_soFb msg; } in Data.Attoparsec.ByteString.Internal.$wensure' 1 wild a0 m0 sat_soFc ks1; GHC.Types.True -> $wks wild a0 m0 rb rb1 rb2 rb3; }; }; } in sat_soFd;, [(Data.Attoparsec.ByteString.Internal.notWord8, [Data.Attoparsec.ByteString.Internal.$wensure', msg1])]), ($wa11 :: forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Word.Word8 r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=8, Str=DmdType LLLLLLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [ww ww1 ww2 ww3 w w1 w2 w3] case >=# [ww3 1] of _ { GHC.Types.False -> let { ks :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r [LclId, Arity=4, Str=DmdType ALLU(LLLL), Unf=OtherCon []] = \r [i1 a17 m1 a18] case a18 of _ { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case plusAddr# [rb rb2] of sat_soFn { __DEFAULT -> case readWord8OffAddr# [sat_soFn 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [rb1 ipv] of _ { __DEFAULT -> let { sat_soFl :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv1]; } in case -# [rb3 1] of sat_sojw { __DEFAULT -> case +# [rb2 1] of sat_sojx { __DEFAULT -> let { sat_soFm :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [rb rb1 sat_sojx sat_sojw]; } in w3 sat_soFm a17 m1 sat_soFl; }; }; }; }; }; }; } in let { sat_soFp :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r [LclId] = \r srt:(0,*bitmap*) [i1 a17 m1 a18] Data.Attoparsec.ByteString.Internal.$wa 1 i1 a17 m1 w2 ks; } in let { sat_soFq :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 ww2 ww3]; } in Data.Attoparsec.ByteString.Internal.anyWord2 sat_soFq w w1 w2 sat_soFp; GHC.Types.True -> case plusAddr# [ww ww2] of sat_soFx { __DEFAULT -> case readWord8OffAddr# [sat_soFx 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [ww1 ipv] of _ { __DEFAULT -> let { sat_soFv :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv1]; } in case -# [ww3 1] of sat_sok2 { __DEFAULT -> case +# [ww2 1] of sat_sok3 { __DEFAULT -> let { sat_soFw :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 sat_sok3 sat_sok2]; } in w3 sat_soFw w w1 sat_soFv; }; }; }; }; }; };, [($wa11, [Data.Attoparsec.ByteString.Internal.$wa, Data.Attoparsec.ByteString.Internal.anyWord2])]), (a8 :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Word.Word8 r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType U(LLLL)LLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w w1 w2 w3 w4] case w of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> $wa11 ww ww1 ww2 ww3 w1 w2 w3 w4; };, [(a8, [$wa11])]), (Data.Attoparsec.ByteString.Internal.anyWord8 [InlPrag=INLINE (sat-args=0)] :: Data.Attoparsec.ByteString.Internal.Parser GHC.Word.Word8 [GblId, Arity=5, Str=DmdType U(LLLL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a8 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.anyWord8, [$wa11])]), ($wa12 :: forall s. s -> (s -> GHC.Word.Word8 -> Data.Maybe.Maybe s) -> forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=10, Str=DmdType SLLLLLLLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w w1 ww ww1 ww2 ww3 w2 w3 w4 w5] let { $wa16 [Occ=LoopBreaker] :: [Data.ByteString.Internal.ByteString] -> s -> forall r1. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r1 -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r1 [LclId, Arity=9, Str=DmdType LSLLLLLLL, Unf=OtherCon []] = sat-only \r srt:(1,*bitmap*) [w6 w7 ww4 ww5 ww6 ww7 w8 w9 w10] case plusAddr# [ww4 ww6] of a16 [Dmd=Just L] { __DEFAULT -> case plusAddr# [a16 ww7] of a17 [Dmd=Just L] { __DEFAULT -> let { $wa17 [Occ=LoopBreaker] :: GHC.Prim.Addr# -> s -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, Data.Attoparsec.ByteString.Internal.T s #) [LclId, Arity=3, Str=DmdType LSL, Unf=OtherCon []] = sat-only \r [ww8 w11 w12] case w11 of s1 { __DEFAULT -> case ltAddr# [ww8 a17] of _ { GHC.Types.False -> case minusAddr# [ww8 a16] of sat_sol2 { __DEFAULT -> let { sat_soFB :: Data.Attoparsec.ByteString.Internal.T s [LclId] = NO_CCS Data.Attoparsec.ByteString.Internal.T! [sat_sol2 s1]; } in (#,#) [w12 sat_soFB]; }; GHC.Types.True -> case readWord8OffAddr# [ww8 0 w12] of _ { (#,#) ipv ipv1 -> let { sat_soFI :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv1]; } in case w1 s1 sat_soFI of _ { Data.Maybe.Nothing -> case minusAddr# [ww8 a16] of sat_sold { __DEFAULT -> let { sat_soFH :: Data.Attoparsec.ByteString.Internal.T s [LclId] = NO_CCS Data.Attoparsec.ByteString.Internal.T! [sat_sold s1]; } in (#,#) [ipv sat_soFH]; }; Data.Maybe.Just s' -> case plusAddr# [ww8 1] of sat_soFJ { __DEFAULT -> $wa17 sat_soFJ s' ipv; }; }; }; }; }; } in case $wa17 a16 w7 GHC.Prim.realWorld# of _ { (#,#) ipv ipv1 -> case touch# [ww5 ipv] of _ { __DEFAULT -> case ipv1 of _ { Data.Attoparsec.ByteString.Internal.T rb s'1 -> case -# [ww7 rb] of ipv2 [Dmd=Just L] { __DEFAULT -> let { h :: Data.ByteString.Internal.ByteString [LclId, Str=DmdType m, Unf=OtherCon []] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 ww6 rb]; } in case <=# [ipv2 0] of _ { GHC.Types.False -> let { sat_soFC :: [Data.ByteString.Internal.ByteString] [LclId] = NO_CCS :! [h w6]; } in case +# [ww6 rb] of sat_solC { __DEFAULT -> let { sat_soFD :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_solC ipv2]; } in w10 sat_soFD w8 w9 sat_soFC; }; GHC.Types.True -> let { a18 :: [Data.ByteString.Internal.ByteString] [LclId, Str=DmdType, Unf=OtherCon []] = NO_CCS :! [h w6]; } in let { sat_soFF :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r1 [LclId] = \r [i1 a19 m1 a20] case a20 of _ { GHC.Types.False -> w10 i1 a19 m1 a18; GHC.Types.True -> case i1 of _ { Data.ByteString.Internal.PS ww8 ww9 ww10 ww11 -> $wa16 a18 s'1 ww8 ww9 ww10 ww11 a19 m1 w10; }; }; } in case +# [ww6 rb] of sat_soFE { __DEFAULT -> let { sat_soFG :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_soFE ipv2]; } in Data.Attoparsec.ByteString.Internal.$wa1 sat_soFG w8 w9 sat_soFF; }; }; }; }; }; }; }; }; } in let { sat_soFO :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r [LclId] = \r srt:(0,*bitmap*) [i1 a17 m1 a18] let { $wfail :: forall r1. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r1 -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r1 -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r1 [LclId, Str=DmdType] = \u srt:(0,*bitmap*) [] case GHC.List.reverse1 a18 GHC.Types.[] of sat_soFL { __DEFAULT -> case Data.ByteString.Internal.$fMonoidByteString_$cmconcat sat_soFL of vx { Data.ByteString.Internal.PS ipv ipv1 ipv2 ipv3 -> let { sat_soFK :: forall r1. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r1 -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r1 -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r1 [LclId] = \r [i0 a0 m0 _kf ks] ks i0 a0 m0 vx; } in sat_soFK; }; }; } in case a18 of _ { [] -> $wfail i1 a17 m1 w4 w5; : x ds -> case ds of _ { [] -> w5 i1 a17 m1 x; : ipv ipv1 -> $wfail i1 a17 m1 w4 w5; }; }; } in $wa16 GHC.Types.[] w ww ww1 ww2 ww3 w2 w3 sat_soFO;, [($wa12, [Data.ByteString.Internal.$fMonoidByteString_$cmconcat, Data.ByteString.Internal.$w$cmappend])]), (a9 :: forall s. s -> (s -> GHC.Word.Word8 -> Data.Maybe.Maybe s) -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=7, Str=DmdType SLU(LLLL)LLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w w1 w2 w3 w4 w5 w6] case w2 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> $wa12 w w1 ww ww1 ww2 ww3 w3 w4 w5 w6; };, [(a9, [$wa12])]), (Data.Attoparsec.ByteString.Internal.scan [InlPrag=INLINE (sat-args=2)] :: forall s. s -> (s -> GHC.Word.Word8 -> Data.Maybe.Maybe s) -> Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Internal.ByteString [GblId, Arity=7, Str=DmdType SLU(LLLL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B7 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a9 eta_B7 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.scan, [$wa12])]), (msg3 :: [GHC.Types.Char] [GblId, Str=DmdType] = \u [] GHC.CString.unpackCString# "Failed reading: satisfyWith";, [(msg3, [])]), (a10 :: forall a. (GHC.Word.Word8 -> a) -> (a -> GHC.Types.Bool) -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString a r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=7, Str=DmdType LLS(AAAL)LLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [eta eta1 eta2 eta3 eta4 eta5 eta6] case eta2 of wild { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> case >=# [rb3 1] of _ { GHC.Types.False -> let { ks0 :: Data.Attoparsec.ByteString.Internal.Success Data.ByteString.Internal.ByteString r [LclId, Arity=4, Str=DmdType LLLL, Unf=OtherCon []] = \r srt:(2,*bitmap*) [i1 a17 m1 a18] let { c [Dmd=Just L] :: a [LclId, Str=DmdType] = \u [] case a18 of _ { Data.ByteString.Internal.PS rb4 rb5 rb6 rb7 -> case plusAddr# [rb4 rb6] of sat_soG6 { __DEFAULT -> case readWord8OffAddr# [sat_soG6 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [rb5 ipv] of _ { __DEFAULT -> let { sat_soG5 :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv1]; } in eta sat_soG5; }; }; }; }; } in case eta1 c of _ { GHC.Types.False -> eta5 i1 a17 m1 GHC.Types.[] msg3; GHC.Types.True -> case a18 of _ { Data.ByteString.Internal.PS rb4 rb5 rb6 rb7 -> case -# [rb7 1] of sat_sooa { __DEFAULT -> case +# [rb6 1] of sat_soob { __DEFAULT -> let { sat_soG7 :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [rb4 rb5 sat_soob sat_sooa]; } in eta6 sat_soG7 a17 m1 c; }; }; }; }; } in let { sat_soG9 :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r [LclId] = \r srt:(0,*bitmap*) [i1 a17 m1 a18] Data.Attoparsec.ByteString.Internal.$wa 1 i1 a17 m1 eta5 ks0; } in Data.Attoparsec.ByteString.Internal.anyWord2 wild eta3 eta4 eta5 sat_soG9; GHC.Types.True -> let { c [Dmd=Just L] :: a [LclId, Str=DmdType] = \u [] case plusAddr# [rb rb2] of sat_soGi { __DEFAULT -> case readWord8OffAddr# [sat_soGi 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [rb1 ipv] of _ { __DEFAULT -> let { sat_soGh :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv1]; } in eta sat_soGh; }; }; }; } in case eta1 c of _ { GHC.Types.False -> eta5 wild eta3 eta4 GHC.Types.[] msg3; GHC.Types.True -> case -# [rb3 1] of sat_sooF { __DEFAULT -> case +# [rb2 1] of sat_sooG { __DEFAULT -> let { sat_soGj :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [rb rb1 sat_sooG sat_sooF]; } in eta6 sat_soGj eta3 eta4 c; }; }; }; }; };, [(a10, [Data.Attoparsec.ByteString.Internal.$wa, Data.Attoparsec.ByteString.Internal.anyWord2, msg3])]), (Data.Attoparsec.ByteString.Internal.satisfyWith [InlPrag=INLINE (sat-args=2)] :: forall a. (GHC.Word.Word8 -> a) -> (a -> GHC.Types.Bool) -> Data.Attoparsec.ByteString.Internal.Parser a [GblId, Arity=7, Str=DmdType LLS(AAAL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B7 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a10 eta_B7 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.satisfyWith, [a10])]), (Data.Attoparsec.ByteString.Internal.$wa5 :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=4, Str=DmdType S(LLLL)LLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3] let { sat_soGo :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r [LclId] = \r srt:(0,*bitmap*) [i1 a17 s1 a18] let { sat_soGn :: Data.ByteString.Internal.ByteString [LclId] = \u srt:(0,*bitmap*) [] Data.ByteString.Internal.$fMonoidByteString_$cmconcat a18; } in w3 i1 a17 s1 sat_soGn; } in Data.Attoparsec.ByteString.Internal.$wa6 GHC.Types.[] w w1 w2 sat_soGo;, [(Data.Attoparsec.ByteString.Internal.$wa5, [Data.ByteString.Internal.$fMonoidByteString_$cmconcat, Data.Attoparsec.ByteString.Internal.$wa6])]), (Data.Attoparsec.ByteString.Internal.takeByteString1 [InlPrag=INLINE[0]] :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType S(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3 w4] Data.Attoparsec.ByteString.Internal.$wa5 w w1 w2 w4;, [(Data.Attoparsec.ByteString.Internal.takeByteString1, [Data.Attoparsec.ByteString.Internal.$wa5])]), (Data.Attoparsec.ByteString.Internal.takeByteString :: Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Internal.ByteString [GblId, Arity=5, Str=DmdType S(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.takeByteString1 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.takeByteString, [Data.Attoparsec.ByteString.Internal.$wa5])]), (Data.Attoparsec.ByteString.Internal.$wa7 :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Lazy.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=4, Str=DmdType S(LLLL)LLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3] let { sat_soGq :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r [LclId] = \r [i1 a17 s1 a18] let { sat_soGp :: Data.ByteString.Lazy.Internal.ByteString [LclId] = \u [] Data.ByteString.Lazy.fromChunks_go a18; } in w3 i1 a17 s1 sat_soGp; } in Data.Attoparsec.ByteString.Internal.$wa6 GHC.Types.[] w w1 w2 sat_soGq;, [(Data.Attoparsec.ByteString.Internal.$wa7, [Data.Attoparsec.ByteString.Internal.$wa6])]), (Data.Attoparsec.ByteString.Internal.takeLazyByteString1 [InlPrag=INLINE[0]] :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Lazy.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType S(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3 w4] Data.Attoparsec.ByteString.Internal.$wa7 w w1 w2 w4;, [(Data.Attoparsec.ByteString.Internal.takeLazyByteString1, [Data.Attoparsec.ByteString.Internal.$wa6])]), (Data.Attoparsec.ByteString.Internal.takeLazyByteString :: Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Lazy.Internal.ByteString [GblId, Arity=5, Str=DmdType S(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.takeLazyByteString1 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.takeLazyByteString, [Data.Attoparsec.ByteString.Internal.$wa6])]), ($wa13 :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=4, Str=DmdType S(LLLL)LLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w w1 w2 w3] let { sat_soGs :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r [LclId] = \r [i1 a17 s1 a18] let { sat_soGr :: GHC.Types.Bool [LclId] = \u [] case a18 of _ { GHC.Types.False -> GHC.Types.True []; GHC.Types.True -> GHC.Types.False []; }; } in w3 i1 a17 s1 sat_soGr; } in Data.Attoparsec.ByteString.Internal.$wa1 w w1 w2 sat_soGs;, [($wa13, [Data.ByteString.Internal.$w$cmappend])]), (a11 :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType S(LLLL)LLAL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w w1 w2 w3 w4] $wa13 w w1 w2 w4;, [(a11, [Data.ByteString.Internal.$w$cmappend])]), (Data.Attoparsec.ByteString.Internal.atEnd [InlPrag=INLINE (sat-args=0)] :: Data.Attoparsec.ByteString.Internal.Parser GHC.Types.Bool [GblId, Arity=5, Str=DmdType S(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a11 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.atEnd, [Data.ByteString.Internal.$w$cmappend])]), (cs :: [GHC.Types.Char] [GblId, Str=DmdType] = \u [] GHC.CString.unpackCString# "\r";, [(cs, [])]), (lvl4 :: GHC.Types.Int [GblId] = \u srt:(0,*bitmap*) [] case GHC.List.$wlen cs 0 of ww { __DEFAULT -> GHC.Types.I# [ww]; };, [(lvl4, [cs])]), (s :: Data.ByteString.Internal.ByteString [GblId, Str=DmdType] = \u srt:(0,*bitmap*) [] Data.ByteString.Internal.unsafePackLenChars lvl4 cs;, [(s, [Data.ByteString.Internal.unsafePackLenChars, cs, lvl4])]), (a12 :: GHC.Types.Int [GblId, Str=DmdType] = \u srt:(0,*bitmap*) [] case s of _ { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> GHC.Types.I# [rb3]; };, [(a12, [s])]), (a13 :: Data.ByteString.Internal.ByteString -> GHC.Types.Bool [GblId, Arity=1, Str=DmdType U(LLLL), Unf=OtherCon []] = \r srt:(0,*bitmap*) [ds] Data.ByteString.Internal.eq ds s;, [(a13, [s])]), (Data.Attoparsec.ByteString.Internal.$wa3 :: forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=8, Str=DmdType LLLLLLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [ww ww1 ww2 ww3 w w1 w2 w3] let { lvl5 :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId, Arity=4, Unf=OtherCon []] = \r [i1 a17 m1 a18] w3 i1 a17 m1 GHC.Tuple.(); } in let { $wkf :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId, Arity=5, Str=DmdType LLLLL, Unf=OtherCon []] = sat-only \r srt:(2,*bitmap*) [ww4 ww5 ww6 ww7 w4] case case w1 of _ { Data.Attoparsec.Internal.Types.Complete -> Data.Attoparsec.Internal.Types.Complete []; Data.Attoparsec.Internal.Types.Incomplete -> w4; } of m { __DEFAULT -> case Data.ByteString.Internal.$w$cmappend ww ww1 ww2 ww3 ww4 ww5 ww6 ww7 of nt { Data.ByteString.Internal.PS ipv ipv1 ipv2 ipv3 -> case a12 of _ { GHC.Types.I# ww8 -> let { sat_soGy :: Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString [LclId] = \u srt:(2,*bitmap*) [] case w of _ { Data.ByteString.Internal.PS ww9 ww10 ww11 ww12 -> Data.ByteString.Internal.$w$cmappend ww9 ww10 ww11 ww12 ww4 ww5 ww6 ww7; }; } in Data.Attoparsec.ByteString.Internal.$wa4 ww8 a13 nt sat_soGy m w2 lvl5; }; }; }; } in let-no-escape { $s$wks :: Data.Attoparsec.Internal.Types.More -> GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> (GHC.Prim.~#) * Data.ByteString.Internal.ByteString (Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString) -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId, Arity=6, Str=DmdType LLLLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [sc sc1 sc2 sc3 sc4 sg] case plusAddr# [sc1 sc3] of sat_soGz { __DEFAULT -> case readWord8OffAddr# [sat_soGz 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [sc2 ipv] of _ { __DEFAULT -> case eqWord# [ipv1 __word 10] of _ { GHC.Types.False -> $wkf __NULL Data.ByteString.Internal.$fMonoidByteString1 0 0 sc; GHC.Types.True -> let { sat_soGG :: Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString [LclId] = \u srt:(0,*bitmap*) [] case w of _ { Data.ByteString.Internal.PS ww4 ww5 ww6 ww7 -> Data.ByteString.Internal.$w$cmappend ww4 ww5 ww6 ww7 __NULL Data.ByteString.Internal.$fMonoidByteString1 0 0; }; } in case -# [sc4 1] of sat_sory { __DEFAULT -> case +# [sc3 1] of sat_sorz { __DEFAULT -> let { sat_soGH :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [sc1 sc2 sat_sorz sat_sory]; } in w3 sat_soGH sat_soGG sc GHC.Tuple.(); }; }; }; }; }; }; } in let { $wks :: Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId, Arity=6, Str=DmdType LLLLLL, Unf=OtherCon []] = sat-only \r srt:(1,*bitmap*) [w4 w5 ww4 ww5 ww6 ww7] case plusAddr# [ww4 ww6] of sat_soGA { __DEFAULT -> case readWord8OffAddr# [sat_soGA 0 GHC.Prim.realWorld#] of _ { (#,#) ipv ipv1 -> case touch# [ww5 ipv] of _ { __DEFAULT -> case eqWord# [ipv1 __word 10] of _ { GHC.Types.False -> case w4 of _ { Data.ByteString.Internal.PS ww8 ww9 ww10 ww11 -> $wkf ww8 ww9 ww10 ww11 w5; }; GHC.Types.True -> let { sat_soGE :: Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString [LclId] = \u srt:(1,*bitmap*) [] Data.ByteString.Internal.$fMonoidByteString_$cmappend w w4; } in case -# [ww7 1] of sat_sosi { __DEFAULT -> case +# [ww6 1] of sat_sosj { __DEFAULT -> let { sat_soGF :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_sosj sat_sosi]; } in w3 sat_soGF sat_soGE w5 GHC.Tuple.(); }; }; }; }; }; }; } in case >=# [ww3 1] of _ { GHC.Types.False -> let { kf [InlPrag=INLINE[0]] :: Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r [LclId, Arity=5, Str=DmdType AU(LLLL)LAA, Unf=OtherCon []] = \r [w4 w5 w6 w7 w8] case w5 of _ { Data.ByteString.Internal.PS ww4 ww5 ww6 ww7 -> $wkf ww4 ww5 ww6 ww7 w6; }; } in let { ks [InlPrag=INLINE[0]] :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r [LclId, Arity=4, Str=DmdType ALLU(LLLL), Unf=OtherCon []] = \r [w4 w5 w6 w7] case w7 of _ { Data.ByteString.Internal.PS ww4 ww5 ww6 ww7 -> $wks w5 w6 ww4 ww5 ww6 ww7; }; } in let { sat_soGC :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r [LclId] = \r srt:(5,*bitmap*) [i1 a17 m1 a18] Data.Attoparsec.ByteString.Internal.$wa 1 i1 a17 m1 kf ks; } in let { sat_soGD :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 ww2 ww3]; } in Data.Attoparsec.ByteString.Internal.anyWord2 sat_soGD Data.ByteString.Internal.$fMonoidByteString_$cmempty w1 kf sat_soGC; GHC.Types.True -> $s$wks w1 ww ww1 ww2 ww3 GHC.Prim.coercionToken#; };, [(Data.Attoparsec.ByteString.Internal.$wa3, [Data.ByteString.Internal.$fMonoidByteString1, Data.ByteString.Internal.$fMonoidByteString_$cmappend, Data.ByteString.Internal.$w$cmappend, Data.ByteString.Internal.$fMonoidByteString_$cmempty, Data.Attoparsec.ByteString.Internal.$wa4, Data.Attoparsec.ByteString.Internal.$wa, Data.Attoparsec.ByteString.Internal.anyWord2, a12, s])]), (Data.Attoparsec.ByteString.Internal.endOfLine1 [InlPrag=INLINE[0]] :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=5, Str=DmdType U(LLLL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3 w4] case w of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> Data.Attoparsec.ByteString.Internal.$wa3 ww ww1 ww2 ww3 w1 w2 w3 w4; };, [(Data.Attoparsec.ByteString.Internal.endOfLine1, [Data.Attoparsec.ByteString.Internal.$wa3])]), (Data.Attoparsec.ByteString.Internal.endOfLine :: Data.Attoparsec.ByteString.Internal.Parser () [GblId, Arity=5, Str=DmdType U(LLLL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.endOfLine1 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.endOfLine, [Data.Attoparsec.ByteString.Internal.$wa3])]), ($wa14 :: (GHC.Word.Word8 -> GHC.Types.Bool) -> forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=8, Str=DmdType LLLLLLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w ww ww1 ww2 ww3 w1 w2 w3] let { $wa16 [Occ=LoopBreaker] :: [Data.ByteString.Internal.ByteString] -> forall r1. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r1 -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r1 [LclId, Arity=8, Str=DmdType LLLLLLLL, Unf=OtherCon []] = sat-only \r srt:(1,*bitmap*) [w4 ww4 ww5 ww6 ww7 w5 w6 w7] let { l :: GHC.Types.Int [LclId, Str=DmdType m, Unf=OtherCon []] = NO_CCS GHC.Types.I#! [ww7]; } in let { $wa17 [Occ=LoopBreaker] :: GHC.Prim.Addr# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Types.Int #) [LclId, Arity=3, Str=DmdType LLL, Unf=OtherCon []] = sat-only \r [ww8 ww9 w8] case >=# [ww9 ww7] of _ { GHC.Types.False -> case readWord8OffAddr# [ww8 0 w8] of _ { (#,#) ipv2 ipv3 -> let { sat_soH2 :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv3]; } in case w sat_soH2 of _ { GHC.Types.False -> let { sat_soH1 :: GHC.Types.Int [LclId] = NO_CCS GHC.Types.I#! [ww9]; } in (#,#) [ipv2 sat_soH1]; GHC.Types.True -> case +# [ww9 1] of sat_soH3 { __DEFAULT -> case plusAddr# [ww8 1] of sat_soH4 { __DEFAULT -> $wa17 sat_soH4 sat_soH3 ipv2; }; }; }; }; GHC.Types.True -> (#,#) [w8 l]; }; } in case plusAddr# [ww4 ww6] of sat_soHa { __DEFAULT -> case $wa17 sat_soHa 0 GHC.Prim.realWorld# of _ { (#,#) ipv ipv1 -> case touch# [ww5 ipv] of _ { __DEFAULT -> case ipv1 of _ { GHC.Types.I# ww8 -> case -# [ww7 ww8] of rb3 [Dmd=Just L] { __DEFAULT -> let { h :: Data.ByteString.Internal.ByteString [LclId, Str=DmdType, Unf=OtherCon []] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 ww6 ww8]; } in case <=# [rb3 0] of _ { GHC.Types.False -> let { sat_soH5 :: [Data.ByteString.Internal.ByteString] [LclId] = NO_CCS :! [h w4]; } in case +# [ww6 ww8] of sat_sous { __DEFAULT -> let { sat_soH6 :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_sous rb3]; } in w7 sat_soH6 w5 w6 sat_soH5; }; GHC.Types.True -> let { a16 :: [Data.ByteString.Internal.ByteString] [LclId, Str=DmdType, Unf=OtherCon []] = NO_CCS :! [h w4]; } in let { sat_soH8 :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r1 [LclId] = \r [i1 a17 m1 a18] case a18 of _ { GHC.Types.False -> w7 i1 a17 m1 a16; GHC.Types.True -> case i1 of _ { Data.ByteString.Internal.PS ww9 ww10 ww11 ww12 -> $wa16 a16 ww9 ww10 ww11 ww12 a17 m1 w7; }; }; } in case +# [ww6 ww8] of sat_soH7 { __DEFAULT -> let { sat_soH9 :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_soH7 rb3]; } in Data.Attoparsec.ByteString.Internal.$wa1 sat_soH9 w5 w6 sat_soH8; }; }; }; }; }; }; }; } in let { sat_soHd :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r [LclId] = \r srt:(0,*bitmap*) [i1 a17 s1 a18] let { sat_soHc :: Data.ByteString.Internal.ByteString [LclId] = \u srt:(0,*bitmap*) [] case GHC.List.reverse1 a18 GHC.Types.[] of sat_soHb { __DEFAULT -> Data.ByteString.Internal.$fMonoidByteString_$cmconcat sat_soHb; }; } in w3 i1 a17 s1 sat_soHc; } in $wa16 GHC.Types.[] ww ww1 ww2 ww3 w1 w2 sat_soHd;, [($wa14, [Data.ByteString.Internal.$fMonoidByteString_$cmconcat, Data.ByteString.Internal.$w$cmappend])]), (a14 :: (GHC.Word.Word8 -> GHC.Types.Bool) -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType LU(LLLL)LLAL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w w1 w2 w3 w4 w5] case w1 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> $wa14 w ww ww1 ww2 ww3 w2 w3 w5; };, [(a14, [$wa14])]), (Data.Attoparsec.ByteString.Internal.takeWhile [InlPrag=INLINE (sat-args=1)] :: (GHC.Word.Word8 -> GHC.Types.Bool) -> Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Internal.ByteString [GblId, Arity=6, Str=DmdType LU(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a14 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.takeWhile, [$wa14])]), (msg4 :: [GHC.Types.Char] [GblId, Str=DmdType] = \u [] GHC.CString.unpackCString# "Failed reading: takeWhile1";, [(msg4, [])]), (Data.Attoparsec.ByteString.Internal.$wa8 :: (GHC.Word.Word8 -> GHC.Types.Bool) -> forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=9, Str=DmdType LLLLLLLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w ww ww1 ww2 ww3 w1 w2 w3 w4] let { $wa16 [Occ=LoopBreaker] :: [Data.ByteString.Internal.ByteString] -> forall r1. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r1 -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r1 [LclId, Arity=8, Str=DmdType LLLLLLLL, Unf=OtherCon []] = sat-only \r srt:(2,*bitmap*) [w5 ww4 ww5 ww6 ww7 w6 w7 w8] let { l :: GHC.Types.Int [LclId, Str=DmdType m, Unf=OtherCon []] = NO_CCS GHC.Types.I#! [ww7]; } in let { $wa17 [Occ=LoopBreaker] :: GHC.Prim.Addr# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Types.Int #) [LclId, Arity=3, Str=DmdType LLL, Unf=OtherCon []] = sat-only \r [ww8 ww9 w9] case >=# [ww9 ww7] of _ { GHC.Types.False -> case readWord8OffAddr# [ww8 0 w9] of _ { (#,#) ipv2 ipv3 -> let { sat_soHp :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv3]; } in case w sat_soHp of _ { GHC.Types.False -> let { sat_soHo :: GHC.Types.Int [LclId] = NO_CCS GHC.Types.I#! [ww9]; } in (#,#) [ipv2 sat_soHo]; GHC.Types.True -> case +# [ww9 1] of sat_soHq { __DEFAULT -> case plusAddr# [ww8 1] of sat_soHr { __DEFAULT -> $wa17 sat_soHr sat_soHq ipv2; }; }; }; }; GHC.Types.True -> (#,#) [w9 l]; }; } in case plusAddr# [ww4 ww6] of sat_soHw { __DEFAULT -> case $wa17 sat_soHw 0 GHC.Prim.realWorld# of _ { (#,#) ipv ipv1 -> case touch# [ww5 ipv] of _ { __DEFAULT -> case ipv1 of _ { GHC.Types.I# ww8 -> case -# [ww7 ww8] of rb3 [Dmd=Just L] { __DEFAULT -> let { h :: Data.ByteString.Internal.ByteString [LclId, Str=DmdType, Unf=OtherCon []] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 ww6 ww8]; } in let { lvl5 :: [Data.ByteString.Internal.ByteString] [LclId, Unf=OtherCon []] = NO_CCS :! [h w5]; } in case <=# [rb3 0] of _ { GHC.Types.False -> case +# [ww6 ww8] of sat_sowB { __DEFAULT -> let { sat_soHs :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_sowB rb3]; } in w8 sat_soHs w6 w7 lvl5; }; GHC.Types.True -> let { sat_soHu :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r1 [LclId] = \r [i1 a17 m1 a18] case a18 of _ { GHC.Types.False -> w8 i1 a17 m1 lvl5; GHC.Types.True -> case i1 of _ { Data.ByteString.Internal.PS ww9 ww10 ww11 ww12 -> $wa16 lvl5 ww9 ww10 ww11 ww12 a17 m1 w8; }; }; } in case +# [ww6 ww8] of sat_soHt { __DEFAULT -> let { sat_soHv :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_soHt rb3]; } in Data.Attoparsec.ByteString.Internal.$wa1 sat_soHv w6 w7 sat_soHu; }; }; }; }; }; }; }; } in let { $weta :: GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId, Arity=6, Str=DmdType LLLLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [ww4 ww5 ww6 ww7 w5 w6] let { l :: GHC.Types.Int [LclId, Str=DmdType m, Unf=OtherCon []] = NO_CCS GHC.Types.I#! [ww7]; } in let { $wa17 [Occ=LoopBreaker] :: GHC.Prim.Addr# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Types.Int #) [LclId, Arity=3, Str=DmdType LLL, Unf=OtherCon []] = sat-only \r [ww8 ww9 w7] case >=# [ww9 ww7] of _ { GHC.Types.False -> case readWord8OffAddr# [ww8 0 w7] of _ { (#,#) ipv2 ipv3 -> let { sat_soHy :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv3]; } in case w sat_soHy of _ { GHC.Types.False -> let { sat_soHx :: GHC.Types.Int [LclId] = NO_CCS GHC.Types.I#! [ww9]; } in (#,#) [ipv2 sat_soHx]; GHC.Types.True -> case +# [ww9 1] of sat_soHz { __DEFAULT -> case plusAddr# [ww8 1] of sat_soHA { __DEFAULT -> $wa17 sat_soHA sat_soHz ipv2; }; }; }; }; GHC.Types.True -> (#,#) [w7 l]; }; } in case plusAddr# [ww4 ww6] of sat_soHD { __DEFAULT -> case $wa17 sat_soHD 0 GHC.Prim.realWorld# of _ { (#,#) ipv ipv1 -> case touch# [ww5 ipv] of _ { __DEFAULT -> case ipv1 of _ { GHC.Types.I# tpl1 -> case <=# [tpl1 0] of _ { GHC.Types.False -> case -# [ww7 tpl1] of rb3 [Dmd=Just L] { __DEFAULT -> case <=# [rb3 0] of _ { GHC.Types.False -> let { sat_soHB :: Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 ww6 tpl1]; } in case +# [ww6 tpl1] of sat_soxN { __DEFAULT -> let { sat_soHC :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_soxN rb3]; } in w4 sat_soHC w5 w6 sat_soHB; }; GHC.Types.True -> let { sat_soHH :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r [LclId] = \r srt:(0,*bitmap*) [i1 a17 s1 a18] let { sat_soHG :: Data.ByteString.Internal.ByteString [LclId] = \u srt:(0,*bitmap*) [] case GHC.List.reverse1 a18 GHC.Types.[] of sat_soHF { __DEFAULT -> case Data.ByteString.Internal.$fMonoidByteString_$cmconcat sat_soHF of _ { Data.ByteString.Internal.PS ww8 ww9 ww10 ww11 -> Data.ByteString.Internal.$w$cmappend ww4 ww5 ww6 tpl1 ww8 ww9 ww10 ww11; }; }; } in w4 i1 a17 s1 sat_soHG; } in case +# [ww6 tpl1] of sat_soHI { __DEFAULT -> $wa16 GHC.Types.[] ww4 ww5 sat_soHI rb3 w5 w6 sat_soHH; }; }; }; GHC.Types.True -> let { sat_soHE :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 ww6 ww7]; } in w3 sat_soHE w5 w6 GHC.Types.[] msg4; }; }; }; }; }; } in case <=# [ww3 0] of _ { GHC.Types.False -> $weta ww ww1 ww2 ww3 w1 w2; GHC.Types.True -> let { eta [InlPrag=INLINE[0]] :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString () r [LclId, Arity=4, Str=DmdType U(LLLL)LLA, Unf=OtherCon []] = \r [w5 w6 w7 w8] case w5 of _ { Data.ByteString.Internal.PS ww4 ww5 ww6 ww7 -> $weta ww4 ww5 ww6 ww7 w6 w7; }; } in let { sat_soHJ :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww ww1 ww2 ww3]; } in Data.Attoparsec.ByteString.Internal.anyWord2 sat_soHJ w1 w2 w3 eta; };, [(Data.Attoparsec.ByteString.Internal.$wa8, [Data.ByteString.Internal.$fMonoidByteString_$cmconcat, Data.ByteString.Internal.$w$cmappend, Data.ByteString.Internal.$w$cmappend, Data.Attoparsec.ByteString.Internal.anyWord2, msg4])]), (Data.Attoparsec.ByteString.Internal.takeWhile2 [InlPrag=INLINE[0]] :: (GHC.Word.Word8 -> GHC.Types.Bool) -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType LU(LLLL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [w w1 w2 w3 w4 w5] case w1 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> Data.Attoparsec.ByteString.Internal.$wa8 w ww ww1 ww2 ww3 w2 w3 w4 w5; };, [(Data.Attoparsec.ByteString.Internal.takeWhile2, [Data.Attoparsec.ByteString.Internal.$wa8])]), (Data.Attoparsec.ByteString.Internal.takeWhile1 :: (GHC.Word.Word8 -> GHC.Types.Bool) -> Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Internal.ByteString [GblId, Arity=6, Str=DmdType LU(LLLL)LLLL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.takeWhile2 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.takeWhile1, [Data.Attoparsec.ByteString.Internal.$wa8])]), ($wa15 :: (GHC.Word.Word8 -> GHC.Types.Bool) -> forall r. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=8, Str=DmdType LLLLLLLL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w ww ww1 ww2 ww3 w1 w2 w3] let { $wa16 [Occ=LoopBreaker] :: [Data.ByteString.Internal.ByteString] -> forall r1. GHC.Prim.Addr# -> GHC.ForeignPtr.ForeignPtrContents -> GHC.Prim.Int# -> GHC.Prim.Int# -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r1 -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r1 [LclId, Arity=8, Str=DmdType LLLLLLLL, Unf=OtherCon []] = sat-only \r srt:(1,*bitmap*) [w4 ww4 ww5 ww6 ww7 w5 w6 w7] let { l :: GHC.Types.Int [LclId, Str=DmdType m, Unf=OtherCon []] = NO_CCS GHC.Types.I#! [ww7]; } in let { $wa17 [Occ=LoopBreaker] :: GHC.Prim.Addr# -> GHC.Prim.Int# -> GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, GHC.Types.Int #) [LclId, Arity=3, Str=DmdType LLL, Unf=OtherCon []] = sat-only \r [ww8 ww9 w8] case >=# [ww9 ww7] of _ { GHC.Types.False -> case readWord8OffAddr# [ww8 0 w8] of _ { (#,#) ipv2 ipv3 -> let { sat_soI7 :: GHC.Word.Word8 [LclId] = NO_CCS GHC.Word.W8#! [ipv3]; } in case w sat_soI7 of _ { GHC.Types.False -> case +# [ww9 1] of sat_soI5 { __DEFAULT -> case plusAddr# [ww8 1] of sat_soI6 { __DEFAULT -> $wa17 sat_soI6 sat_soI5 ipv2; }; }; GHC.Types.True -> let { sat_soI8 :: GHC.Types.Int [LclId] = NO_CCS GHC.Types.I#! [ww9]; } in (#,#) [ipv2 sat_soI8]; }; }; GHC.Types.True -> (#,#) [w8 l]; }; } in case plusAddr# [ww4 ww6] of sat_soId { __DEFAULT -> case $wa17 sat_soId 0 GHC.Prim.realWorld# of _ { (#,#) ipv ipv1 -> case touch# [ww5 ipv] of _ { __DEFAULT -> case ipv1 of _ { GHC.Types.I# ww8 -> case -# [ww7 ww8] of rb3 [Dmd=Just L] { __DEFAULT -> let { h :: Data.ByteString.Internal.ByteString [LclId, Str=DmdType, Unf=OtherCon []] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 ww6 ww8]; } in let { lvl5 :: [Data.ByteString.Internal.ByteString] [LclId, Unf=OtherCon []] = NO_CCS :! [h w4]; } in case <=# [rb3 0] of _ { GHC.Types.False -> case +# [ww6 ww8] of sat_soA3 { __DEFAULT -> let { sat_soI9 :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_soA3 rb3]; } in w7 sat_soI9 w5 w6 lvl5; }; GHC.Types.True -> let { sat_soIb :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString GHC.Types.Bool r1 [LclId] = \r [i1 a17 m1 a18] case a18 of _ { GHC.Types.False -> w7 i1 a17 m1 lvl5; GHC.Types.True -> case i1 of _ { Data.ByteString.Internal.PS ww9 ww10 ww11 ww12 -> $wa16 lvl5 ww9 ww10 ww11 ww12 a17 m1 w7; }; }; } in case +# [ww6 ww8] of sat_soIa { __DEFAULT -> let { sat_soIc :: Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString [LclId] = NO_CCS Data.ByteString.Internal.PS! [ww4 ww5 sat_soIa rb3]; } in Data.Attoparsec.ByteString.Internal.$wa1 sat_soIc w5 w6 sat_soIb; }; }; }; }; }; }; }; } in let { sat_soIg :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString [Data.ByteString.Internal.ByteString] r [LclId] = \r srt:(0,*bitmap*) [i1 a17 s1 a18] let { sat_soIf :: Data.ByteString.Internal.ByteString [LclId] = \u srt:(0,*bitmap*) [] case GHC.List.reverse1 a18 GHC.Types.[] of sat_soIe { __DEFAULT -> Data.ByteString.Internal.$fMonoidByteString_$cmconcat sat_soIe; }; } in w3 i1 a17 s1 sat_soIf; } in $wa16 GHC.Types.[] ww ww1 ww2 ww3 w1 w2 sat_soIg;, [($wa15, [Data.ByteString.Internal.$fMonoidByteString_$cmconcat, Data.ByteString.Internal.$w$cmappend])]), (a15 :: (GHC.Word.Word8 -> GHC.Types.Bool) -> forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [GblId, Arity=6, Str=DmdType LU(LLLL)LLAL, Unf=OtherCon []] = sat-only \r srt:(0,*bitmap*) [w w1 w2 w3 w4 w5] case w1 of _ { Data.ByteString.Internal.PS ww ww1 ww2 ww3 -> $wa15 w ww ww1 ww2 ww3 w2 w3 w5; };, [(a15, [$wa15])]), (Data.Attoparsec.ByteString.Internal.takeTill [InlPrag=INLINE (sat-args=1)] :: (GHC.Word.Word8 -> GHC.Types.Bool) -> Data.Attoparsec.ByteString.Internal.Parser Data.ByteString.Internal.ByteString [GblId, Arity=6, Str=DmdType LU(LLLL)LLAL, Unf=OtherCon []] = \r srt:(0,*bitmap*) [eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1] a15 eta_B6 eta_B5 eta_B4 eta_B3 eta_B2 eta_B1;, [(Data.Attoparsec.ByteString.Internal.takeTill, [$wa15])]), (Data.Attoparsec.ByteString.Internal.storable1 :: Data.ByteString.Internal.ByteString -> GHC.Types.Bool [GblId, Arity=1, Caf=NoCafRefs, Str=DmdType A, Unf=OtherCon []] = \r [eta_B1] lvl3 eta_B1;, [(Data.Attoparsec.ByteString.Internal.storable1, [])]), (Data.Attoparsec.ByteString.Internal.storable :: forall a. Foreign.Storable.Storable a => Data.Attoparsec.ByteString.Internal.Parser a [GblId, Arity=1, Str=DmdType L, Unf=OtherCon []] = \r srt:(0,*bitmap*) [$dStorable] let { a16 [Dmd=Just D(L)] :: GHC.Types.Int [LclId, Str=DmdType] = \u srt:(0,*bitmap*) [] Foreign.Storable.sizeOf $dStorable GHC.Err.undefined; } in let { lvl5 :: GHC.Ptr.Ptr a -> GHC.Types.IO a [LclId] = \u [] Foreign.Storable.peek $dStorable; } in let { sat_soIu :: forall r. Data.Attoparsec.Internal.Types.Input Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.Added Data.ByteString.Internal.ByteString -> Data.Attoparsec.Internal.Types.More -> Data.Attoparsec.Internal.Types.Failure Data.ByteString.Internal.ByteString r -> Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString a r -> Data.Attoparsec.Internal.Types.IResult Data.ByteString.Internal.ByteString r [LclId] = \r srt:(1,*bitmap*) [i0 a0 m0 kf ks] case a16 of _ { GHC.Types.I# ww -> let { sat_soIt :: Data.Attoparsec.Internal.Types.Success Data.ByteString.Internal.ByteString Data.ByteString.Internal.ByteString r [LclId] = \r [i1 a17 s1 a18] case a18 of _ { Data.ByteString.Internal.PS rb rb1 rb2 rb3 -> let { sat_soIs :: a [LclId] = \u [] case plusAddr# [rb rb2] of sat_soBE { __DEFAULT -> let { sat_soIr :: GHC.Ptr.Ptr a [LclId] = NO_CCS GHC.Ptr.Ptr! [sat_soBE]; } in case lvl5 sat_soIr GHC.Prim.realWorld# of _ { (#,#) ipv ipv1 -> case touch# [rb1 ipv] of _ { __DEFAULT -> ipv1; }; }; }; } in ks i1 a17 s1 sat_soIs; }; } in Data.Attoparsec.ByteString.Internal.$wa4 ww Data.Attoparsec.ByteString.Internal.storable1 i0 a0 m0 kf sat_soIt; }; } in sat_soIu;, [(Data.Attoparsec.ByteString.Internal.storable, [GHC.Err.undefined, Data.Attoparsec.ByteString.Internal.$wa4])]), (Data.Attoparsec.ByteString.Internal.T :: forall s. GHC.Prim.Int# -> s -> Data.Attoparsec.ByteString.Internal.T s [GblId[DataCon], Arity=2, Caf=NoCafRefs, Str=DmdType TTm, Unf=OtherCon []] = \r [eta_B2 eta_B1] Data.Attoparsec.ByteString.Internal.T [eta_B2 eta_B1];, [(Data.Attoparsec.ByteString.Internal.T, [])])]