@@ -263,7 +263,7 @@ prop_TL_inits = L.inits `eqP` (map unpackS . TL.inits)
263prop_T_tails = L.tails `eqP` (map unpackS . T.tails)
263prop_T_tails = L.tails `eqP` (map unpackS . T.tails)
264prop_TL_tails = L.tails `eqP` (map unpackS . TL.tails)
264prop_TL_tails = L.tails `eqP` (map unpackS . TL.tails)
266−prop_T_split_i c = id `eq` (T.intercalate (T.singleton c) . T.split c)
266+prop_T_splitChar_i c = id `eq` (T.intercalate (T.singleton c) . T.splitChar c)
267prop_TL_split_i c = id `eq` (TL.intercalate (TL.singleton c) . TL.split c)
267prop_TL_split_i c = id `eq` (TL.intercalate (TL.singleton c) . TL.split c)
269prop_T_splitWith p = splitWith p `eqP` (map unpackS . T.splitWith p)
269prop_T_splitWith p = splitWith p `eqP` (map unpackS . T.splitWith p)
@@ -500,7 +500,7 @@ tests = [
500 ("prop_T_tails", mytest prop_T_tails),
500 ("prop_T_tails", mytest prop_T_tails),
501 ("prop_TL_tails", mytest prop_TL_tails),
501 ("prop_TL_tails", mytest prop_TL_tails),
503− ("prop_T_split_i", mytest prop_T_split_i),
503+ ("prop_T_splitChar_i", mytest prop_T_splitChar_i),
504 ("prop_TL_split_i", mytest prop_TL_split_i),
504 ("prop_TL_split_i", mytest prop_TL_split_i),
505 ("prop_T_splitWith", mytest prop_T_splitWith),
505 ("prop_T_splitWith", mytest prop_T_splitWith),
506 ("prop_TL_splitWith", mytest prop_TL_splitWith),
506 ("prop_TL_splitWith", mytest prop_TL_splitWith),