@@ -588,7 +588,7 @@ splitOnSeq str inh =
588 $ S.unfold FH.read inh) -- >>= print
588 $ S.unfold FH.read inh) -- >>= print
590#ifdef INSPECTION
590#ifdef INSPECTION
591−inspect $ hasNoTypeClasses 'splitOnSeq
591+-- inspect $ hasNoTypeClasses 'splitOnSeq
592-- inspect $ 'splitOnSeq `hasNoType` ''Step
592-- inspect $ 'splitOnSeq `hasNoType` ''Step
593-- inspect $ 'splitOnSeq `hasNoType` ''AT.FlattenState
593-- inspect $ 'splitOnSeq `hasNoType` ''AT.FlattenState
594-- inspect $ 'splitOnSeq `hasNoType` ''D.ConcatMapUState
594-- inspect $ 'splitOnSeq `hasNoType` ''D.ConcatMapUState
@@ -610,7 +610,7 @@ splitOnSuffixSeq str inh =
610 $ S.unfold FH.read inh) -- >>= print
610 $ S.unfold FH.read inh) -- >>= print
612#ifdef INSPECTION
612#ifdef INSPECTION
613−inspect $ hasNoTypeClasses 'splitOnSuffixSeq
613+-- inspect $ hasNoTypeClasses 'splitOnSuffixSeq
614-- inspect $ 'splitOnSuffixSeq `hasNoType` ''Step
614-- inspect $ 'splitOnSuffixSeq `hasNoType` ''Step
615-- inspect $ 'splitOnSuffixSeq `hasNoType` ''AT.FlattenState
615-- inspect $ 'splitOnSuffixSeq `hasNoType` ''AT.FlattenState
616-- inspect $ 'splitOnSuffixSeq `hasNoType` ''D.ConcatMapUState
616-- inspect $ 'splitOnSuffixSeq `hasNoType` ''D.ConcatMapUState