JSON problem w/ yason

 (drakma:http-request (concatenate 'string
		  *url*
		  (previous-close 'AAPL t)
		  *api-key*) :decode-content t)
#(123 34 116 105 99 107 101 114 34 58 34 65 65 80 76 34 44 34 113 117 101 114
  121 67 111 117 110 116 34 58 49 44 34 114 101 115 117 108 116 115 67 111 117
  110 116 34 58 49 44 34 97 100 106 117 115 116 101 100 34 58 116 114 117 101
  44 34 114 101 115 117 108 116 115 34 58 91 123 34 84 34 58 34 65 65 80 76 34
  44 34 118 34 58 54 46 57 55 55 49 57 48 54 101 43 48 55 44 34 118 119 34 58
  49 53 50 46 48 57 51 57 44 34 111 34 58 49 53 50 46 53 55 53 44 34 99 34 58
  49 53 49 46 55 51 44 34 104 34 58 49 53 51 46 49 44 34 108 34 58 49 53 48 46
  55 56 44 34 116 34 58 49 54 55 53 55 49 55 50 48 48 48 48 48 44 34 110 34 58
  53 56 51 53 49 55 125 93 44 34 115 116 97 116 117 115 34 58 34 79 75 34 44 34
  114 101 113 117 101 115 116 95 105 100 34 58 34 52 54 54 48 48 48 50 55 57 97
  55 49 57 55 100 54 101 99 48 54 52 102 53 102 48 54 51 97 51 98 98 50 34 44
  34 99 111 117 110 116 34 58 49 125)
