pByteStrings :: [String] -> ExprPred
pByteStrings ss' (ByteStrings ss _) = ss == ss'
pByteStrings :: [String] -> ExprPred
pByteStrings ss' (ByteStrings ss _) = ss == ss'
pByteStrings ss' (ByteStrings ss _) = ss == ss'