line: emit %cons, not %mov for %both needs in +into

This commit is contained in:
Joe Bryan 2024-08-14 13:37:36 -04:00
parent c7da8ae5d8
commit 34b473f126

View File

@ -984,9 +984,13 @@
$(tres [[now p %this b] tres], twig [%this a], pose [pole pose])
::
%both
=/ =pole [%mov p sass.twig]
=* l left.twig
=* r rite.twig
=^ l=$<(%none need) gen
?. ?=(%none -.left.twig) [left.twig gen]
=^(r gen rain [[%this r] gen])
=^ r=$<(%none need) gen
?. ?=(%none -.rite.twig) [rite.twig gen]
=^(r gen rain [[%this r] gen])
=/ =pole [%con +:(sass l) +:(sass r) sass.twig]
=+ [a b]=?:(?=(%2 now) [l r] [r l])
$(tres [[now p b] tres], twig a, pose [pole pose])
::