Empty <> quotes with only whitespace should return empty parcel. (RT …

…#73772)

src/Perl6/Actions.pm

@@ -2494,7 +2494,7 @@ method quote_EXPR($/) {
         }
         else {
             my @words := HLL::Grammar::split_words($/, $past.value);
-            if +@words > 1 {
+            if +@words != 1 {
                 $past := PAST::Op.new( :name('&infix:<,>'), :node($/) );
                 for @words { $past.push($_); }
                 $past := PAST::Stmts.new($past);