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
|
|
--
|