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

clarify ford slam error

Browse Source
This commit is contained in:
Anton Dyudin 2015-10-21 15:02:00 -07:00
parent f131e6edd6
commit 71a9658e6d
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

@ -1430,8 +1430,8 @@
^- (bolt type) ^- (bolt type)
%+ (clef %slit) (fine cof gat sam) %+ (clef %slit) (fine cof gat sam)
|= [cof=cafe gat=type sam=type] |= [cof=cafe gat=type sam=type]
%+ cool |.(>sam<) %+ cool |.(%.(%have ~(dunk ut sam)))
%+ cool |.(>(~(peek ut gat) %free 6)<) %+ cool |.(%.(%want ~(dunk ut (~(peek ut gat) %free 6))))
=+ top=(mule |.((slit gat sam))) =+ top=(mule |.((slit gat sam)))
?- -.top ?- -.top
| (flaw cof p.top) | (flaw cof p.top)