+expect-eq now produces a +tang
:- %noun
=+ tester:tester
|^
-^- wall
+^- tang
;: weld
test-is-schematic-live
test-date-from-schematic
title=@tas
contents=tape
==
- ^- wall
+ ^- tang
::
?> ?=([* %give %made @da %complete %result ^ *] move)
=/ result result.p.card.move
::
++ expect-ford-empty
|= [ford=_(ford-turbo) ship=@p]
- ^- wall
+ ^- tang
%- expect-eq !>
:- state-by-ship.+>+<.ford
(my [ship *ford-state:ford-turbo]~)
