@@ -263,7 +263,7 @@ prop_TL_inits = L.inits `eqP` (map unpackS . TL.inits)
263263prop_T_tails = L.tails `eqP` (map unpackS . T.tails)
264264prop_TL_tails = L.tails `eqP` (map unpackS . TL.tails)
265265
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)
267267prop_TL_split_i c = id `eq` (TL.intercalate (TL.singleton c) . TL.split c)
268268
269269prop_T_splitWith p = splitWith p `eqP` (map unpackS . T.splitWith p)
@@ -500,7 +500,7 @@ tests = [
500500 ("prop_T_tails", mytest prop_T_tails),
501501 ("prop_TL_tails", mytest prop_TL_tails),
502502
503− ("prop_T_split_i", mytest prop_T_split_i),
503+ ("prop_T_splitChar_i", mytest prop_T_splitChar_i),
504504 ("prop_TL_split_i", mytest prop_TL_split_i),
505505 ("prop_T_splitWith", mytest prop_T_splitWith),
506506 ("prop_TL_splitWith", mytest prop_TL_splitWith),