2015-08-12 00:31:16 +03:00
|
|
|
::
|
2016-02-05 06:05:37 +03:00
|
|
|
:::: /hoon/index/tree/mar
|
2015-08-12 00:31:16 +03:00
|
|
|
::
|
2016-02-18 02:00:12 +03:00
|
|
|
/? 310
|
2016-10-24 23:42:50 +03:00
|
|
|
/+ tree,map-to-json,elem-to-react-json
|
|
|
|
|
[. tree]
|
2015-08-12 00:31:16 +03:00
|
|
|
!:
|
|
|
|
|
::::
|
2015-09-02 03:24:18 +03:00
|
|
|
::
|
2016-01-26 03:49:09 +03:00
|
|
|
|_ all/(map path marl)
|
2015-08-12 00:31:16 +03:00
|
|
|
::
|
2016-01-26 03:49:09 +03:00
|
|
|
++ grow :: convert to
|
2015-08-12 00:31:16 +03:00
|
|
|
|%
|
|
|
|
|
++ json
|
|
|
|
|
%. all
|
|
|
|
|
%+ map-to-json
|
2016-01-26 03:49:09 +03:00
|
|
|
|=(a/path (crip (spud a)))
|
2016-10-24 23:42:50 +03:00
|
|
|
|=(a/marl [%a (turn a elem-to-react-json)])
|
2015-08-12 00:31:16 +03:00
|
|
|
--
|
2016-01-26 03:49:09 +03:00
|
|
|
++ grab |% :: convert from
|
|
|
|
|
++ noun (map path marl) :: clam from %noun
|
2015-08-12 00:31:16 +03:00
|
|
|
::++ elem |=(a=manx `_all`[[/ ((getall %h1) a)] ~ ~])
|
|
|
|
|
-- --
|
