Test fixes

This commit is contained in:
Elliot Glaysher 2018-12-11 13:59:49 -08:00
parent ec9513ccfe
commit 31b6842d43
2 changed files with 2 additions and 3 deletions

View File

@ -94,7 +94,7 @@
(transmit set+~ pro+prompt ~) :: XX handle multiple links?
::
$det :: reject all input
=^ inv som (~(transceive ^sole som) +.act)
=^ inv som (~(transceive sole som) +.act)
=. sos (~(put by sos) ost.bow som)
?~ wom
=/ try (rose (tufa buf.som) fed:ag)
@ -125,7 +125,7 @@
++ transmit
|= {inv/sole-edit mor/(list sole-effect)}
=/ som (~(got by sos) ost.bow)
=^ det som (~(transmit ^sole som) inv)
=^ det som (~(transmit sole som) inv)
=. sos (~(put by sos) ost.bow som)
[[(effect mor+[det+det mor])]~ +>.$]
::

View File

@ -1,3 +1,2 @@
/- plan-acct
^?
{inf/(unit {@txname @txloc}) del/(map knot ~) put/(map knot plan-acct)}