a couple more: (pretty-print (record? a)) ==> #t
(pretty-print (record-predicate a)) ==> not-a-record-type #<<response> version: (1 . 1) code: 204 reason-phrase: "ok" headers: ((date . #<date nanosecond: 0 second: 43 minute: 52 hour: 18 day: 9 month: 8 year: 2023 zone-offset: 0>) (connection close) (server . "urbit/vere-2.11") (set-cookie . "urbauth-~zod=0vao7n2.lcut2.mu17h.9dgil.2o48i; Path=/; Max-Age=604800")) port: #<closed: file 7efddcb854d0>> (pretty-print (record-constructor a)) ==> ice-9/boot-9.scm:963:4: In procedure record-type-constructor: not-a-record-type #<<response> version: (1 . 1) code: 204 reason-phrase: "ok" headers: ((date . #<date nanosecond: 0 second: 30 minute: 53 hour: 18 day: 9 month: 8 year: 2023 zone-offset: 0>) (connection close) (server . "urbit/vere-2.11") (set-cookie . "urbauth-~zod=0v5.efbvj.h7hi9.8df2a.rh33o.4pv5f; Path=/; Max-Age=604800")) port: #<closed: file 7f2d0b2b9930>>
