27 lines
588 B
Plaintext
27 lines
588 B
Plaintext
|
::
|
||
|
:::: /hoon/json/mar
|
||
|
::
|
||
|
/? 310
|
||
|
::
|
||
|
:::: compute
|
||
|
::
|
||
|
=, eyre
|
||
|
=, format
|
||
|
=, html
|
||
|
|_ jon=^json
|
||
|
::
|
||
|
++ grow :: convert to
|
||
|
|%
|
||
|
++ mime [/application/json (as-octs:mimes -:txt)] :: convert to %mime
|
||
|
++ txt [(en:json jon)]~
|
||
|
--
|
||
|
++ grab
|
||
|
|% :: convert from
|
||
|
++ mime |=([p=mite q=octs] (fall (de:json (@t q.q)) *^json))
|
||
|
++ noun ^json :: clam from %noun
|
||
|
++ numb numb:enjs
|
||
|
++ time time:enjs
|
||
|
--
|
||
|
++ grad %mime
|
||
|
--
|