urbit/pkg/base-dev/mar/udon.hoon
2022-05-17 14:17:53 -07:00

32 lines
528 B
Plaintext

::
:::: /hoon/udon/mar
::
/+ cram
::
|_ mud=@t
++ grow
|%
++ mime [/text/x-unmark (as-octs:mimes:html mud)]
++ txt
(to-wain:format mud)
++ elem
^- manx
=, cram
elm:(static (ream mud))
++ front :: XX performance, types
^- (map term knot)
%- ~(run by inf:(static:cram (ream mud)))
|= a=dime ^- cord
?+ (end 3 p.a) (scot a)
%t q.a
==
--
++ grab
|%
++ mime |=((pair mite octs) q.q)
++ noun @t
++ txt of-wain:format
--
++ grad %txt
--