Make +ford-turbo pass without %pin and %same in results
::
^= moves
:~ :* duct=~[/ride] %give %made ~1234.5.6 %complete
- [%success [%same [%success [%ride scry-type %constant]]]]
+ [%success [%ride scry-type %constant]]
==
:* duct=~[/ride] %pass wire=/~nul/clay-sub/~nul/desk/~1234.5.6
%c %warp [~nul ~nul] %desk
?> ?=(%complete -.result)
?> ?=([%success %reef *] +.result)
::
- =/ kernel=vase |5:+.result
+ =/ kernel=vase vase.build-result.result
::
%+ weld
%- expect-eq !>
?> ?=(%complete -.result)
?> ?=([%success %reef *] +.result)
::
- =/ kernel=vase |5:+.result
+ =/ kernel=vase vase.build-result.result
::
%+ weld
%- expect-eq !>
results1
(expect-ford-empty ford-gate ~nul)
==
-
::
++ test-path
:- `tank`leaf+"test-path"
?> ?=(%complete -.result)
?> ?=([%success %plan *] +.result)
::
- =/ =vase |5:+.result
+ =/ =vase vase.build-result.result
::
%+ weld
%- expect-eq !>
