Welcome to the CHICKEN Scheme pasting service
no title added by ctindall on Mon Nov 4 17:17:15 2013
#;24> (define my_alist (read-json "{\"a_key\":3, \"another_key\": \"a_string_value\"}")) #;25> (assv `a_key my_alist) (a_key . 3) #;26> (alist-ref `a_key my_alist) Error: (null-list?) bad argument type - not a list: a_key Call history: <syntax> (alist-ref (quasiquote a_key) my_alist) <syntax> (quasiquote a_key) <syntax> (##core#quote a_key) <eval> (alist-ref (quasiquote a_key) my_alist) alist-lib-core.scm:116: alist-ref alist-lib-core.scm:119: alist-ref alist-lib-core.scm:121: assoc <-- #;26> (alist-ref `(`a_key) my_alist) Error: Key not found -- ALIST-REF: ((a_key . 3) (another_key . "a_string_value")) Call history: <syntax> (alist-ref (quasiquote ((quasiquote a_key))) my_alist) <syntax> (quasiquote ((quasiquote a_key))) <syntax> (##sys#list (##sys#list (##core#quote quasiquote130) (##core#quote a_key))) <syntax> (##sys#list (##core#quote quasiquote130) (##core#quote a_key)) <syntax> (##core#quote quasiquote130) <syntax> (##core#quote a_key) <eval> (alist-ref (quasiquote ((quasiquote a_key))) my_alist) <eval> (##sys#list (##sys#list (##core#quote quasiquote130) (##core#quote a_key))) <eval> (##sys#list (##core#quote quasiquote130) (##core#quote a_key)) alist-lib-core.scm:116: alist-ref alist-lib-core.scm:119: alist-ref alist-lib-core.scm:121: assoc alist-lib-core.scm:124: thunk alist-lib-core.scm:117: error <-- #;26>