Add some more Str.lines tests

S32-str/lines.t

@@ -4,11 +4,28 @@ use Test;
 use lib 't/spec/packages';
 use Test::Util;
 
-plan 5;
+plan 14;
+
+is "a\nb\n\nc".lines.join('|'),       'a|b||c', 'LF .lines without trailing';
+is "a\nb\n\nc\n".lines.join('|'),     'a|b||c', 'LF .lines with trailing';
+is "a\nb\n\nc\n".lines(2).join('|'),  'a|b',    'LF .lines with limit';
+
+is "a\rb\r\rc".lines.join('|'),       'a|b||c', 'CR .lines without trailing';
+is "a\rb\r\rc\r".lines.join('|'),     'a|b||c', 'CR .lines with trailing';
+is "a\rb\r\rc\r".lines(2).join('|'),  'a|b',    'CR .lines with limit';
+
+is "a\r\nb\r\n\r\nc".lines.join('|'), 'a|b||c',
+  'CRLF .lines without trailing';
+is "a\r\nb\r\n\r\nc\r\n".lines.join('|'), 'a|b||c',
+  'CRLF .lines with trailing';
+is "a\r\nb\r\n\r\nc\r\n".lines(2).join('|'), 'a|b',
+  'CRLF .lines with limit';
+
+#?rakudo 3 todo 'mixed CR and LF line endings not yet supported'
+is "a\nb\r\rc".lines.join('|'),       'a|b||c', 'mixed .lines without trailing';
+is "a\nb\r\rc\r".lines.join('|'),     'a|b||c', 'mixed .lines with trailing';
+is "a\nb\r\rc\r".lines(2).join('|'),  'a|b',    'mixed .lines with limit';
 
-is "a\nb\n\nc".lines.join('|'),   'a|b||c', '.lines without trailing \n';
-is "a\nb\n\nc\n".lines.join('|'), 'a|b||c', '.lines with trailing \n';
-is "a\nb\n\nc\n".lines(2).join('|'), 'a|b', '.lines with limit';
 is lines("a\nb\nc\n").join('|'), 'a|b|c',   '&lines';
 
 # RT #115136