200 (8 bits, #xC8, #o310, #b11001000)
((:SERVER . "nginx/1.19.2") (:DATE . "Tue, 07 Feb 2023 18:46:47 GMT")
 (:CONTENT-TYPE . "application/json") (:TRANSFER-ENCODING . "chunked")
 (:CONNECTION . "close") (:VARY . "Accept-Encoding,Accept-Encoding")
 (:X-REQUEST-ID . "466000279a7197d6ec064f5f063a3bb2")
 (:STRICT-TRANSPORT-SECURITY . "max-age=15724800; includeSubDomains"))
#<PURI:URI https://api.polygon.io/v2/aggs/ticker/AAPL/prev?adjusted=TRUE&apiKey=myapikey>
#<FLEXI-STREAMS:FLEXI-IO-STREAM {1003D160A3}>
T
"OK"
CL-USER> (yason:parse (drakma:http-request (concatenate 'string
		  *url*
		  (previous-close 'AAPL t)
		  *api-key*) :decode-content t))

There is no applicable method for the generic function
  #<STANDARD-GENERIC-FUNCTION YASON::PARSE% (3)>
when called with arguments
  (#(123 34 116 105 99 107 101 114 34 58 34 65 65 80 76 34 44 34
     113 117 101 114 121 67 111 117 110 116 34 58 49 44 34 114
     101 115 117 108 116 115 67 111 117 110 116 34 58 49 44 34
     97 100 106 117 115 116 101 100 34 58 116 114 117 101 44 34
     114 101 115 117 108 116 115 34 58 91 123 34 84 34 58 34 65
     65 80 76 34 44 34 118 34 58 54 46 57 55 55 49 57 48 54 101
     43 48 55 44 34 118 119 34 58 49 53 50 46 48 57 51 57 44 34
     111 34 58 49 53 50 46 53 55 53 44 34 99 34 58 49 53 49 46
     55 51 44 34 104 34 58 49 53 51 46 49 44 34 108 34 58 49 53
     48 46 55 56 44 34 116 34 58 49 54 55 53 55 49 55 50 48 48
     48 48 48 44 34 110 34 58 53 56 51 53 49 55 125 93 44 34 115
     116 97 116 117 115 34 58 34 79 75 34 44 34 114 101 113 117
     101 115 116 95 105 100 34 58 34 51 98 101 49 100 53 98 52
     51 48 100 53 99 49 52 52 98 51 52 98 50 55 97 55 99 55 48
     97 51 51 97 57 34 44 34 99 111 117 110 116 34 58 49 125)).
   [Condition of type SB-PCL::NO-APPLICABLE-METHOD-ERROR]

Restarts:
 0: [RETRY] Retry calling the generic function.
 1: [RETRY] Retry SLY mREPL evaluation request.
 2: [*ABORT] Return to SLY's top level.
 3: [ABORT] abort thread (#<THREAD "sly-channel-1-mrepl-remote-1" RUNNING {10029F03B3}>)

Backtrace:
 0: ((:METHOD NO-APPLICABLE-METHOD (T)) #<STANDARD-GENERIC-FUNCTION YASON::PARSE% (3)> #(123 34 116 105 99 107 ...)) [fast-method]
 1: (SB-PCL::CALL-NO-APPLICABLE-METHOD #<STANDARD-GENERIC-FUNCTION YASON::PARSE% (3)> (#(123 34 116 105 99 107 ...)))
 2: (YASON:PARSE #(123 34 116 105 99 107 ...) :OBJECT-KEY-FN NIL :OBJECT-AS NIL :JSON-ARRAYS-AS-VECTORS NIL :JSON-BOOLEANS-AS-SYMBOLS NIL :JSON-NULLS-AS-KEYWORD NIL)
 3: (SB-INT:SIMPLE-EVAL-IN-LEXENV (YASON:PARSE (DRAKMA:HTTP-REQUEST (CONCATENATE # *URL* # *API-KEY*) :DECODE-CONTENT T)) #<NULL-LEXENV>)
 4: (EVAL (YASON:PARSE (DRAKMA:HTTP-REQUEST (CONCATENATE # *URL* # *API-KEY*) :DECODE-CONTENT T)))
 5: ((LAMBDA NIL :IN SLYNK-MREPL::MREPL-EVAL-1))
 6: (SLYNK::CALL-WITH-RETRY-RESTART "Retry SLY mREPL evaluation request." #<FUNCTION (LAMBDA NIL :IN SLYNK-MREPL::MREPL-EVAL-1) {1003D2E37B}>)
 7: ((LAMBDA NIL :IN SLYNK-MREPL::MREPL-EVAL-1))
 8: ((LAMBDA NIL :IN SLYNK::CALL-WITH-LISTENER))
 9: (SLYNK::CALL-WITH-BINDINGS ((*PACKAGE* . #<PACKAGE "COMMON-LISP-USER">) (*DEFAULT-PATHNAME-DEFAULTS* . #P"/home/wpg/.emacs.d/projects/polygon/") (* . #1=#(123 34 116 105 99 107 ...)) (** . #(123 34 11..
10: (SLYNK-MREPL::MREPL-EVAL-1 #<SLYNK-MREPL::MREPL mrepl-1-1> "(yason:parse (drakma:http-request (concatenate 'string ..)
11: (SLYNK-MREPL::MREPL-EVAL #<SLYNK-MREPL::MREPL mrepl-1-1> "(yason:parse (drakma:http-request (concatenate 'string ..)
12: (SLYNK:PROCESS-REQUESTS NIL)
13: ((LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD))
14: ((LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD))
15: (SLYNK-SBCL::CALL-WITH-BREAK-HOOK #<FUNCTION SLYNK:SLYNK-DEBUGGER-HOOK> #<FUNCTION (LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD) {10029F400B}>)
16: ((FLET SLYNK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/wpg/.emacs.d/elpa/sly-20221108.2234/slynk/backend/sbcl.lisp") #<FUNCTION SLYNK:SLYNK-DEBUGGER-HOOK> #<FUNCTION (LAMBDA NIL :IN SLYNK::SPAWN-CHAN..
17: ((LAMBDA NIL :IN SLYNK::CALL-WITH-LISTENER))
18: (SLYNK::CALL-WITH-BINDINGS ((*PACKAGE* . #<PACKAGE "COMMON-LISP-USER">) (*DEFAULT-PATHNAME-DEFAULTS* . #P"/home/wpg/.emacs.d/projects/polygon/") (* . #1=#(123 34 116 105 99 107 ...)) (** . #(123 34 11..
19: ((LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD))
20: ((FLET SB-UNIX::BODY :IN SB-THREAD::RUN))
21: ((FLET "WITHOUT-INTERRUPTS-BODY-10" :IN SB-THREAD::RUN))
22: ((FLET SB-UNIX::BODY :IN SB-THREAD::RUN))
23: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-THREAD::RUN))
24: (SB-THREAD::RUN)
25: ("foreign function: call_into_lisp")
26: ("foreign function: funcall1")