GOOF----LE-8-2.0oM]ƒ4h¨ ] gguile¤ ¤ gdefine-module*¤ ¤ ¤ gsystem¤ gxref¤ ¤ gfilenameS¤ fsystem/xref.scm¤ gimportsS¤ gbase¤ gpmatch¤   ¤ ¤ gcompile¤  ¤ ¤ gvm¤ gprogram¤ ¤ ¤ gsrfi¤ gsrfi-1¤ ¤ ¤ ¤ gexportsS¤ g*xref-ignored-modules*¤ gprocedure-callees¤ gprocedure-callers¤ gsource-closures¤ !gsource-procedures¤ " !¤ #gset-current-module¤ $#¤ %#¤ &gmemq¤ 'gprogram-objects¤ (g vector-length¤ )g make-vector¤ *g decompile¤ +gprogram-objcode¤ ,gtoS¤ -gassembly¤ .g load-program¤ /gfor-each¤ 0g toplevel-set¤ 1g toplevel-ref¤ 2gprogram?¤ 3gfold¤ 4gprogram-callee-rev-vars¤ 5g variable?¤ 6gmodule-variable¤ 7gprogram-module¤ 8gthe-root-module¤ 9gnested-ref-module¤ :gresolve-module¤ ;gmodule-public-interface¤ gmake-hash-table¤ ?g*module-callees-db*¤ @g*tainted-modules*¤ Ag value-history¤ BA¤ CB¤ Dg module-name¤ Egmember¤ Fgon-module-modified¤ Gg hashq-ref¤ Hgassoc¤ Ig hashq-set!¤ Jg add-caller¤ Kg assoc-remove!¤ Lgforget-callers¤ Mg hash-set!¤ Ngappend¤ Oghash-ref¤ Pg add-callees¤ Qgensure-callers-db¤ Rguntaint-modules¤ Sg hash-for-each¤ Tgmodule-observers¤ Ugmodule-observe¤ Vgmodule-for-each¤ Wg procedure?¤ Xgfilter¤ Ygvariable-bound?¤ Zgmodule-submodules¤ [gcurrent-module¤ \gerror¤ ]f/expected a variable, symbol, or (modname . sym)¤ ^gprogram-sources¤ _gprocedure-sources¤ `g*closure-sources-db*¤ ag *sources-db*¤ bg*module-sources-db*¤ cg*tainted-sources*¤ dgon-source-modified¤ eg hashv-set!¤ fg hashv-ref¤ gg add-source¤ hgdelq¤ ig hashv-remove!¤ jg forget-source¤ kfunexpected source format¤ lg add-sources¤ mgand=>¤ ng vector->list¤ og hashq-remove!¤ pgforget-sources¤ qgensure-sources-db¤ rguntaint-sources¤ sgsort!¤ tghash-map->list¤ ugcons¤ vg lines->ranges¤ wgreverse¤ xglookup-source-procedures¤ ygcanonicalizationS¤ zy Œ¤ {z¤ |grelative¤ }g %file-port-name-canonicalization¤ ~gcatch¤ ~¤ €~¤ gopen-input-file¤ ‚g port-filename¤C5h˜A…]4   "54%>"G&h]45$CŒC‡gx  gy  gfilenamefsystem/xref.scmŒ " ŒŒ  # ŒŒ  # ŒŒ  # ŒŒ   gnameg cons-uniqŒC'()*+,-./01hÿ]!"@ˆ$7Ž&#ˆ$Ž(L¤CCCCCˆ$=Ž&'ˆ$Ž(L¤C"ÿÿ„"ÿÿ€"ÿÿ|"ÿÿx÷gx  Žgvx  Dgvy   Dgvx  , @gvy  , @gvx S Šgvy  S Šgvx  l ‚gvy  l ‚ gfilenamefsystem/xref.scmŒ - ŒŒ  . ŒŒ < 0 'ŒŒ F . ŒŒ | / 'ŒŒ ‚ . ŒŒ  Ž C2345&6789:;h@¡]45$)4544554455ˆ$gŽ &Kˆ$@Žˆ$)Ž 4  O >"G """""ƒ‘$C4 £5$—4 4£55"ÿÿÈ£$5£45$#—45$"Œ"ÿÿŠŠ$R445  $ " 5 — $4 5$" Œ""ÿÿ1ˆ$žŽ   ˆ$‹  Ž   ˆ$x  Ž (f445 5$4 $ 45" 5"—$45$"Œ""ÿþ’CCCC—"ÿþ} "ÿþsC™gprog  @g cons-uniq  @gt  @gn  9 >gprogv  9 >gasm  9 >gvx  L ©gvy  L ©gvy  b ›gvy r ”gi  ± 4gout  ± 4gobj  ÷ 'gt 8 Kgv O €gvx  %gvy  %gvx ž #gvy ž #gvx ¯ !gvy  ¯ !gm  Ç gv  î gfilenamefsystem/xref.scmŒ ! ŒŒ  % ŒŒ $ ŒŒ  ' ŒŒ  ( ŒŒ ( $ŒŒ ) ( ŒŒ * ) ŒŒ - ) ŒŒ 7 ) <ŒŒ 9 ) ŒŒ 9 ' ŒŒ B * ŒŒ y , ŒŒ ± 2 ŒŒ ¶ 4 ŒŒ º 3 ŒŒ ¾ 5 ŒŒ Å 5 ŒŒ Ç 5 ŒŒ Ë 3 ŒŒ Î 6 ŒŒ Ï 7 ŒŒ Ö 8 ŒŒ Ý 8 3ŒŒ ß 8 ŒŒ á 7 ŒŒ é 6 ŒŒ î 9 ŒŒ ò 3 ŒŒ ÷ : ŒŒ ÷ : ŒŒ ú ; ŒŒ  ; ŒŒ  < ŒŒ  # ŒŒ  # ŒŒ  # ŒŒ ' < ŒŒ * ? %ŒŒ . > ŒŒ / @ "ŒŒ 2 @ 7ŒŒ 8 @ 3ŒŒ O @ "ŒŒ O @ ŒŒ T C ŒŒ Z C &ŒŒ [ # ŒŒ g # ŒŒ r # ŒŒ € C ŒŒ ƒ > ŒŒ º F #ŒŒ ½ F 6ŒŒ À F FŒŒ à F 6ŒŒ Ç F #ŒŒ Ç F ŒŒ Ï H #ŒŒ Ð I (ŒŒ Ø J )ŒŒ Ù K -ŒŒ é I (ŒŒ î F ŒŒ ó N ŒŒ ù O ŒŒ ú # ŒŒ  # ŒŒ  # ŒŒ  N ŒŒ * P ŒŒ 4 P ŒŒ 4 2 ŒŒ 6 2 ŒŒ > 2 ŒŒ ? Q ŒŒN  @ gnamegprogram-callee-rev-varsŒC4R24hš]45$6C’gproc  gfilenamefsystem/xref.scmŒ S ŒŒ  U ŒŒ T ŒŒ  U ŒŒ  V ŒŒ   gnamegprocedure-callee-rev-varsŒC Z 6ŒŒ F Z ŒŒ  F gnamegprocedure-calleesŒg documentationf1Evaluates to a list of the given program callees.ŒCR=R4>i5?R@RCRDE@hHÑ] 4545$"45$"ˆ$ Œ CCÉgm  Agname Agfilenamefsystem/xref.scmŒ h ŒŒ  i ŒŒ i ŒŒ j ŒŒ  j ŒŒ  k ŒŒ * j ŒŒ 2 l ŒŒ 6 j ŒŒ ; m ŒŒ = m ŒŒ  A gnamegon-module-modifiedŒCFRG=HEIhhE]45$=45$45$CŽŒCŒ66=gcallee  bgcaller  bgmod-name   bg all-callers  bgcallers   Pgfilenamefsystem/xref.scmŒ o ŒŒ  p ŒŒ p ŒŒ  q ŒŒ  s ŒŒ  s ŒŒ $ t ŒŒ % u ŒŒ 1 u ŒŒ : v 1ŒŒ ; v $ŒŒ < v ŒŒ K x ŒŒ N x ŒŒ P w ŒŒ ] r (ŒŒ b r ŒŒ  b gnameg add-callerŒCJRI=KGh ·]44556¯gcallee  gmod-name  gfilenamefsystem/xref.scmŒ z ŒŒ | ŒŒ | ŒŒ  | ;ŒŒ  | ŒŒ  | ŒŒ  { ŒŒ   gnamegforget-callersŒCLRM?NOh º]44556²gcallees  gmod-name  gfilenamefsystem/xref.scmŒ ~ ŒŒ € ŒŒ  € ŒŒ  € DŒŒ  € ŒŒ  € ŒŒ   ŒŒ   gnameg add-calleesŒCPRQ//Lha]L6Ygcallee  gfilenamefsystem/xref.scmŒ „ ŒŒ „ ŒŒ  CO?Qh0]4O45>"G6•gm  )gfilenamefsystem/xref.scmŒ ƒ ŒŒ  „ ŒŒ … ŒŒ  … .ŒŒ  … ŒŒ  „ ŒŒ ) † ŒŒ  ) gnameguntaintŒC@h0‚]4>"G4>"G Czgfilenamefsystem/xref.scmŒ ‚ ŒŒ  ‡ ŒŒ  ˆ ŒŒ ( ‰ ŒŒ * ‰ ŒŒ  , gnameguntaint-modulesŒCRR:SI&FTUDVGWIXY</Jha]LL6Ygcallee  gfilenamefsystem/xref.scmŒ — ŒŒ ˜ ŒŒ  CP h9]$ƒM$ 4M5"$C45$RM$4M>"G"44554LO>"G L6CC1gsym  Žgvar  Žgx  Œgt  " Œgcallees  e Šgfilenamefsystem/xref.scmŒ ¡ ŒŒ  ŒŒ ŒŒ ŒŒ ŒŒ  ’ ŒŒ  ’ ŒŒ " ‘ ŒŒ . “ ŒŒ 8 ‘ ŒŒ > ” ŒŒ ? ” ŒŒ X • ŒŒ ] – %ŒŒ e • ŒŒ e • ŒŒ h — ŒŒ Š š ŒŒ  Ž CG h ü] "vM$4M>"G"4455$"4>"G454LO>"GL6M$4 M5$C"ÿÿq"ÿÿmôgname  ™gsub  ™gname  V vgfilenamefsystem/xref.scmŒ § ŒŒ ŒŒ ŒŒ & ž ŒŒ + ž (ŒŒ 3 ž ŒŒ 7 ž ŒŒ < Ÿ ŒŒ P   ŒŒ V   ŒŒ Y ¡ ŒŒ | « ŒŒ | ¨ ŒŒ ƒ ¨ ŒŒ ¨ ŒŒ  ™ CZh„]LLO456|gmod  gfilenamefsystem/xref.scmŒ ¥ ŒŒ  ¬ ŒŒ  ¦ ŒŒ   gnamegvisit-submodulesŒC=>I&FTUDVGWIXY</Jha]LL6Ygcallee  gfilenamefsystem/xref.scmŒ — ŒŒ ˜ ŒŒ  CP h9]$ƒM$ 4M5"$C45$RM$4M>"G"44554LO>"G L6CC1gsym  Žgvar  Žgx  Œgt  " Œgcallees  e Šgfilenamefsystem/xref.scmŒ ¡ ŒŒ  ŒŒ ŒŒ ŒŒ ŒŒ  ’ ŒŒ  ’ ŒŒ " ‘ ŒŒ . “ ŒŒ 8 ‘ ŒŒ > ” ŒŒ ? ” ŒŒ X • ŒŒ ] – %ŒŒ e • ŒŒ e • ŒŒ h — ŒŒ Š š ŒŒ  Ž C hȼ]!$ 45"HOQ$"€$4 è5 4 è5K456$aJ$4J>"G"4455$"4 >"G4 5  O6C´gmod-name  Ãgmod  Ãgvisited   Ãgvisit-submodules  " Ãgname  ° Ágfilenamefsystem/xref.scmŒ ‹ ŒŒ  Œ ŒŒ Œ ŒŒ  Œ ŒŒ / ® ŒŒ 7 ® ŒŒ ; ® ŒŒ < ¯ ŒŒ E ¯ ŒŒ F ° ŒŒ O ° ŒŒ R ± ŒŒ U ± -ŒŒ X ± ŒŒ Z ± ŒŒ ` ® ŒŒ f ŒŒ g ŒŒ € ž ŒŒ … ž (ŒŒ ž ŒŒ ‘ ž ŒŒ – Ÿ ŒŒ ª   ŒŒ °   ŒŒ Á ¡ ŒŒ  à gnamegensure-callers-dbŒCQR56[:\]RG= hxN]45$"IŠ$4455"2ˆ$"Ž4455" 454>"G 6Fgvar  wgvx 7 Ogvy  7 Ogv \ wgfilenamefsystem/xref.scmŒ ´ ŒŒ  ¹ ŒŒ ¹ ŒŒ  º ŒŒ  ¹ ŒŒ  º ŒŒ  º 1ŒŒ & º ŒŒ - ¼ ŒŒ < ¾ ŒŒ ? ¾ &ŒŒ I ¾ ŒŒ T À ŒŒ X À ŒŒ \ À ŒŒ \ ¹ ŒŒ _ Á ŒŒ u  ŒŒ w  ŒŒ  w gnamegprocedure-callersŒg documentationf÷Returns an association list, keyed by module name, of known callers of the given procedure. The latter can specified directly as a variable, a symbol (which gets resolved in the current module) or a pair of the form (module-name . variable-name), ŒCR2^h—]45$6Cgproc  gfilenamefsystem/xref.scmŒ Í ŒŒ  Ï ŒŒ Î ŒŒ  Ï ŒŒ  Ð ŒŒ   gnamegprocedure-sourcesŒC_R`RaR4>i5bRcRDEchHÜ] 4545$"45$"ˆ$ Œ CCÔgm  Agname Agfilenamefsystem/xref.scmŒ Û ŒŒ  Ü ŒŒ Ü ŒŒ Ý ŒŒ  Ý ŒŒ  Þ ŒŒ * Ý ŒŒ 2 ß ŒŒ 6 Ý ŒŒ ; à ŒŒ = à ŒŒ  A gnamegon-source-modifiedŒCdRO>MefhX=] 45$""454>"G45Œ65gproc  Ugfile  Ugline   Ugdb   Ugt  >gtable   ;g file-table  > Ugfilenamefsystem/xref.scmŒ â ŒŒ  ã ŒŒ ã ŒŒ  ä %ŒŒ  ä ŒŒ ! å ŒŒ > ã ŒŒ I é ŒŒ P é 6ŒŒ R é ŒŒ S é ŒŒ U ç ŒŒ  U gnameg add-sourceŒCgROhfeihHC]45$,4455ˆ$ 66C;gproc  Agfile  Agline   Agdb   Ag file-table  Agprocs  $ ?gfilenamefsystem/xref.scmŒ ë ŒŒ  ì ŒŒ ì ŒŒ  í ŒŒ  î ŒŒ  î ŒŒ î ;ŒŒ " î ŒŒ $ î ŒŒ $ î ŒŒ ) ï ŒŒ - ï ŒŒ 7 𠌌 ? ñ ŒŒ  A gnameg forget-sourceŒCjR_IOb>M/g\khXß]!ˆ$FŽˆ$.Žˆ$ŽLL6666×gsource  Wgvy Ogvx   Ggvy   Ggvx  - ?gfilenamefsystem/xref.scmŒ ÿ ŒŒ   ŒŒ ?  ŒŒ C  %ŒŒ G  ŒŒ K  %ŒŒ O  ŒŒ S  %ŒŒ W  ŒŒ  W CWl`h p]45$ L6Chgobj  gfilenamefsystem/xref.scmŒ  ŒŒ   ŒŒ  ŒŒ   ŒŒ   C2m'nhÀœ]45ˆ$o445$""454>"G>"G4O>"G" O4 5$4 4 5 5"$"6”gproc  ¼gmod-name  ¼gdb   ¼gsources  ¼gt   Qgtable  1 Ngt  ¨ ºgfilenamefsystem/xref.scmŒ ó ŒŒ  ô ŒŒ ô ŒŒ  õ ŒŒ  õ ŒŒ  ø ŒŒ  ø ŒŒ  ø ŒŒ - ù 'ŒŒ 1 ù ŒŒ 4 ú ŒŒ Z ø ŒŒ c ÿ ŒŒ ‹  ŒŒ •  ŒŒ –  ŒŒ ™  ŒŒ £  ŒŒ ¨  ŒŒ ·  ŒŒ ¼  ŒŒ  ¼ gnameg add-sourcesŒClROb/j\khXß]!ˆ$FŽˆ$.Žˆ$ŽLL6666×gsource  Wgvy Ogvx   Ggvy   Ggvx  - ?gfilenamefsystem/xref.scmŒ  ŒŒ   ŒŒ ?  ŒŒ C  %ŒŒ G  ŒŒ K  %ŒŒ O  ŒŒ S  %ŒŒ W  ŒŒ  W CGoWp`h p]45$ L6Chgobj  gfilenamefsystem/xref.scmŒ  ŒŒ   ŒŒ  ŒŒ   ŒŒ   C2m'n hˆ]]45$r4O45>"G4>"GO45$4 4 5 5"$"6CUgproc  ‡gmod-name  ‡gdb   ‡g mod-table  ‡gt  q ƒgfilenamefsystem/xref.scmŒ  ŒŒ   ŒŒ  ŒŒ   ŒŒ   ŒŒ  ŒŒ '  .ŒŒ )  ŒŒ .  ŒŒ 7  ŒŒ T  ŒŒ ^  ŒŒ _  ŒŒ b  ŒŒ l  ŒŒ q  ŒŒ €  ŒŒ …  ŒŒ  ‡ gnamegforget-sourcesŒCpRq//pah_]L6Wgproc  gfilenamefsystem/xref.scmŒ $ ŒŒ $ ŒŒ  CObShk]Ccgproc  gsources  gfilenamefsystem/xref.scmŒ ( $ŒŒ   CqhH´] 4O45$ 45">"G6¬gm  Agt  .gfilenamefsystem/xref.scmŒ # ŒŒ  $ ŒŒ & ŒŒ  % ŒŒ  ( ŒŒ + ) ŒŒ 3 $ ŒŒ A * ŒŒ  A gnameguntaintŒCch0‚]4>"G4>"G Czgfilenamefsystem/xref.scmŒ " ŒŒ  + ŒŒ  , ŒŒ ( - ŒŒ * - ŒŒ  , gnameguntaint-sourcesŒCrR&dTUDVWlah(´] $45$ L6CC¬gsym  'gvar  'gx  %gfilenamefsystem/xref.scmŒ 5 ŒŒ  6 ŒŒ 6 ŒŒ 7 ŒŒ 7 ŒŒ  8 ŒŒ  8 ŒŒ # 9 ŒŒ  ' ChHÇ] 4455$"4>"G45O6¿gmod  Bgname 3 Bgfilenamefsystem/xref.scmŒ 0 ŒŒ  1 ŒŒ  1 &ŒŒ  1 ŒŒ  1 ŒŒ  2 ŒŒ - 3 ŒŒ 3 3 ŒŒ B 4 ŒŒ  B gnameg visit-moduleŒC>SGIh@”]4M5$C4M>"G4L>"GM6Œgname  >gsub  >gfilenamefsystem/xref.scmŒ B ŒŒ  C ŒŒ  C ŒŒ  E ŒŒ ' F ŒŒ > G ŒŒ  > CZh0‚]M$"45NLLLO456zgmod  )gfilenamefsystem/xref.scmŒ > ŒŒ  ? ŒŒ @ ŒŒ  @ ŒŒ ! H ŒŒ ) A ŒŒ  ) Ca`>:hpJ]HHOK$"$"€$4 è5 4 è5 J456$ 456CBgmod-name  kgvisit-submodules  kg visit-module  kgvisited  gfilenamefsystem/xref.scmŒ / ŒŒ = ŒŒ " J ŒŒ 5 J 0ŒŒ 9 J ŒŒ : K $ŒŒ C K ŒŒ D L ŒŒ M L ŒŒ P M ŒŒ S M +ŒŒ V M ŒŒ X M ŒŒ ^ J ŒŒ a N ŒŒ i N ŒŒ  k gnamegensure-sources-dbŒCqR>S/GIhHÐ] 4L5$&L’$ L"LŽ”$LCCLLLŒ6Ègproc  Fgt Fgfilenamefsystem/xref.scmŒ U ŒŒ  W ŒŒ V ŒŒ  Y ŒŒ  Y ŒŒ  Y ŒŒ " Z ŒŒ + [ ŒŒ , [ ŒŒ 0 [ ŒŒ 5 \ ŒŒ D ^ $ŒŒ F ^ ŒŒ  F Chr]LO6jgline  gprocs  gfilenamefsystem/xref.scmŒ S ŒŒ  T ŒŒ   Cstuh}]ŽŽ’Cugx  gy  gfilenamefsystem/xref.scmŒ b ŒŒ  b ŒŒ b %ŒŒ b ŒŒ  Ch8µ] 454O>"G456­g file-table  1granges  1gfilenamefsystem/xref.scmŒ P ŒŒ  Q ŒŒ  Q ŒŒ R ŒŒ % a ŒŒ 1 a ŒŒ  1 gnameg lines->rangesŒCvROwvh€°]45"O(6" Ž"ÿÿ㎓$"ŽŽ“$ŽŒ"ÿÿ¹"ÿÿÅ"ÿÿÁ$ 45""ÿÿ–¨g canon-file  {gline  {gdb   {g file-table  {granges   `gprocs   `gfilenamefsystem/xref.scmŒ d ŒŒ  e ŒŒ e ŒŒ  f ŒŒ  h ŒŒ  i ŒŒ $ m ŒŒ . m ŒŒ . h ŒŒ 1 j ŒŒ 6 j ŒŒ : h ŒŒ ? j ŒŒ B j ŒŒ I k ŒŒ L k ŒŒ P k ŒŒ X k ŒŒ ` f ŒŒ f f ŒŒ g f $ŒŒ r f ?ŒŒ s g ŒŒ { f ŒŒ  { gnameglookup-source-proceduresŒCxR{|q}€hL]L6Dgfilenamefsystem/xref.scmŒ r ŒŒ  r %ŒŒ   ChX-13CPgargs gfilenamefsystem/xref.scmŒ r ŒŒ C‚x` hh+-/03#4>"GY4O5Z$ 45"  6#gfile  egline  egcanonicalization   egport  D egfile  Y egfilenamefsystem/xref.scmŒ o ŒŒ  o <ŒŒ  p ŒŒ 5 r ŒŒ D q ŒŒ L s ŒŒ M s ŒŒ Y q ŒŒ e t ŒŒ  e  gcanonicalizationS Œgnamegsource-closuresŒC R{|q}€hL]L6Dgfilenamefsystem/xref.scmŒ y ŒŒ  y %ŒŒ   ChX-13CPgargs gfilenamefsystem/xref.scmŒ y ŒŒ C‚xa hh--/03#4>"GY4O5Z$ 45"  6%gfile  egline  egcanonicalization   egport  D egfile  Y egfilenamefsystem/xref.scmŒ v ŒŒ  v >ŒŒ  w ŒŒ 5 y ŒŒ D x ŒŒ L z ŒŒ M z ŒŒ Y x ŒŒ e { ŒŒ  e  gcanonicalizationS Œgnamegsource-proceduresŒC!RC}gm  ,gfilenamefsystem/xref.scmŒ   ŒŒ ¬ ! ŒŒ u S ŒŒ , X ŒŒ 0 a ŒŒ 1 c ŒŒ : c ŒŒ ; e ŒŒ > e ŒŒ @ g ŒŒ C g ŒŒ t h ŒŒ @ o ŒŒ 2 z ŒŒ % ~ ŒŒ ] ‚ ŒŒ G ‹ ŒŒ 1 ´ ŒŒ ú Í ŒŒ þ Ó ŒŒ ! Õ ŒŒ ! × ŒŒ ! × ŒŒ ! Ù ŒŒ ! Ù ŒŒ "O Û ŒŒ $ â ŒŒ %¦ ë ŒŒ * ó ŒŒ .  ŒŒ 1 " ŒŒ 6­ / ŒŒ : P ŒŒ þ o ŒŒ A v ŒŒ%  A’ C6