[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
re: extract headers from response record
From: |
Mortimer Cladwell |
Subject: |
re: extract headers from response record |
Date: |
Wed, 9 Aug 2023 14:56:39 -0400 |
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>>