hankhero/cl-json

Json encoder and decoder for Common-Lisp

cl-json's Issues

Just for reference -- blog post about Python JSON performance

Perhaps a comparision would be nice - CPU and memory use?

http://blog.ionelmc.ro/2015/11/22/memory-use-and-speed-of-json-parsers/

No CLOS Support in ABCL

It looks like ABCL isn't supported when encoding/decoding to CLOS. Likely this was because MOP was only completed in mid-2012.

ABCL seems ready for prime-time now and it should probably be added.

Decoding error

Per the ECMAScript spec, Section 15.12.2, at the bottom of pg. 204 'In the case where there are duplicate name Strings within an object, lexically preceding values for the same key shall be overwritten.' This behaviour is relied upon by RFC 7517, e.g. Section 5 'The member names within a JWK Set MUST be unique; JWK Set parsers MUST either reject JWK Sets with duplicate member names or use a JSON parser that returns only the lexically last duplicate member name, as specified in Section 15.12 ("The JSON Object") of ECMAScript 5.1 [ECMAScript].

However, cl-json returns both values for a duplicate key:

(json:decode-json-from-string "{\"foo\": 1, \"foo\": 2}") ((:foo . 1) (:foo . 2))

I think it'd be possible to hack something together with a customised decoder, but it's probably better to handle this by default.

cl-json:encode-json of local-time not useful

(cl-json:encode-json (local-time:now))
{"day":8845,"sec":63958,"nsec":58418000}

This encoding a Lisp timestamp is rarely useful outside of CL. Encoding as a unix timestamp would be more useful:

(defmethod cl-json:encode-json ((tstamp LOCAL-TIME:TIMESTAMP) &optional (stream t))
  "Encode timestamps as unix timestamps in json."
  (format stream "~A" (local-time:timestamp-to-unix tstamp)))

dashes/underscore translation, breaking change?

Has there been a breaking change? My API client built on top of cl-json broke after an apparent behavior change:

> (cl-json:encode-json-to-string (cl-json:decode-json-from-string "{\"_links\": 1}"))
"{\"Links\":1}"

I believe it used to be

> (cl-json:encode-json-to-string (cl-json:decode-json-from-string "{\"_links\": 1}"))
"{\"_links\":1}"

Was this change intended?

Connection broken by remote peer when open large file

When using emacs+slime:

(cl-json:decode-json-from-source (pathname "/path/to/test.json"))

will give

Connection broken by remote peer when open large file

when open large file(14M)
file link
while in sbcl(terminal) it is ok.

Possible infinite recursion

Control stack exhausted (no more space for function call frames).
This is probably due to heavily nested or infinitely recursive function
calls, or a tail call that SBCL cannot or has not optimized away.

PROCEED WITH CAUTION.
   [Condition of type SB-KERNEL::CONTROL-STACK-EXHAUSTED]

