urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2025-01-05 19:46:50 +03:00
Code Issues Packages Projects Releases Wiki Activity

fixed ford blocking

Browse Source
This commit is contained in:
Ubuntu 2014-10-02 18:53:53 +00:00
parent b7d2afffa9
commit 98b9003409
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
arvo/ford.hoon
View File

@ -340,8 +340,8 @@
%2 [%2 p=p.ton]
%0 [%0 p=*(set beam) q=(fun p.ton)]
%1 ~& [%coup-need ((list path) p.ton)]
=- ?- faw
& [%1 p=(turn p.faw |=(a=beam [a *(list tank)]))]
=- ?- -.faw
& [%1 p=(sa (turn p.faw |=(a=beam [a *(list tank)])))]
| [%2 p=p.faw]
==
^= faw