minor cleanup

This commit is contained in:
Ted Blackman 2018-05-28 23:08:34 -07:00
parent afb1532241
commit 0ea2e51046
2 changed files with 0 additions and 4 deletions

View File

@ -5716,7 +5716,6 @@
?> ?=([* %give %made @da %complete %success %pin *] i.moves)
=/ result result.p.card.i.moves
=/ pin-result build-result.result
~& build-result.pin-result
?> ?=([%success %diff *] build-result.pin-result)
::
=/ =cage cage.build-result.pin-result
@ -5791,7 +5790,6 @@
now=~1234.5.6
scry=(scry-with-results-and-failures scry-results)
::
::
^= call-args
:* duct=~[/path] type=~ %make ~nul
%pin ~1234.5.6
@ -5808,7 +5806,6 @@
?> ?=([* %give %made @da %complete %success %pin *] i.moves)
=/ result result.p.card.i.moves
=/ pin-result build-result.result
~& build-result.pin-result
?> ?=([%success %diff *] build-result.pin-result)
::
=/ =cage cage.build-result.pin-result

View File

@ -3305,7 +3305,6 @@
?. (slab %form p.vase.u.grad-result)
%- return-error :_ ~ :- %leaf
"ford: %diff failed: %{<p.start-cage>} mark has no +form:grab arm"
~& sloe+(sloe p.vase.u.grad-result)
:: the +grab core should also contain a +diff arm
::
?. (slab %diff p.vase.u.grad-result)