More quoting tests

bitlair · Dec 28, 2023 · bb11d94 · bb11d94
1 parent 7cfdc2b
commit bb11d94
Showing 1 changed file with 12 additions and 1 deletion.
diff --git a/t/prompt.t b/t/prompt.t
@@ -34,13 +34,23 @@ are '"foo"', [qw/foo/];
 
 are "foo bar",           [qw/foo bar/];
 are "foo bar baz",       [qw/foo bar baz/];
-are "'foo' 'bar' 'baz'", [qw/foo bar baz/];
+are "'foo' 'bar' \"baz\"", [qw/foo bar baz/];
 
 are "foo;bar",   ['foo', "\0SEPARATOR", 'bar'];
 are "foo ;bar",  ['foo', "\0SEPARATOR", 'bar'];
 are "foo; bar",  ['foo', "\0SEPARATOR", 'bar'];
 are "foo ; bar", ['foo', "\0SEPARATOR", 'bar'];
 
+are "'foo';bar",   ['foo', "\0SEPARATOR", 'bar'];
+are "'foo' ;bar",  ['foo', "\0SEPARATOR", 'bar'];
+are "'foo'; bar",  ['foo', "\0SEPARATOR", 'bar'];
+are "'foo' ; bar", ['foo', "\0SEPARATOR", 'bar'];
+
+are "foo;'bar'",   ['foo', "\0SEPARATOR", 'bar'];
+are "foo ;'bar'",  ['foo', "\0SEPARATOR", 'bar'];
+are "foo; 'bar'",  ['foo', "\0SEPARATOR", 'bar'];
+are "foo ; 'bar'", ['foo', "\0SEPARATOR", 'bar'];
+
 are "foo\\;bar",   [qw/foo;bar/];
 are "foo \\;bar",  [qw/foo ;bar/];
 are "foo\\; bar",  [qw/foo; bar/];
@@ -58,6 +68,7 @@ are 'foo\\\\\\\\bar', ["foo\\\\bar"];
 
 are "abort", ["\0ABORT"];
 are "'abort'", [qw/abort/];
+are '"abort"', [qw/abort/];
 
 are "\\", 0;
 are "'foo", 0;