fixes %ford to support %walk where source and target marks are the same

This commit is contained in:
Joe Bryan 2018-08-21 13:09:21 -04:00 committed by Elliot Glaysher
parent b166a55792
commit 3c4e8d87b6

View File

@ -4759,6 +4759,8 @@
--
::
|^ ^- build-receipt
?: =(source target)
(return-result %success %walk ~)
:: load all marks.
::
=^ marks-result out