Don't dis-order flattening named args on Moar.

jnthn · jnthn · commit bf7b9bb36922 · 2015-11-16T17:00:22.000+01:00
diff --git a/src/vm/moar/QAST/QASTOperationsMAST.nqp b/src/vm/moar/QAST/QASTOperationsMAST.nqp
@@ -1361,7 +1361,7 @@ sub arrange_args(@in) {
     my @named := ();
     my @posit := ();
     for @in {
-        nqp::push(((nqp::can($_, 'named') && $_.named && (!nqp::can($_, 'flat') || !$_.flat)) ?? @named !! @posit), $_);
+        nqp::push((nqp::can($_, 'named') && $_.named ?? @named !! @posit), $_);
     }
     for @named { nqp::push(@posit, $_) }
     @posit

Original file line number	Diff line number	Diff line change
`@@ -1361,7 +1361,7 @@ sub arrange_args(@in) {`
`1361`	`1361`	`my @named := ();`
`1362`	`1362`	`my @posit := ();`
`1363`	`1363`	`for @in {`
`1364`		`- nqp::push(((nqp::can($_, 'named') && $_.named && (!nqp::can($_, 'flat') \|\| !$_.flat)) ?? @named !! @posit), $_);`
	`1364`	`+ nqp::push((nqp::can($_, 'named') && $_.named ?? @named !! @posit), $_);`
`1365`	`1365`	`}`
`1366`	`1366`	`for @named { nqp::push(@posit, $_) }`
`1367`	`1367`	`@posit`