Yson.yqls 354 B

1234567891011121314151617181920
  1. (
  2. #comment
  3. (let config (DataSource 'config))
  4. (let res_sink (DataSink 'result))
  5. (let data (Yson '@@
  6. {
  7. "a"=1;
  8. "$b"=#;
  9. "c"=2u;
  10. "d"=4.1;
  11. "e"=%true;
  12. "f"=[1;<x=1>"english text"];
  13. "g"=<u=2>{x=<v="\xff\xff binary">[];y="русский текст"};
  14. }
  15. @@))
  16. (let world (Write! world res_sink (Key) data '()))
  17. (let world (Commit! world res_sink))
  18. (return world)
  19. )