adds (failing) +qeu mold test
!> ~
!> ((soft (map)) [[1 2] [[3 4] ~ ~] ~])
==
+::
+++ test-qeu
+ ;: weld
+ %+ expect-eq
+ !> (some (~(gas to *(qeu)) "abcd"))
+ !> ((soft (qeu)) [98 [100 ~ [99 ~ ~]] [97 ~ ~]])
+ ::
+ %+ expect-eq
+ !> ~
+ !> ((soft (qeu)) [98 [97 ~ ~] [100 ~ [99 ~ ~]]])
+ ==
--
