Small bug in Data.PackedString.splitWithPS

Hi!

In GHC 5.04.2 this fails: wordsPS (packString "a")

Cause: typical off-by-one error in libraries/base/Data/PackedString.hs
    line 289

first_pos_that_satisfies pred ps len n =
   case [ m | m <- [n..len], pred (ps ! m) ] of
                         ^
                        here

Probably should be:
   case [ m | m <- [n..len-1], pred (ps ! m) ] of

Best Regards,
Tom

-- 
.signature: Too many levels of symbolic links