ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2025-01-05 13:55:54 +03:00
Code Issues Packages Projects Releases Wiki Activity

Wrap non-span clay paths in ' to print valid literals

Browse Source
This commit is contained in:
Anton Dyudin 2015-11-10 11:35:41 -08:00
parent e108f44b86
commit b4214fc6fa
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
arvo/clay.hoon
View File

@ -483,7 +483,12 @@
=. +>.^$
%+ print-to-dill
?-(-.q.i.p.lem %del '-', %ins '+', %dif ':')
[%leaf (spud (weld pre p.i.p.lem))]
:+ %rose ["/" "/" ~]
%+ turn (weld pre p.i.p.lem)
|= a=cord
?: ((sane %ta) a)
[%leaf (trip a)]
[%leaf (dash:ut (trip a) '\'')]
$(p.lem t.p.lem)
==
::