Plaster

common-lisp
; file: /home/manage/lisp/websites/wswm/src/ningle-practice.lisp ; in: MAKE-JSON-REQUEST "/rest/keys" ; (WHERESHOULDWEMOVE::MAKE-JSON-REQUEST "/rest/keys" :POST ; WHERESHOULDWEMOVE::JSON ; WHERESHOULDWEMOVE::*CONSTITUENCY-KEYS* ; (LAMBDA (WHERESHOULDWEMOVE::PARAMS) ; (DECLARE ; (IGNORE WHERESHOULDWEMOVE::PARAMS)) ; (LET ((WHERESHOULDWEMOVE::YEAR #)) ; (FORMAT NIL ; (WHERESHOULDWEMOVE::ENTRY-TO-JSON ; #))))) ; ; caught ERROR: ; (during macroexpansion of (MAKE-JSON-REQUEST "/rest/keys" ...)) ; The variable *HTTP-CODE->RESPONSE* is unbound. ; in: MAKE-JSON-REQUEST "/rest/all-constituencies" ; (WHERESHOULDWEMOVE::MAKE-JSON-REQUEST "/rest/all-constituencies" :POST ; WHERESHOULDWEMOVE::JSON ; WHERESHOULDWEMOVE::*CONSTITUENCY-ALL* ; (LAMBDA (WHERESHOULDWEMOVE::PARAMS) ; (DECLARE ; (IGNORE WHERESHOULDWEMOVE::PARAMS)) ; (LET ((WHERESHOULDWEMOVE::YEAR #)) ; (FORMAT NIL ; (WHERESHOULDWEMOVE::ALL-ENTRIES-TO-JSON ; :CONSTITUENCIES ; WHERESHOULDWEMOVE::YEAR))))) ; ; caught ERROR: ; (during macroexpansion of (MAKE-JSON-REQUEST "/rest/all-constituencies" ...)) ; The variable *HTTP-CODE->RESPONSE* is unbound. ; in: MAKE-JSON-REQUEST "/rest/all-authorities" ; (WHERESHOULDWEMOVE::MAKE-JSON-REQUEST "/rest/all-authorities" :POST ; WHERESHOULDWEMOVE::JSON ; WHERESHOULDWEMOVE::*AUTHORITIES-ALL* ; (LAMBDA (WHERESHOULDWEMOVE::PARAMS) ; (DECLARE ; (IGNORE WHERESHOULDWEMOVE::PARAMS)) ; (LET ((WHERESHOULDWEMOVE::YEAR #)) ; (FORMAT NIL ; (WHERESHOULDWEMOVE::ALL-ENTRIES-TO-JSON ; :AUTHORITIES ; WHERESHOULDWEMOVE::YEAR))))) ; ; caught ERROR: ; (during macroexpansion of (MAKE-JSON-REQUEST "/rest/all-authorities" ...)) ; The variable *HTTP-CODE->RESPONSE* is unbound. . ; Debugger entered on #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10065FB463}> ; ; compilation unit aborted ; caught 1 fatal ERROR condition ; caught 3 ERROR conditions [1] CL-USER> ; Evaluation aborted on #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10065FB463}> CL-USER>