asda?‰PNG  IHDR ? f ??C1 sRGB ??é gAMA ±? üa pHYs ? ??o¨d GIDATx^íüL”÷e÷Y?a?("Bh?_ò???¢§?q5k?*:t0A-o??¥]VkJ¢M??f?±8\k2íll£1]q?ù???T GOOF----LE-8-2.0]4h9W] gguile  gdefine-module*   gweb grequest  gfilenameS fweb/request.scm gimportsS grnrs g bytevectors     gice-9 g binary-ports   grdelim   gsrfi gsrfi-9   guri   ghttp   !  "gexportsS #grequest? $grequest-method %g request-uri &grequest-version 'grequest-headers (g request-meta )g request-port *g read-request +g build-request ,g write-request -gread-request-body .gwrite-request-body /grequest-cache-control 0grequest-connection 1g request-date 2grequest-pragma 3grequest-trailer 4grequest-transfer-encoding 5grequest-upgrade 6g request-via 7grequest-warning 8g request-allow 9grequest-content-encoding :grequest-content-language ;grequest-content-length grequest-content-range ?grequest-content-type @grequest-expires Agrequest-last-modified Bgrequest-accept Cgrequest-accept-charset Dgrequest-accept-encoding Egrequest-accept-language Fgrequest-authorization Ggrequest-expect Hg request-from Ig request-host Jgrequest-if-match Kgrequest-if-modified-since Lgrequest-if-none-match Mgrequest-if-range Ngrequest-if-unmodified-since Ogrequest-max-forwards Pgrequest-proxy-authorization Qg request-range Rgrequest-referer Sg request-te Tgrequest-user-agent Ugrequest-absolute-uri V#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTU3 Wgset-current-module XW YW Zg  [g%make-request-procedure \gmake-syntax-transformer ]\ ^\ _g make-request `gmacro ag $sc-dispatch ba ca dg_ egany fdeeeeee gg syntax-object hglambda igm-45c8615977-9 jgtop kij lgribcage mgt-45c8615977-3 ngt-45c8615977-4 ogt-45c8615977-5 pgt-45c8615977-6 qgt-45c8615977-7 rgt-45c8615977-8 smnopqr tkkkkkk ufl-45c8615977-e vfl-45c8615977-f wfl-45c8615977-10 xfl-45c8615977-11 yfl-45c8615977-12 zfl-45c8615977-13 {uvwxyz |lst{ }l ~gx ~ k fl-45c8615977-b  l gshift g proc-name gargs  j  fl-1e8ba8b5a-2ba fl-1e8ba8b5a-2bb  l gkey gvalue gname gformals gbody   fl-1e8ba8b5a-2ad fl-1e8ba8b5a-2ae fl-1e8ba8b5a-2af fl-1e8ba8b5a-2b0 fl-1e8ba8b5a-2b1  l gmake-procedure-name   fl-1e8ba8b5a-29d  l  fl-1e8ba8b5a-29c  l k|}}}}}  ghygiene  gh gmethod |}  g g gversion g gheaders g gmeta g gport g  g make-struct gm-45c8615977-1 j gt-1e8ba8b5a-38d gt-1e8ba8b5a-38c gt-1e8ba8b5a-38b  gm-1e8ba8b5a-38e j  fl-1e8ba8b5a-392 fl-1e8ba8b5a-393 fl-1e8ba8b5a-394  l g ctor-args  fl-1e8ba8b5a-37a  l gctor gfield  fl-1e8ba8b5a-376 fl-1e8ba8b5a-377  l gform g type-name gconstructor-spec g field-names   fl-1e8ba8b5a-36b fl-1e8ba8b5a-36c fl-1e8ba8b5a-36d fl-1e8ba8b5a-36e  l g record-layout gfunctional-setters gsetters gcopier ggetters g constructor ggetter-identifiers gfield-identifiers   fl-1e8ba8b5a-343 fl-1e8ba8b5a-341 fl-1e8ba8b5a-33f fl-1e8ba8b5a-33d fl-1e8ba8b5a-33b fl-1e8ba8b5a-339 fl-1e8ba8b5a-337 fl-1e8ba8b5a-335  l fl-1e8ba8b5a-334  l |}}}}}} g gZ g     geach-any d gsyntax-violation   fWrong number of arguments g identifier?   } g[    f-source expression failed to match any pattern  grecord-type-vtable        g pwpwpwpwpwpw gdefault-record-printer    gset-struct-vtable-name!   gvtable-offset-user   g%request?-procedure de gm-45c8615977-20 j gt-45c8615977-1f   fl-45c8615977-25   !l  "fl-45c8615977-22 #" $l# %!}$}}}}  &gh% 'gobj (gt-1e8ba8b5a-47e )gt-1e8ba8b5a-478 *gt-1e8ba8b5a-479 +gt-1e8ba8b5a-47a ,gt-1e8ba8b5a-47d -gt-1e8ba8b5a-47c .gt-1e8ba8b5a-47b /()*+,-. 0gm-1e8ba8b5a-47f 10j 21111111 3fl-1e8ba8b5a-483 4fl-1e8ba8b5a-484 5fl-1e8ba8b5a-485 6fl-1e8ba8b5a-486 7fl-1e8ba8b5a-487 8fl-1e8ba8b5a-488 9fl-1e8ba8b5a-489 :3456789 ;l/2: fl-1e8ba8b5a-476 ?> @l=? Ag ctor-name BA Cfl-1e8ba8b5a-46e DC ElBD F Gfl-1e8ba8b5a-46c HG IlFH Jglayout KJ Lfl-1e8ba8b5a-46a ML NlKM Og immutable? PO Qfl-1e8ba8b5a-468 RQ SlPR Tg field-count UT Vfl-1e8ba8b5a-466 WV XlUW Yg getter-ids ZY [fl-1e8ba8b5a-463 \[ ]lZ\ ^g field-ids _^ `fl-1e8ba8b5a-460 a` bl_a cgpredicate-name dg field-spec eOcd f gfl-1e8ba8b5a-453 hfl-1e8ba8b5a-454 ifl-1e8ba8b5a-455 jfl-1e8ba8b5a-456 kfl-1e8ba8b5a-457 lfl-1e8ba8b5a-458 mghijkl nlefm o!}$};}}}}@}E}I}N}S}X}]}bn pg'o qp rgand sgro tgstruct? ugto vup wgeq? xgwo yg struct-vtable zgyo {zp |!}$ }gZ| ~x{} sv~ &q }$ g gthrow-bad-struct   g%request-method-procedure gfree-id g %%on-error gm-45c8615977-2c j  fl-45c8615977-2e  l }}}}}  g  e g%%type gt-1e8ba8b5a-3a5 gt-1e8ba8b5a-3a6 gt-1e8ba8b5a-3a7 gt-1e8ba8b5a-3a8 gt-1e8ba8b5a-3a9 gt-1e8ba8b5a-3aa gt-1e8ba8b5a-3ab  gm-1e8ba8b5a-3ac j  fl-1e8ba8b5a-3b0 fl-1e8ba8b5a-3b1 fl-1e8ba8b5a-3b2 fl-1e8ba8b5a-3b3 fl-1e8ba8b5a-3b4 fl-1e8ba8b5a-3b5 fl-1e8ba8b5a-3b6  l ggetter gindex  fl-1e8ba8b5a-3a3 fl-1e8ba8b5a-3a4  l Y<  fl-1e8ba8b5a-39e fl-1e8ba8b5a-39f fl-1e8ba8b5a-3a0  l }}}}}} g  de gck gerr gs   fl-45c8615977-31 fl-45c8615977-32  l }}}}}  g gquote g } gZ   g%%index g  de fl-45c8615977-36 fl-45c8615977-37  l }}}}}  g g } g    g%%copier g  de fl-45c8615977-3b fl-45c8615977-3c  l }}}}}  g g g%%-set-fields } g   gt-45c8615977-2b  fl-45c8615977-40  l }}}}}  gh }}}}}} g  gif g gw gy  } gZ  g struct-ref g } g   g g g$     }  g  g%request-uri-procedure  gm-45c8615977-47   j    fl-45c8615977-49  l   }}}}}  g  e }}}}}} g  de    fl-45c8615977-4c fl-45c8615977-4d  l  }}}}}  g  g !} "gZ! # " $# %g &% 'd&e (fl-45c8615977-51 )fl-45c8615977-52 *() +l* , +}}}}}  -g, .g, /+} 0g / 1.0 21 3g 43 5d4e 6fl-45c8615977-56 7fl-45c8615977-57 867 9l8 : 9}}}}}  ;g: <g: =9} >g= ?<> @? Agt-45c8615977-46 BA Cfl-45c8615977-5b DC ElB D F E}}}}}  GghF HE}}}}}} IgH JI KgH LgwH MgyH NMI OE} PgZO QLNP RgH SE} Tg S URIT VgH WgH Xg%O YWX ZVIY [KQUZ \GJ[ ]} ^g ] _g%request-version-procedure `gm-45c8615977-62 a`j ba cfl-45c8615977-64 dc elbd fa}e}}}}  ggf hg ihe j}e}}}}} kgj lk mdile naa ofl-45c8615977-67 pfl-45c8615977-68 qop rlnq sar}e}}}}  tgs ugs vr}e wgZv xuw yx zgj {z |di{e }fl-45c8615977-6c ~fl-45c8615977-6d }~ ln a}e}}}}  g g }e g    gj  die fl-45c8615977-71 fl-45c8615977-72  ln a}e}}}}  g g }e g   gt-45c8615977-61  fl-45c8615977-76  lb a}e}}}}  gh }e}}}}} g  g gw gy  }e gZ  g }e g   g g g&     }e g_ g%request-headers-procedure gm-45c8615977-7d j  fl-45c8615977-7f  l }}}}}  g  e }}}}}} g  de  fl-45c8615977-82 fl-45c8615977-83  l }}}}}  g g } gZ   g  de fl-45c8615977-87 fl-45c8615977-88  l }}}}}  g g } g    g  de fl-45c8615977-8c fl-45c8615977-8d  l }}}}}  g g } g   gt-45c8615977-7c  fl-45c8615977-91  l }}}}}  gh }}}}}} g  g gw gy  } gZ  g } g   g g g'     } g  g%request-meta-procedure  gm-45c8615977-98   j     fl-45c8615977-9a   l   }}}}}  g  e }}}}}} g  de    fl-45c8615977-9d fl-45c8615977-9e  l  }}}}}  g g  } !gZ  "! #" $g %$ &d%e 'fl-45c8615977-a2 (fl-45c8615977-a3 )'( *l) + *}}}}}  ,g+ -g+ .*} /g . 0-/ 10 2g 32 4d3e 5fl-45c8615977-a7 6fl-45c8615977-a8 756 8l7 9 8}}}}}  :g9 ;g9 <8} =g< >;= ?> @gt-45c8615977-97 A@ Bfl-45c8615977-ac CB DlA C E D}}}}}  FghE GD}}}}}} HgG IH JgG KgwG LgyG MLH ND} OgZN PKMO QgG RD} Sg R TQHS UgG VgG Wg(N XVW YUHX ZJPTY [FIZ \} ]g \ ^g%request-port-procedure _gm-45c8615977-b3 `_j a` bfl-45c8615977-b5 cb dlac e`}d}}}}  fge gf hge i}d}}}}} jgi kj ldhke m`` nfl-45c8615977-b8 ofl-45c8615977-b9 pno qlmp r`q}d}}}}  sgr tgr uq}d vgZu wtv xw ygi zy {dhze |fl-45c8615977-bd }fl-45c8615977-be ~|} lm~ `}d}}}}  g g }d g    gi  dhe fl-45c8615977-c2 fl-45c8615977-c3  lm `}d}}}}  g g }d g   gt-45c8615977-b2  fl-45c8615977-c7  la `}d}}}}  gh }d}}}}} g  g gw gy  }d gZ  g }d g   g g g)     }d g^ geach ee  e e e g %%set-fields gdummy gcheck? gexpr  gm-45c8615977-ce j  fl-45c8615977-d3 fl-45c8615977-d4 fl-45c8615977-d5 fl-45c8615977-d6 fl-45c8615977-d7  l  fl-45c8615977-d0  l gt-1e8ba8b5a-3c4 gt-1e8ba8b5a-3c6 gt-1e8ba8b5a-3c5  gm-1e8ba8b5a-3c7 j  fl-1e8ba8b5a-3cb fl-1e8ba8b5a-3cc fl-1e8ba8b5a-3cd  l fl-1e8ba8b5a-3c1 fl-1e8ba8b5a-3c2 fl-1e8ba8b5a-3c3  l }}}}}  g } gZ g$ g% g& g' g( g)  gmap   glist gthrow g bad-request gdisplay f Bad request:  gapply gformat gnewline gbad-request-printer gset-exception-printer! gnumber? gexact? ginteger? gnon-negative-integer? g valid-header? gvalidate-headers fBad value for header ~a: ~s fHeader not a pair: ~a fHeaders not a list: ~a gmethodS   gversionS   gheadersS   gportS   gmetaS   gvalidate-headers?S        gGET    gassq-ref ghost fBad version: ~a f Bad uri: ~a g   gPOST gPUT fMissing port for message ~a f;HTTP/1.1 request without Host header and no host in URI: ~a fBad metadata alist guri-host guri-port gset-port-encoding! f ISO-8859-1 gread-request-line g read-headers gwrite-request-line  g write-headers !f  "gget-bytevector-n #gbytevector-length $f.EOF while reading request body: ~a bytes of ~a %gput-bytevector &gdefine-request-accessor ' (fl-45c8615977-1b1 )( *l') +fl-45c8615977-1ae ,+ -l, .*}- /g&. 0g. 10 2dee 3g datum->syntax 4g symbol-append 5grequest- 6g syntax->datum 7gdefine* 8gt-45c8615977-1bc 98 :gm-45c8615977-1bd ;:j <; =fl-45c8615977-1c0 >= ?l9<> @gdef A@ Bfl-45c8615977-1b8 Cfl-45c8615977-1b9 DBC ElAD F}?E}- Gg7F HgF IgoptionalS JgIF Kgdefault LgKF Mgcond NgMF Ogassq PgOF QgF Rg'F SRH TS Ug=> VgUF Wgcdr XgWF YVX Zgelse [gZF \[L ]\ ^g cache-control _g connection `gdate agpragma bgtrailer cgtransfer-encoding dgupgrade egvia fgwarning ggallow hgcontent-encoding igcontent-language jgcontent-length kgcontent-location lg content-md5 mg content-range ng content-type ogexpires pg last-modified qgaccept rgaccept-charset sgaccept-encoding tgaccept-language ug authorization vgexpect wgfrom xgif-match ygif-modified-since zg if-none-match {gif-range |gif-unmodified-since }g max-forwards ~gproxy-authorization grange greferer gte g user-agent f4URI not absolute, no Host header, and no default: ~s g build-uri g uri-scheme ghostS gpathS guri-path gqueryS g uri-query gfragmentS g uri-fragmentC5ho9]4   !"V54Y>"GZh]Cgmethod  guri  gversion   gheaders   gmeta   gport   gfilenamefweb/request.scm x    gnameg%make-request-procedureC[R4^_`cfh]Cgt-45c8615977-3  gt-45c8615977-4  gt-45c8615977-5   gt-45c8615977-6   gt-45c8615977-7   gt-45c8615977-8      C_hR]L6Jga  gfilenamefweb/request.scm  x   CdhB]L6:gfilenamefweb/request.scm  x    Ch]C   C  hp]45$@45$ O@45$4O?$@  6  6{gx  ngtmp ngtmp  " ngtmp  > ngfilenamefweb/request.scm x   n C5_R  Z4Z>"G [iZRZhs]$CCkgobj  gfilenamefweb/request.scm x    gnameg%request?-procedureCR4^#`ch7]C/gt-45c8615977-1f    C#hR]L6Jga  gfilenamefweb/request.scm  x   CdhB]L6:gfilenamefweb/request.scm  x    Ch]C   C  hp]45$@45$ O@45$4O?$@  6  6{gx  ngtmp ngtmp  " ngtmp  > ngfilenamefweb/request.scm x   n C5#RZ$hw]& C6ogs  gfilenamefweb/request.scm x    gnameg%request-method-procedureCR4^$`ch:]C2gerr  gs    Ch:]C2gerr  gs    Ch:]C2gerr  gs    Ch7]C/gt-45c8615977-2b    C$hR]L6Jga  gfilenamefweb/request.scm  x   CdhB]L6:gfilenamefweb/request.scm  x    C h]C   C h]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefweb/request.scm x   C5$RZ%ht]& C6lgs  gfilenamefweb/request.scm x    gnameg%request-uri-procedureC R4^%`c$h:]C2gerr  gs    C'-2h:]C2gerr  gs    C5;@h:]C2gerr  gs    C\h7]C/gt-45c8615977-46    C%hR]L6Jga  gfilenamefweb/request.scm  x   CdhB]L6:gfilenamefweb/request.scm  x    C^h]C   C h]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefweb/request.scm x   C5%RZ&h x]& C6pgs  gfilenamefweb/request.scm x    gnameg%request-version-procedureC_R4^&`cmtyh:]C2gerr  gs    C|h:]C2gerr  gs    Ch:]C2gerr  gs    Ch7]C/gt-45c8615977-61    C&hR]L6Jga  gfilenamefweb/request.scm  x   CdhB]L6:gfilenamefweb/request.scm  x    Ch]C   C h]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefweb/request.scm x   C5&RZ'h x]& C6pgs  gfilenamefweb/request.scm x    gnameg%request-headers-procedureCR4^'`ch:]C2gerr  gs    Ch:]C2gerr  gs    Ch:]C2gerr  gs    Ch7]C/gt-45c8615977-7c    C'hR]L6Jga  gfilenamefweb/request.scm  x   CdhB]L6:gfilenamefweb/request.scm  x    Ch]C   C h]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefweb/request.scm x   C5'RZ(h u]& C6mgs  gfilenamefweb/request.scm x    gnameg%request-meta-procedureC R4^(`c#h:]C2gerr  gs    C&,1h:]C2gerr  gs    C4:?h:]C2gerr  gs    C[h7]C/gt-45c8615977-97    C(hR]L6Jga  gfilenamefweb/request.scm  x   CdhB]L6:gfilenamefweb/request.scm  x    C]h]C   C h]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefweb/request.scm x   C5(RZ)h u]& C6mgs  gfilenamefweb/request.scm x    gnameg%request-port-procedureC^R4^)`clsxh:]C2gerr  gs    C{h:]C2gerr  gs    Ch:]C2gerr  gs    Ch7]C/gt-45c8615977-b2    C)hR]L6Jga  gfilenamefweb/request.scm  x   CdhB]L6:gfilenamefweb/request.scm  x    Ch]C   C h]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefweb/request.scm x   C5)R4^`ch v]45Cngdummy  gcheck?  gs   ggetter   gexpr      C h(] 45$@6gx  "gtmp "gfilenamefweb/request.scm x   " g macro-typeg syntax-rulesgpatternsgcheck?gsggettergexprg...C5Rh-136gmessage gargs gfilenamefweb/request.scm    gnameg bad-requestCRhH)534L>"G4L>"GL6-13L6gmsg ;gargs ;g_ D Hgfilenamefweb/request.scm     ; D H  ;  D H Ch]O@gport  gkey  gargs   gdefault-printer   gfilenamefweb/request.scm     gnamegbad-request-printerCR4ii>"Gh0]45$ $45$6CCCgn  ,gfilenamefweb/request.scm           & '  , gnamegnon-negative-integer?CRhXU]$<$(45$666(C6Mgheaders  Ugh Egk   =gv   =gfilenamefweb/request.scm            !   ,  1 $ 3  7  =  A  E K  Q  U   U gnamegvalidate-headersCR    Zh[-/03 ######$45""4>")G""$45$45$"4 >"G"$ &$" &" $4 >"G"v$[" $4>">G"7"3$) $""4>"G"""4>"G""!""""""""$A &  " 45 &  " 45"CSguri  gmethod  gversion   gheaders   gport   gmeta   gvalidate-headers?   g needs-host?  c gheaders    gfilenamefweb/request.scm  * % 9 . ! @ 1 O * P  T  U  [ 1 ]  ^  c  j  n  u      '   '                   0  ;  ?  H  L  S  h  l  s       )  8  #    =   gmethodS gversionS gheadersS gportS gmetaS gvalidate-headers?S gnameg build-requestg documentationf}Construct an HTTP request object. If VALIDATE-HEADERS? is true, the headers are each run through their respective validators.C+RZhX-.,3#4>"G4> G45Cgport Xgmeta Xgmethod  4 Xguri  4 Xgversion  4 Xgheaders  D Xgfilenamefweb/request.scm  -     !  *  7  > ' D  X gnameg read-requestg documentationfRead an HTTP request from PORT, optionally attaching the given metadata, META. As a side effect, sets the encoding on PORT to ISO-8859-1 (latin-1), so that reading one character reads one byte. See the discussion of character sets in "HTTP Requests" in the manual, for more information. Note that the body is not part of the request. Once you have read a request, you may read the body separately, and likewise for writing requests.C*RZ$%& '!)( hp]*4& " 45& " 45&  " 45>"G4&  " 45>"G4  >"G&  " 4 5&C& " 45& " 45&  " 45&  " 45&  " 4 5C gr  igport  igmethod  M iguri  M igversion  M igheaders  M igmeta  M igfilenamefweb/request.scm     " ) <  [  d  i        ' 7   5 ( M   i gnameg write-requestg documentationkXWrite the given HTTP request to PORT. Return a new request, whose  request-port will continue writing on PORT, perhaps using some transfer encoding.C,R;"Z)#$ hX]45$D4&  " 45545$C456Cgr  Wgnbytes Wgbv  3 Ugfilenamefweb/request.scm         % 3  3 6  ?  C J  K  U   W gnamegread-request-bodyg documentationkhReads the request body from R, as a bytevector. Return  #f if there was no request body.C-R%Z)h(]&  " 456gr  #gbv  #gfilenamefweb/request.scm   #   # gnamegwrite-request-bodyg documentationfHWrite BV, a bytevector, to the port corresponding to the HTTP request R.C.R4^&`c/1h-]C%gfield    C2 hi]6agfield  gdef  gfilenamefweb/request.scm     C3456GHJLNPQTY]hH] 444555     Cgfield  Egdef  Egtmp   Egfilenamefweb/request.scm     % /        E C hPt]45$@45" 6$4?$@""lgx  Pgtmp Pgtmp  " Pgfilenamefweb/request.scm   P C5&RO^Z'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm  '   F gnamegrequest-cache-controlC/RO_Z'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm    $    F gnamegrequest-connectionC0RO`Z'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm   F gnameg request-dateC1ROaZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm       F gnamegrequest-pragmaC2RObZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm    !    F gnamegrequest-trailerC3ROcZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm    +    F gnamegrequest-transfer-encodingC4ROdZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm    !    F gnamegrequest-upgradeC5ROeZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm        F gnameg request-viaC6ROfZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm    !    F gnamegrequest-warningC7ROgZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm        F gnameg request-allowC8ROhZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm    *    F gnamegrequest-content-encodingC9ROiZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm    *    F gnamegrequest-content-languageC:ROjZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm   F gnamegrequest-content-lengthC;ROkZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm   F gnamegrequest-content-locationCROnZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm   F gnamegrequest-content-typeC?ROoZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm   F gnamegrequest-expiresC@ROpZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm   F gnamegrequest-last-modifiedCAROqZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm       F gnamegrequest-acceptCBROrZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm    (    F gnamegrequest-accept-charsetCCROsZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm    )    F gnamegrequest-accept-encodingCDROtZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm    )    F gnamegrequest-accept-languageCEROuZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm   F gnamegrequest-authorizationCFROvZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm       F gnamegrequest-expectCGROwZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm   F gnameg request-fromCHROZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm   F gnameg request-hostCIROxZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm !  F gnamegrequest-if-matchCJROyZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm "  F gnamegrequest-if-modified-sinceCKROzZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm #  F gnamegrequest-if-none-matchCLRO{Z'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm $  F gnamegrequest-if-rangeCMRO|Z'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm %  F gnamegrequest-if-unmodified-sinceCNRO}Z'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm &  F gnamegrequest-max-forwardsCORO~Z'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm '  F gnamegrequest-proxy-authorizationCPROZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm (  F gnameg request-rangeCQROZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm )  F gnamegrequest-refererCRROZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm *  *   *  F gnameg request-teCSROZ'hH-.,3#4&  " 455$CCgrequest Fgdefault Fgt  7 Fgfilenamefweb/request.scm +  F gnamegrequest-user-agentCTRZ%Ih}-.,3##& " 45&  " 45$C45$"$ " 45 & " 4 5   &  " 45&  " 45&  " 456 ugr  g default-host  g default-port   guri  8  gt  c ghost   gfilenamefweb/request.scm . ! 1 8 1  = 2  Y 2  ] 5  c 5  w 6  | 7  8  9  8  4  ;  <  =  >  ?  @  ;   gnamegrequest-absolute-urig documentationkA helper routine to determine the absolute URI of a request, using the  host header and the default host and port.CURC1gm  ,grtd a gfilenamefweb/request.scm   4 x 'i )r )s ){  ) * ,a 3 6l < ?$ @\ Dj E  F  G  H  I  J  K  L  M  O  P-  Q2  R<  S?  TI  UP  VS  WY  Xk  Y  Z  [  \  ]  ^  _  ` ! a " b # c $ d % e & f ' h ( i ) j * k + o . 6  o C6