Restarts:
 0: [TRY-AS-ALIST] JSON::TRY-AS-ALIST
 1: [TRANSFER-ERROR] Transfer this error to a dependent thread, if one exists.
 2: [KILL-ERRORS] Kill errors in workers (remove debugger instances).
 3: [ABORT] abort thread (#<THREAD "lparallel" RUNNING {1007F5A7C3}>)

Backtrace:
  0: (SB-KERNEL::CONTROL-STACK-EXHAUSTED-ERROR)
  1: ("foreign function: call_into_lisp")
  2: ("foreign function: post_signal_tramp")
  3: (SB-IMPL::CHARACTER-STRING-OUCH #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}> #\{)
  4: (WRITE-CHAR #\{ #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>)
  5: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
  6: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDD477B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
  7: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
  8: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD421B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
  9: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 10: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD3F6B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 11: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 12: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDD3F4B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 13: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 14: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD39EB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 15: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 16: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD373B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 17: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 18: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDD371B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 19: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 20: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD31BB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 21: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 22: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD2F0B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 23: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 24: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDD2EEB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 25: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 26: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD298B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 27: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 28: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD26DB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 29: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 30: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDD26BB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 31: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 32: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD215B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 33: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 34: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD1EAB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 35: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 36: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDD1E8B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 37: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 38: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD192B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 39: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 40: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD167B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 41: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 42: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDD165B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 43: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 44: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD10FB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 45: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 46: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD0E4B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 47: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 48: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDD0E2B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 49: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 50: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD08CB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 51: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 52: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD061B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 53: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 54: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDD05FB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 55: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 56: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDD009B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 57: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 58: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCFDCB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 59: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 60: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCFDAB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 61: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 62: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCF84B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 63: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 64: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCF59B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 65: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 66: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCF57B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 67: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 68: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCF01B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 69: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 70: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCED6B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 71: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 72: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCED4B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 73: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 74: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCE7EB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 75: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 76: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCE53B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 77: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 78: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCE51B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 79: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 80: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCDFBB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 81: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 82: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCDD0B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 83: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 84: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCDCEB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 85: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 86: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCD78B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 87: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 88: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCD4DB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 89: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 90: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCD4BB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 91: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 92: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCCF5B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 93: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 94: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCCCAB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 95: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 96: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCCC8B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 97: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 98: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCC72B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 99: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 100: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCC47B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 101: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 102: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCC45B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 103: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 104: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCBEFB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 105: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 106: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCBC4B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 107: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 108: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCBC2B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 109: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 110: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCB6CB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 111: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 112: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCB41B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 113: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 114: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCB3FB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 115: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 116: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCAE9B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 117: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 118: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCABEB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 119: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 120: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCABCB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 121: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 122: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCA66B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 123: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 124: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDCA3BB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 125: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 126: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDCA39B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 127: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 128: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC9E3B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 129: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 130: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC9B8B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 131: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 132: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC9B6B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 133: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 134: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC960B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 135: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 136: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC935B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 137: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 138: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC933B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 139: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 140: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC8DDB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 141: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 142: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC8B2B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 143: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 144: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC8B0B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 145: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 146: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC85AB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 147: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 148: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC82FB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 149: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 150: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC82DB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 151: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 152: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC7D6B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 153: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 154: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC7ABB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 155: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 156: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC7A9B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 157: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 158: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC753B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 159: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 160: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC728B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 161: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 162: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC726B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 163: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 164: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC6D0B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 165: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 166: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC6A5B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 167: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 168: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC6A3B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 169: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 170: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC64DB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 171: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 172: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC622B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 173: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 174: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC620B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 175: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 176: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC5CAB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 177: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 178: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC59FB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 179: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 180: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC59DB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 181: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 182: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC547B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 183: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 184: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC51CB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 185: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 186: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC51AB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 187: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 188: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC4C4B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 189: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 190: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC499B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 191: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 192: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC497B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 193: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 194: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC441B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 195: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 196: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC416B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 197: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 198: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC414B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 199: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 200: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC3BEB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 201: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 202: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC393B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 203: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 204: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC391B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 205: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 206: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC33BB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 207: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 208: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC310B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 209: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 210: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC30EB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 211: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 212: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC2B8B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 213: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 214: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC28DB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 215: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 216: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC28BB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 217: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 218: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC235B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 219: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 220: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC20AB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 221: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 222: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC208B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 223: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 224: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC1B2B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 225: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 226: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC187B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 227: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 228: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC185B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 229: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 230: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC12FB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 231: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 232: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC104B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 233: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 234: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC102B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 235: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 236: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC0ACB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 237: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 238: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC081B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 239: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 240: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDC07FB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 241: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 242: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDC029B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 243: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 244: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBFF1B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 245: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 246: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBFEFB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 247: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 248: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBF99B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 249: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 250: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBF6EB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 251: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 252: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBF6CB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 253: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 254: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBF16B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 255: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 256: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBEEBB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 257: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 258: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBEE9B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 259: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 260: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBE93B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 261: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 262: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBE68B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 263: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 264: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBE66B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 265: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 266: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBE10B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 267: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 268: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBDE5B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 269: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 270: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBDE3B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 271: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 272: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBD8DB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 273: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 274: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBD62B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 275: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 276: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBD60B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 277: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 278: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBD0AB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 279: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 280: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBCDFB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 281: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 282: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBCDDB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 283: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 284: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBC87B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 285: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 286: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBC5CB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 287: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 288: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBC5AB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 289: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 290: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBC04B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 291: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 292: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBBD9B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 293: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 294: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBBD7B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 295: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 296: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBB81B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 297: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 298: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBB56B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 299: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 300: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBB54B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 301: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 302: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBAFEB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 303: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 304: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBAD3B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 305: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 306: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBAD1B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 307: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 308: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBA7BB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 309: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 310: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDBA50B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 311: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 312: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDBA4EB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 313: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 314: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB9F8B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 315: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 316: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB9CDB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 317: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 318: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB9CBB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 319: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 320: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB975B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 321: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 322: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB94AB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 323: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 324: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB948B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 325: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 326: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB8F2B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 327: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 328: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB8C7B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 329: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 330: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB8C5B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 331: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 332: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB86FB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 333: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 334: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB844B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 335: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 336: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB842B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 337: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 338: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB7E8B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 339: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 340: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB7BDB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 341: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 342: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB7BBB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 343: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 344: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB765B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 345: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 346: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB73AB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 347: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 348: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB738B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 349: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 350: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB6E2B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 351: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 352: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB6B7B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 353: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 354: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB6B5B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 355: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 356: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB65FB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 357: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 358: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB634B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 359: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 360: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB632B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 361: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 362: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB5DCB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 363: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 364: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB5B1B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 365: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 366: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB5AFB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 367: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 368: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB559B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 369: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 370: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB52EB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 371: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 372: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB52CB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 373: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 374: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB4D6B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 375: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 376: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB4ABB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 377: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 378: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB4A9B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 379: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 380: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB453B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 381: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 382: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB428B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 383: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 384: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB426B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 385: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 386: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB3D0B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 387: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 388: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB3A5B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 389: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 390: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB3A3B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 391: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 392: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB34DB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 393: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 394: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB322B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 395: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 396: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB320B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 397: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 398: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB2CAB}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 399: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 400: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB29FB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 401: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 402: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB29DB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 403: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 404: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB247B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 405: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 406: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB21CB}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 407: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 408: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB21AB}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 409: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 410: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB1C4B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 411: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 412: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB199B}> #<RUNE-DOM::ELEMENT html {101E281AB3}>)
 413: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::ELEMENT html {101E281AB3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 414: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (LAMBDA (JSON::OBJECT) :IN JSON:STREAM-ARRAY-MEMBER-ENCODER) {101EDB197B}> #(#<RUNE-DOM::ELEMENT html {101E281AB3}>))
 415: ((:METHOD JSON:ENCODE-JSON (SEQUENCE)) #(#<RUNE-DOM::ELEMENT html {101E281AB3}>) #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [fast-method]
 416: (JSON::MAP-SLOTS #<CLOSURE (LAMBDA (JSON::KEY JSON::VALUE) :IN JSON:STREAM-OBJECT-MEMBER-ENCODER) {101EDB141B}> #<RUNE-DOM::DOCUMENT {101E27CFA3}>)
 417: ((:METHOD JSON:ENCODE-JSON (STANDARD-OBJECT)) #<RUNE-DOM::DOCUMENT {101E27CFA3}> #<SB-IMPL::CHARACTER-STRING-OSTREAM {101E5C57A3}>) [

Decoding to fluid objects appears to fail in recent versions of SBCL

Decoding JSON to fluid objects appears to not work in recent versions of SBCL. For example, the following works fine in SBCL 1.1.0 on Linux (Ubuntu 14.04.3):

* (format t "~@{~A~%~}"
        (asdf:component-version (asdf:find-system :cl-json))
        (lisp-implementation-type)
        (lisp-implementation-version)
        (software-type)
        (software-version)
        (machine-type)
        (machine-version))
0.5.0
SBCL
1.1.0
Linux
3.16.0-50-generic
X86-64
Intel(R) Core(TM) i7-2760QM CPU @ 2.40GHz
NIL
* (json:with-decoder-simple-clos-semantics
    (json:decode-json-from-string
     "{ \"foo\": [1, 2, 3], \"bar\": true }"))

#<#<JSON:FLUID-CLASS NIL {10055708B3}> {100560D693}>

However, in the latest SBCL, 1.3.2, it fails:

* (format t "~@{~A~%~}"
        (asdf:component-version (asdf:find-system :cl-json))
        (lisp-implementation-type)
        (lisp-implementation-version)
        (software-type)
        (software-version)
        (machine-type)
        (machine-version))
0.5.0
SBCL
1.3.2
Linux
3.16.0-50-generic
X86-64
Intel(R) Core(TM) i7-2760QM CPU @ 2.40GHz
NIL
* (json:with-decoder-simple-clos-semantics
    (json:decode-json-from-string
     "{ \"foo\": [1, 2, 3], \"bar\": true }"))

debugger invoked on a SB-PCL::SLOTD-INITIALIZATION-ERROR in thread
#<THREAD "main thread" RUNNING {1002A4C6E3}>:
  Invalid SB-MOP:SLOT-DEFINITION initialization: the initialization argument
  :NAME was constant: :FOO.
See also:
  AMOP, Initialization of Slot Definition Metaobjects

Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [ABORT] Exit debugger, returning to top level.

((:METHOD INITIALIZE-INSTANCE :BEFORE (SB-MOP:SLOT-DEFINITION)) #<SB-MOP:STANDARD-DIRECT-SLOT-DEFINITION {10049862D3}> :NAME :FOO :INITFORM #<unused argument> :INITFUNCTION #<unused argument> :TYPE #<unused argument> :ALLOCATION NIL :INITARGS NIL :DOCUMENTATION NIL) [fast-method]
0] 

It appears to have begun failing in this way at SBCL version 1.2.0 or earlier:

* (format t "~@{~A~%~}"
        (asdf:component-version (asdf:find-system :cl-json))
        (lisp-implementation-type)
        (lisp-implementation-version)
        (software-type)
        (software-version)
        (machine-type)
        (machine-version))
0.5.0
SBCL
1.2.0
Linux
3.16.0-50-generic
X86-64
Intel(R) Core(TM) i7-2760QM CPU @ 2.40GHz
NIL
* (json:with-decoder-simple-clos-semantics
    (json:decode-json-from-string
     "{ \"foo\": [1, 2, 3], \"bar\": true }"))

debugger invoked on a SB-PCL::SLOTD-INITIALIZATION-ERROR in thread
#<THREAD "main thread" RUNNING {1002BF5053}>:
  Invalid SB-MOP:SLOT-DEFINITION initialization: the initialization argument
  :NAME was constant: :FOO.
See also:
  AMOP, Initialization of Slot Definition Metaobjects

Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [ABORT] Exit debugger, returning to top level.

((:METHOD INITIALIZE-INSTANCE :BEFORE (SB-MOP:SLOT-DEFINITION)) #<SB-MOP:STANDARD-DIRECT-SLOT-DEFINITION #<unbound slot>> :NAME :FOO :INITFORM #<unused argument> :INITFUNCTION #<unused argument> :TYPE #<unused argument> :ALLOCATION NIL :INITARGS NIL :DOCUMENTATION NIL) [fast-method]
0] 

decode error?

(json:decode-json-from-string "{"foo": [1, 2, 3], "bar":true}")
;((:FOO 1 2 3) (:BAR . T))

(json:encode-json-to-string (json:decode-json-from-string "{"foo": [1, 2, 3], "bar": true}"))
;"{"foo":[1,2,3],"bar":true}"

(json:decode-json-from-string "{"foo": [1, 2, 3]}")
;((:FOO 1 2 3))

(json:encode-json-to-string (json:decode-json-from-string "{"foo": [1, 2, 3]}"))
;"[["foo",1,2,3]]"

Last encode seems error. Why?

Invalid char on JSON input

When:

(cl-json:decode-json
 (make-string-input-stream "{\"errno\":'0'}"))

sldb:

Invalid char on JSON input: `'' [in #<SB-IMPL::STRING-INPUT-STREAM {1006F32503}> at position 9]
   [Condition of type JSON:JSON-SYNTAX-ERROR]

Replace ' with ":

(cl-json:decode-json
 (make-string-input-stream
  (cl-ppcre:regex-replace-all "'"
                              "{\"errno\":'0'}"
                              "\"")))

Return:

((:ERRNO . "0"))

Is this Project Alive? (and json identifier transformations)

Does anyone have any utilities for json strings that come back in dotted notation? Especially when using REST to configure servers I see the majority of properties come back 'Java style', e.g. (server.port 8080). The default decoder translates this to SERVER--PORT.

Anyone have a utilities for dotted property notation and underscores?

Add cl-json to json.org

cl-json does not mentioned in json implementation in json.org,

Maybe I will figure it out, how to add cl-json to that list.

Broken Key and keywords encode/decode

Hello,
All my key are changing after encode/decode. They look like: "5d8c7d436887d|c585b183|4a3ff62b|IT"
The first part is being uncased and changed completely .

How can I solve it or help you solve it?

Thanks

Suggestion for reorganization

We could simplify things a bit by making the test system be now "cl-json/test" instead of ".test". The new "slashy" package names in ASDF would mean that ASDF would know to find that system definition in "cl-json.asd", instead of the user having to make sure it happens. E.g., one could simply say

(asdf:load-system "cl-json/test")

and ASDF would find the system, instead of having to remember to LOAD-SYSTEM "cl-json" first.

I'd be willing to do the reorg, and submit a pull request, but wanted to check and see if it would be OK before proceeding.

How to get a value of false (as opposed to "false")

I can get (encode-json) to emit a value of true quite easily: just use t. But I cannot figure out how to get a value of false.

I'm not talking about the strings "true" and "false". I'm talking about the javascript keywords true and false.

I tried (cl-json:json-bool nil). This gives me ["false"]. I also tried (cl-json:json-bool :false). It gives me ["true"].

What is the trick to getting false into my JSON?

Emit an empty array []

Sadly I am working with a REST API that requires the presence of parameters in the JSON even if the value is an empty array []. I am struggling to find a way to get cl-json to emit one of these. '() results in null, '(nil) resuls in [null], etc. Is there a trick for this?

cdrs that are lists are incorrectly serialised

Example:

(json:encode-json-to-string (json:decode-json-from-string "{\"items\": [1,2,3]}"))
"[[\"items\",1,2,3]]"

I would have expected that the output would have matched the input, rather than a vector of a vector.

The issue though isn't that the JSON can't be round-tripped:

(json:encode-json-to-string '((:items . (1 2 3))))
"[[\"items\",1,2,3]]"

Surrogate pair

(yason:parse "\"\\uD840\\uDC0B\"")
;; => "𠀋"

(with-input-from-string (stream "\"\\uD840\\uDC0B\"")
  (cl-json:decode-json stream))
;; => "��"

Serialization inconsistent when dash is used

JSON> "{\"hello-world\" : 888}"
"{\"hello-world\" : 888}"
JSON> (decode-json-from-string *)
((:HELLO-WORLD . 888))
JSON> (encode-json-to-string *)
"{\"helloWorld\":888}"

"hello-world" becomes "helloWorld" after serialization through CL-JSON

encoder unicode bug

json:encode-json-to-string output ALL character as ASCII code. Non-ASCII become escape sequence. There's a post on stack overflow describing this: http://stackoverflow.com/questions/12304702/cl-json-encodes-unicode-chars-by-outputting-their-unicode-escape-string-in-ascii

After comment out some code, it works as I expected. However, I known't know whether those code are essential. Maybe doing this introduce another bug:

(defun write-json-chars (s stream)
  "Write JSON representations (chars or escape sequences) of
characters in string S to STREAM."
  (loop for ch across s
     for code = (char-code ch)
     with special
     if (setq special (car (rassoc ch +json-lisp-escaped-chars+)))
       do (write-char #\\ stream) (write-char special stream)
     else;; if (< #x1f code #x7f)
       do (write-char ch stream)
     ;; else
     ;;   do (let ((special '#.(rassoc-if #'consp +json-lisp-escaped-chars+)))
     ;;        (destructuring-bind (esc . (width . radix)) special
     ;;          (format stream "\\~C~V,V,'0R" esc radix width code)))
    ))

Decoder chokes on NIL input

The following code:
(json:decode-json-from-string nil)

gives an error:

 The value
    NIL
  is not of type
    STRING
  when binding STRING

when it should return NIL

Escaping forward slash '/'

This is actually a resolved issue, and just wanted to post it in the hope it might help someone like me:

Is there a reason for this behaviour? Like, am I missing something, or does this need to be reported?

CL-USER> (format t (cl-json:encode-json-to-string {"a/b" 2}))
{"a\/b":2}

Well, probably, no. A brief search revealed this. Forward slash "can" be escaped.

Python handles this input format:

In [4]: json.loads('{"a\/b":1}')
Out[4]: {'a/b': 1}

So can JS:

> JSON.parse('{"a\/b":1}')
{"a/b": 1}

So, seems not an issue!

But, if this is still an issue, there is the unexported cl-json::+json-lisp-escaped-chars+ that one may want to modify.

Transfer?

If you would like to drop maintaining this, we have made a fork in sharplispers/cl-json

If so, you could transfer the issues to the sharplispers repo and then archive your own copy of cl-json, hoping that people will find the sharplispers repo instead.

bug in encoder?

https://gist.github.com/4124717