GOOF----LE-8-2.0]W4hR] gguile  gdefine-module*   gsrfi gsrfi-69  gfilenameS fsrfi/srfi-69.scm gimportsS gsrfi-1     gsrfi-9   gsrfi-13   gice-9 goptargs    gexportsS gmake-hash-table g hash-table? galist->hash-table ghash-table-equivalence-function ghash-table-hash-function ghash-table-ref !ghash-table-ref/default "ghash-table-set! #ghash-table-delete! $ghash-table-exists? %ghash-table-update! &ghash-table-update!/default 'ghash-table-size (ghash-table-keys )ghash-table-values *ghash-table-walk +ghash-table-fold ,ghash-table->alist -ghash-table-copy .ghash-table-merge! /gstring-ci-hash 0ghash-by-identity 1 !"#$%&'()*+,-./0 2g re-exportsS 3g string-hash 43 5g replacementsS 6ghash 76 8gset-current-module 98 :8 ;gcond-expand-provide gmake-syntax-transformer ?> @> Ag hashx-invoke Bgmacro Cg $sc-dispatch DC EC Fg_ Ggany HFG Ig syntax->datum JI KI Lg datum->syntax ML NL Og ht-associator Pg ht-real-table Qgsyntax-violation RQ SQ Tf-source expression failed to match any pattern Ugwith-hashx-values Vglet Wgfirst Xgsecond Ygthird Zgmost-positive-fixnum [gcaller-with-default-size \6 ]6 ^gstring-hash-ci _ghashq `gsrfi-69:hash-table ag"%make-srfi-69-hash-table-procedure bgmake-srfi-69-hash-table cFGGGGGG dg syntax-object eglambda fgm-46961e518c-31 ggtop hfg igribcage jgt-46961e518c-2b kgt-46961e518c-2c lgt-46961e518c-2d mgt-46961e518c-2e ngt-46961e518c-2f ogt-46961e518c-30 pjklmno qhhhhhh rfl-46961e518c-36 sfl-46961e518c-37 tfl-46961e518c-38 ufl-46961e518c-39 vfl-46961e518c-3a wfl-46961e518c-3b xrstuvw yipqx zi {gx |{ }h ~fl-46961e518c-33 ~ i|} gshift g proc-name gargs  g  fl-1e8ba8b5a-2ba fl-1e8ba8b5a-2bb  i gkey gvalue gname gformals gbody   fl-1e8ba8b5a-2ad fl-1e8ba8b5a-2ae fl-1e8ba8b5a-2af fl-1e8ba8b5a-2b0 fl-1e8ba8b5a-2b1  i gmake-procedure-name   fl-1e8ba8b5a-29d  i  fl-1e8ba8b5a-29c  i| hyzzzzz  ghygiene  de g real-table yz  d g associator d gsize d gweakness d gequivalence-function d g hash-function d  g make-struct gm-46961e518c-29 g gt-1e8ba8b5a-38d gt-1e8ba8b5a-38c gt-1e8ba8b5a-38b  gm-1e8ba8b5a-38e g  fl-1e8ba8b5a-392 fl-1e8ba8b5a-393 fl-1e8ba8b5a-394  i g ctor-args  fl-1e8ba8b5a-37a  i gctor gfield  fl-1e8ba8b5a-376 fl-1e8ba8b5a-377  i gform g type-name gconstructor-spec g field-names   fl-1e8ba8b5a-36b fl-1e8ba8b5a-36c fl-1e8ba8b5a-36d fl-1e8ba8b5a-36e  i 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  i fl-1e8ba8b5a-334  i| yzzzzzz d d` d     geach-any F Q Q fWrong number of arguments g identifier?   z da grecord-type-vtable   g pwpwpwpwpwpw gdefault-record-printer        gset-struct-vtable-name!      gvtable-offset-user   g%hash-table?-procedure FG gm-46961e518c-48 g gt-46961e518c-47   fl-46961e518c-4d  i fl-46961e518c-4a  i| zzzzz   de !gobj "gt-1e8ba8b5a-47e #gt-1e8ba8b5a-478 $gt-1e8ba8b5a-479 %gt-1e8ba8b5a-47a &gt-1e8ba8b5a-47d 'gt-1e8ba8b5a-47c (gt-1e8ba8b5a-47b )"#$%&'( *gm-1e8ba8b5a-47f +*g ,+++++++ -fl-1e8ba8b5a-483 .fl-1e8ba8b5a-484 /fl-1e8ba8b5a-485 0fl-1e8ba8b5a-486 1fl-1e8ba8b5a-487 2fl-1e8ba8b5a-488 3fl-1e8ba8b5a-489 4-./0123 5i),4 6g copier-id 76 8fl-1e8ba8b5a-476 98 :i79 ;g ctor-name <; =fl-1e8ba8b5a-46e >= ?i<> @ Afl-1e8ba8b5a-46c BA Ci@B Dglayout ED Ffl-1e8ba8b5a-46a GF HiEG Ig immutable? JI Kfl-1e8ba8b5a-468 LK MiJL Ng field-count ON Pfl-1e8ba8b5a-466 QP RiOQ Sg getter-ids TS Ufl-1e8ba8b5a-463 VU WiTV Xg field-ids YX Zfl-1e8ba8b5a-460 [Z \iY[ ]gpredicate-name ^g field-spec _I]^ ` afl-1e8ba8b5a-453 bfl-1e8ba8b5a-454 cfl-1e8ba8b5a-455 dfl-1e8ba8b5a-456 efl-1e8ba8b5a-457 ffl-1e8ba8b5a-458 gabcdef hi_`g izz5zzzz:z?zCzHzMzRzWz\h jd!i kj lgand mdli ngstruct? odni poj qgeq? rdqi sg struct-vtable tdsi utj vz wd`v xruw ympx z ky {z |d{ }gthrow-bad-struct ~} } g%ht-real-table-procedure gfree-id g %%on-error gm-46961e518c-54 g  fl-46961e518c-56  i| zzzzz  d  G 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 g  fl-1e8ba8b5a-3b0 fl-1e8ba8b5a-3b1 fl-1e8ba8b5a-3b2 fl-1e8ba8b5a-3b3 fl-1e8ba8b5a-3b4 fl-1e8ba8b5a-3b5 fl-1e8ba8b5a-3b6  i ggetter gindex  fl-1e8ba8b5a-3a3 fl-1e8ba8b5a-3a4  i S6  fl-1e8ba8b5a-39e fl-1e8ba8b5a-39f fl-1e8ba8b5a-3a0  i zzzzzz d  FG gck gerr gs   fl-46961e518c-59 fl-46961e518c-5a  i zzzzz  d gquote d z d`   g%%index d  FG fl-46961e518c-5e fl-46961e518c-5f  i zzzzz  d d z d    g%%copier d  FG fl-46961e518c-63 fl-46961e518c-64  i zzzzz  d d g%%srfi-69:hash-table-set-fields z d   gt-46961e518c-53  fl-46961e518c-68  i zzzzz  de zzzzzz d  gif d dq ds  z d`  g struct-ref d z d   d} d dP     z d g%ht-associator-procedure gm-46961e518c-6f g  fl-46961e518c-71    i|   z zzzz   d      G z zzzzz d  FG  fl-46961e518c-74 fl-46961e518c-75  i z zzzz  d d z  d`   d   !F G "fl-46961e518c-79 #fl-46961e518c-7a $"# %i$ &%z zzzz  'd& (d& )%z  *d ) +(* ,+ -d .- /F.G 0fl-46961e518c-7e 1fl-46961e518c-7f 201 3i2 43z zzzz  5d4 6d4 73z  8d7 968 :9 ;gt-46961e518c-6e <; =fl-46961e518c-83 >= ?i<> @?z zzzz  Ade@ B?z zzzzz CdB DC EdB FdqB GdsB HGC I?z  Jd`I KFHJ LdB M?z  Nd M OLCN Pd}B QdB RdOI SQR TPCS UEKOT VADU Wz  XdW Yght-size Zg%ht-size-procedure [gm-46961e518c-8a \[g ]\ ^fl-46961e518c-8c _^ `i|]_ a\z`zzzz  bda cb dcG ez`zzzzz fde gf hFdgG i\\ jfl-46961e518c-8f kfl-46961e518c-90 ljk miil n\mz`zzzz  odn pdn qmz` rd`q spr ts ude vu wFdvG xfl-46961e518c-94 yfl-46961e518c-95 zxy {iiz |\{z`zzzz  }d| ~d| {z` d  ~  de  FdG fl-46961e518c-99 fl-46961e518c-9a  ii \z`zzzz  d d z` d   gt-46961e518c-89  fl-46961e518c-9e  i] \z`zzzz  de z`zzzzz d  d dq ds  z` d`  d z` d   d} d dY     z` dZ g ht-weakness g%ht-weakness-procedure gm-46961e518c-a5 g  fl-46961e518c-a7  i| zzzzz  d  G zzzzzz d  FG  fl-46961e518c-aa fl-46961e518c-ab  i zzzzz  d d z d`   d  FG fl-46961e518c-af fl-46961e518c-b0  i zzzzz  d d z d    d  FG fl-46961e518c-b4 fl-46961e518c-b5  i zzzzz  d d z d   gt-46961e518c-a4  fl-46961e518c-b9  i zzzzz  de zzzzzz d  d dq ds  z d`  d z d   d} d d     z d g*%hash-table-equivalence-function-procedure gm-46961e518c-c0 g   fl-46961e518c-c2     i|   z zzzz   d    G z zzzzz d  FG  fl-46961e518c-c5 fl-46961e518c-c6  i z zzzz  d d z  d`    d !  "F!G #fl-46961e518c-ca $fl-46961e518c-cb %#$ &i% '&z zzzz  (d' )d' *&z  +d * ,)+ -, .d /. 0F/G 1fl-46961e518c-cf 2fl-46961e518c-d0 312 4i3 54z zzzz  6d5 7d5 84z  9d8 :79 ;: fl-46961e518c-d4 ?> @i=? A@z zzzz  BdeA C@z zzzzz DdC ED FdC GdqC HdsC IHD J@z  Kd`J LGIK MdC N@z  Od N PMDO Qd}C RdC SdJ TRS UQDT VFLPU WBEV Xz  YdX Zg#%hash-table-hash-function-procedure [gm-46961e518c-db \[g ]\ ^fl-46961e518c-dd _^ `i|]_ a\z`zzzz  bda cb dcG ez`zzzzz fde gf hFdgG i\\ jfl-46961e518c-e0 kfl-46961e518c-e1 ljk miil n\mz`zzzz  odn pdn qmz` rd`q spr ts ude vu wFdvG xfl-46961e518c-e5 yfl-46961e518c-e6 zxy {iiz |\{z`zzzz  }d| ~d| {z` d  ~  de  FdG fl-46961e518c-ea fl-46961e518c-eb  ii \z`zzzz  d d z` d   gt-46961e518c-da  fl-46961e518c-ef  i] \z`zzzz  de z`zzzzz d  d dq ds  z` d`  d z` d   d} d d     z` dZ geach GG  G G G g %%set-fields gdummy gcheck? gexpr  gm-46961e518c-f6 g  fl-46961e518c-fb fl-46961e518c-fc fl-46961e518c-fd fl-46961e518c-fe fl-46961e518c-ff  i  fl-46961e518c-f8  i| gt-1e8ba8b5a-3c4 gt-1e8ba8b5a-3c6 gt-1e8ba8b5a-3c5  gm-1e8ba8b5a-3c7 g  fl-1e8ba8b5a-3cb fl-1e8ba8b5a-3cc fl-1e8ba8b5a-3cd  i fl-1e8ba8b5a-3c1 fl-1e8ba8b5a-3c2 fl-1e8ba8b5a-3c3  i zzzzz  d z d` dP dO dY d d d  gmap   glist ght-size! g%ht-size!-procedure FGG gm-46961e518c-10a g gt-46961e518c-108 gt-46961e518c-109   fl-46961e518c-10f fl-46961e518c-110  i  fl-46961e518c-10c  i| zzzzz  de gt-1e8ba8b5a-3e6 gt-1e8ba8b5a-3e7  gm-1e8ba8b5a-3e8 g  fl-1e8ba8b5a-3ec fl-1e8ba8b5a-3ed  i gsetter  fl-1e8ba8b5a-3e0 fl-1e8ba8b5a-3e1  fl-1e8ba8b5a-3e2     i   ^  fl-1e8ba8b5a-3d7 fl-1e8ba8b5a-3d8   i  g field-specs  fl-1e8ba8b5a-3d3 fl-1e8ba8b5a-3d4  i zz zz d gval d  d dq ds   z !d`  "! #g struct-set! $d# %z &d % '$& (d} )d *d  +)* ,(+ -"', .- /z 0d/ 1gequal? 2geqv? 3ghashv 4gstring=? 5g string-ci=? 6gguess-hash-function 7greverse! 8gkeyword? 9gwithout-keyword-args : ; g key-or-value ?gmake-doubly-weak-hash-table @gerror AfInvalid weak hash table type Bg guile-ht-ctor Cgassoc DC EC Fgassq Ggassv Hgequivalence-proc->associator IgweakS JI  KJ Lgfor-each Mghashx-get-handle Ng hashx-set! Ofht-value Pght-unspecified Qg hashx-ref RfKey not in table Sghashx-create-handle! Tg hashx-remove! Ug hash-fold Vg alist-consC5h]]4   124575 4:>"G4;i4"G4@ABEHKNOPh(-13Cg hashx-proc 'ght-var 'gargs  'gfilenamefsrfi/srfi-69.scm a d  '  Chd] 45L4?6\gargs  gv gfilenamefsrfi/srfi-69.scm  a    CSTh(!] 45$ O@6gy  'gtmp 'gfilenamefsrfi/srfi-69.scm a   ' g documentationfrInvoke HASHX-PROC, a `hashx-*' procedure taking a hash-function, assoc-function, and the hash-table as first args.g macro-typegdefmacrog defmacro-argsgargsC5AR4@UBEHKNVWXOYPhH-13454545Cgbindings Fght-var Fg body-forms  Fgfilenamefsrfi/srfi-69.scm i l  l  l   m % l  . n 6 l  F  Chd] 45L4?6\gargs  gv gfilenamefsrfi/srfi-69.scm  i    CSTh(] 45$ O@6 gy  'gtmp 'gfilenamefsrfi/srfi-69.scm i   ' g documentationffBind BINDINGS to the hash-function, associator, and real-table of HT-VAR, while evaluating BODY-FORMS.g macro-typegdefmacrog defmacro-argsgargsC5URZh o-.,3#L6ggobj gsize gfilenamefsrfi/srfi-69.scm z   {   Ch]OCghash-fn  gfilenamefsrfi/srfi-69.scm w   gnamegcaller-with-default-sizeg documentationfnAnswer a function that makes `most-positive-fixnum' the default second argument to HASH-FN, a 2-arg procedure.C[R4[i]56R^i/R4[i_i50R`h]Cg real-table  g associator  gsize   gweakness   gequivalence-function   g hash-function   gfilenamefsrfi/srfi-69.scm    gnameg"%make-srfi-69-hash-table-procedureCaR4@bBEch]Cgt-46961e518c-2b  gt-46961e518c-2c  gt-46961e518c-2d   gt-46961e518c-2e   gt-46961e518c-2f   gt-46961e518c-30      CbhT]L6Lga  gfilenamefsrfi/srfi-69.scm    CFhD]L6<gfilenamefsrfi/srfi-69.scm     Ch]C   CST hp]45$@45$ O@45$4O?$@  6  6}gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-69.scm   n C5bR ` 4`>"G ai`R`hx]$CCpgobj  gfilenamefsrfi/srfi-69.scm    gnameg%hash-table?-procedureCR4@BEzh7]C/gt-46961e518c-47    ChT]L6Lga  gfilenamefsrfi/srfi-69.scm    CFhD]L6<gfilenamefsrfi/srfi-69.scm     C|h]C   CST hp]45$@45$ O@45$4O?$@  6  6}gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-69.scm   n C5R`Phx]& C6pgs  gfilenamefsrfi/srfi-69.scm    gnameg%ht-real-table-procedureCR4@PBEh:]C2gerr  gs    Ch:]C2gerr  gs    Ch:]C2gerr  gs    Ch7]C/gt-46961e518c-53    CPhT]L6Lga  gfilenamefsrfi/srfi-69.scm    CFhD]L6<gfilenamefsrfi/srfi-69.scm     Ch]C   CSTh]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-69.scm   C5PR`Ohx]& C6pgs  gfilenamefsrfi/srfi-69.scm    gnameg%ht-associator-procedureCR4@OBEh:]C2gerr  gs    C!',h:]C2gerr  gs    C/5:h:]C2gerr  gs    CVh7]C/gt-46961e518c-6e    COhT]L6Lga  gfilenamefsrfi/srfi-69.scm    CFhD]L6<gfilenamefsrfi/srfi-69.scm     CXh]C   CSTh]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-69.scm   C5OR`Yh r]& C6jgs  gfilenamefsrfi/srfi-69.scm    gnameg%ht-size-procedureCZR4@YBEhoth:]C2gerr  gs    Cw}h:]C2gerr  gs    Ch:]C2gerr  gs    Ch7]C/gt-46961e518c-89    CYhT]L6Lga  gfilenamefsrfi/srfi-69.scm    CFhD]L6<gfilenamefsrfi/srfi-69.scm     Ch]C   CSTh]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-69.scm   C5YR`h v]& C6ngs  gfilenamefsrfi/srfi-69.scm    gnameg%ht-weakness-procedureCR4@BEh:]C2gerr  gs    Ch:]C2gerr  gs    Ch:]C2gerr  gs    Ch7]C/gt-46961e518c-a4    ChT]L6Lga  gfilenamefsrfi/srfi-69.scm    CFhD]L6<gfilenamefsrfi/srfi-69.scm     Ch]C   CSTh]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-69.scm   C5R`h ]& C6gs  gfilenamefsrfi/srfi-69.scm    gnameg*%hash-table-equivalence-function-procedureCR4@BEh:]C2gerr  gs    C"(-h:]C2gerr  gs    C06;h:]C2gerr  gs    CWh7]C/gt-46961e518c-bf    ChT]L6Lga  gfilenamefsrfi/srfi-69.scm    CFhD]L6<gfilenamefsrfi/srfi-69.scm     CYh]C   CSTh]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-69.scm   C5R`h ]& C6{gs  gfilenamefsrfi/srfi-69.scm    gnameg#%hash-table-hash-function-procedureCZR4@BEhoth:]C2gerr  gs    Cw}h:]C2gerr  gs    Ch:]C2gerr  gs    Ch7]C/gt-46961e518c-da    ChT]L6Lga  gfilenamefsrfi/srfi-69.scm    CFhD]L6<gfilenamefsrfi/srfi-69.scm     Ch]C   CSTh]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-69.scm   C5R4@BEh v]45Cngdummy  gcheck?  gs   ggetter   gexpr      CSTh(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-69.scm   " g macro-typeg syntax-rulesgpatternsgcheck?gsggettergexprg...C5R`h ]& C6|gs  gval  gfilenamefsrfi/srfi-69.scm    gnameg%ht-size!-procedureCR4@BE.hV]CNgt-46961e518c-108  gt-46961e518c-109    ChT]L6Lga  gfilenamefsrfi/srfi-69.scm    CFhD]L6<gfilenamefsrfi/srfi-69.scm     C0h]C   CST hp]45$@45$ O@45$4O?$@  6  6}gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-69.scm   n C5R1]q_23435/ h@]&C&C&C&C & CCg equal-proc  <gfilenamefsrfi/srfi-69.scm   < gnamegguess-hash-functiong documentationflGuess a hash function for EQUAL-PROC, falling back on `hash', as specified in SRFI-69 for `make-hash-table'.C6R78WhP]"?(64455$"45""g rest-list  Pgacc  Eg rest-list   Egfilenamefsrfi/srfi-69.scm          "  '  0 1  :  = 1 E  E  F  P   P gnamegwithout-keyword-argsg documentationfMAnswer REST-LIST with all keywords removed along with items that follow them.C9R;<=>?@A h@]$C$C$C$C 6gweakness  9gfilenamefsrfi/srfi-69.scm  5  9   9 gnameg guile-ht-ctorg documentationf7Answer the Guile HT constructor for the given WEAKNESS.CBR14EqF2GChs]L6kgitem  galist  gfilenamefsrfi/srfi-69.scm    C h@]&"$C&C&COCg equal-proc  9gfilenamefsrfi/srfi-69.scm     9 gnamegequivalence-proc->associatorg documentationf^Answer an `assoc'-like procedure that compares the argument key to alist keys with EQUAL-PROC.CHRK16B9H`hh-/023## 45#44545?45 Cg equal-proc  gg hash-proc  ggweak   gg guile-opts   gg real-table  R gg associator  R ggfilenamefsrfi/srfi-69.scm )  ;  < C  K  L  R   g  gweakS gnamegmake-hash-tableg documentationfAnswer a new hash table using EQUAL-PROC as the comparison function, and HASH-PROC as the hash function. See the reference manual for specifics, of which there are many.CR`YOPLMNh0] 4LLL5$CMNLLL6gpair  /ghandle  /gfilenamefsrfi/srfi-69.scm    =       &   * ' - 2 /   / C h-134?&  " 45H&  " 45& " 45& " 454 O>"GJ&  "4 >"GCgalist gmht-args gresult   gsize  - g hash-proc  ~ g associator  ~ g real-table  ~ gval  gfilenamefsrfi/srfi-69.scm      -  ~    gnamegalist->hash-tableg documentationf4Convert ALIST to a hash table created with MHT-ARGS.CROPRQ`OPPW@R h-134&  " 45& " 45& " 455&$ 456  6Cght gkey gdefault-thunk-lst  gresult  a gfilenamefsrfi/srfi-69.scm  a  k  n r  s {     gnameghash-table-refg documentationfLookup KEY in HT and answer the value, invoke DEFAULT-THUNK if KEY isn't present, or signal an error if DEFAULT-THUNK isn't provided.C RQ`OPh`]&  " 45& " 45& " 456ght  Ygkey  Ygdefault   Ygfilenamefsrfi/srfi-69.scm Y   Y gnameghash-table-ref/defaultg documentationfLLookup KEY in HT and answer the value. Answer DEFAULT if KEY isn't present.C!RS`OPPY h@]4&  " 45& " 45& " 455&N&  " 45&  "4 >"G"C8ght  gkey  g new-value   ghandle  Z gval  gfilenamefsrfi/srfi-69.scm   Z  a  e  h      gnameghash-table-set!g documentationfSet KEY to NEW-VALUE in HT.C"R`OPMYT hG]"&  " 45& " 45& " 4545$f&  " 45&  "4>"G4 >"G"C?ght  gkey  gh  Q ga  Q greal-ht  Q gval  gfilenamefsrfi/srfi-69.scm Q  X  h  k     gnameghash-table-delete!g documentationfRemove KEY's association in HT.C#RM`OPh`]4&  " 45& " 45& " 455$CCght  `gkey  `gfilenamefsrfi/srfi-69.scm    \    ` gnameghash-table-exists?g documentationf"Return whether KEY is a key in HT.C$R`OPMN@RY h-13 &  " 45& " 45& " 4545$45"4$4455" 4 5>"G&  " 4 5&  "4 >"GCght gkey gmodifier  gdefault-thunk-lst  g hash-proc  X g associator  X g real-table  X ghandle  k gval   gfilenamefsrfi/srfi-69.scm  X   _   k   s   v   {  ( }   ~          '  (  '      $            gnameghash-table-update!g documentationfModify HT's value at KEY by passing its value to MODIFIER and setting it to the result thereof. Invoke DEFAULT-THUNK for the old value if KEY isn't in HT, or signal an error if DEFAULT-THUNK is not provided.C%R%hD]LC<gfilenamefsrfi/srfi-69.scm  &   Ch^]O6Vght  gkey  gmodifier   gdefault   gfilenamefsrfi/srfi-69.scm       gnameghash-table-update!/defaultg documentationfModify HT's value at KEY by passing its old value, or DEFAULT if it doesn't have one, to MODIFIER, and setting it to the result thereof.C&R`+h}]Cugk  gv  gans   gfilenamefsrfi/srfi-69.scm !   ! ,   CYhH-]&  " 45$  6& C6%ght  Agfilenamefsrfi/srfi-69.scm     !   * !  - "   A gnameghash-table-sizeg documentationfReturn the number of associations in HT. This is guaranteed O(1) for tables where #:weak was #f or not specified at creation time.C'R+h}]Cugk  gv  glst   gfilenamefsrfi/srfi-69.scm &   & (   Ch]6ght  gfilenamefsrfi/srfi-69.scm $ & 6 &   gnameghash-table-keysg documentationf Return a list of the keys in HT.C(R+h}]Cugk  gv  glst   gfilenamefsrfi/srfi-69.scm *   * (   Ch]6ght  gfilenamefsrfi/srfi-69.scm ( * 6 *   gnameghash-table-valuesg documentationf"Return a list of the values in HT.C)R+h] 4L> GCgk  gv  gunspec   gvals   gfilenamefsrfi/srfi-69.scm .   / 5  /    Ch]O6ght  gproc  gfilenamefsrfi/srfi-69.scm ,  .    gnameghash-table-walkg documentationf3Call PROC with each key and value as two arguments.C*RU`Ph(Z]& " 456Rght  $gf  $gknil   $gfilenamefsrfi/srfi-69.scm 3 7  $ 7   $ gnameghash-table-foldg documentationfInvoke (F KEY VAL PREV) for each KEY and VAL in HT, where PREV is the result of the previous invocation, using KNIL as the first PREV. Answer the final F result.C+R+Vh]6ght  gfilenamefsrfi/srfi-69.scm 9 ; ! ;   gnameghash-table->alistg documentationfReturn an alist for HT.C,R`OP'BUNh}]LLL6ugk  gv  gign   gfilenamefsrfi/srfi-69.scm B   B #   C h]9&  " 45& " 45& " 4545&  " 4544554  O>"G&  " 4 5Cght  gh Q ga  Q greal-ht  Q gsize  ^ gweak  { g new-real-ht  gequivalence-function  gfilenamefsrfi/srfi-69.scm = Q ?  X @  ^ @  c @ - { @  ~ A   A  A  @  B  F  D   gnameghash-table-copyg documentationfAnswer a copy of HT.C-R+"h}]L6ugk  gv  gign   gfilenamefsrfi/srfi-69.scm L  L   Ch ]4O>"GCght  gother-ht  gfilenamefsrfi/srfi-69.scm H  K    gnameghash-table-merge!g documentationf`Add all key/value pairs from OTHER-HT to HT, overriding HT's mappings where present. Return HT.C.RCgm  4grtd gfilenamefsrfi/srfi-69.scm  D 5 Z : Z  B Z & G Z  w  }  }      S 3 5 78 9Q ; ? ? + ?  ? A C E G II M  Oi  Q  S $ Tw ( V/ , W 3 X 9 [ = ] H %  ] C6