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"]N4hA] gguile  gdefine-module*   gscripts gread-scheme-source  gfilenameS fscripts/read-scheme-source.scm gimportsS gice-9 grdelim      gexportsS gread-scheme-source-silently gquoted? gclump  gset-current-module   g%include-in-guild-list f/Print a parsed representation of a Scheme file. g%summary g:type gvariable g define-module glength gdefine !galias "glambda #gstring? $g procedure %g :signature &g :std-int-doc 'g annotate! (gquote )gfilename *g make-regexp +f^#! ,f^!# -f ^[ ]*(;+) .f^[ ]*$ /gopen-input-file 0g eof-object? 1g regexp-exec 2ghash-bang-comment 3g:line 4g :line-count 5g :text-list 6greverse 7g read-line 8g whitespace 9g:text :gcomment ;g:leading-semicolons g port-line ?gappend @gfollowing-form-properties Agprocess Bgfor-each Cgwrite Dgnewline Egerror Ff bad list! Ggstring->symbol Hg substring Igsymbol->string Jgassq-ref Kgleading-semicolons Lgtext MgmainC5h]4   54>"GRR !"#$%& h]"6$"&6""B 45$0&#$$6"""" 45$& "$$z 45$e&U45$@4 >"G4 >"G 6"""""$c$U4 >"G4 >"G 45$45$  6CC"""""fgform  gnote!  gfilenamefscripts/read-scheme-source.scm c      d   d   d     " "  &  (  * . d  5 z  < z  @ y B {  E {  I y L |  N |  R y U }  X }  \ y ` ~  b ~  d ~ t d  w e  ~ e  d f  f  d q  q  n r  r  n s  s  s  s  n t  t t  n u  u  u  u  n v v  v  v w w  w " w 4 w . w  w  x   x %  x   x $ d  ' g  ) g  - d 0 h  3 h  7 d 8 i < i  > i  C i L j P j  S j  Y j d k  k k  o k p l  u l  y l  } k  m   m #  m a   gnameg annotate!C'R()*+,-./0123456789:;<=>'?h-134M5NCgargs gfilenamefscripts/read-scheme-source.scm / 7  1  gnamegprop+C@h`i]b4>"G4545454545"$4 5  $ C4 5$"p4  5  $" 4  5 $84   4 54  5>"/G"(45    "45  "|".4 5$"4>"G"4 5  $44     >"G"4>"G45 45H H 4  O>"GJ   J   $"4>"GJ K  4  J  >"G4 >"G    4545" C4545"agfile  ^gnb!  ^g hash-bang-rx  A ^g bang-hash-rx  A ^gall-comment-rx  A ^gall-whitespace-rx  A ^gp  A ^gn  O Ggline  O Ggt \ Egline x gtext x gt  gt 8 .gm1 M Ygform  +gcount  (gprops  gprops  %gt  gfilenamefscripts/read-scheme-source.scm         # # %  &  * # ,  -  1 % 3  4  8 ( :  ; A  O  U  V \  h  t x  y        2 .  - . -       $ $         #  0  8 A  E  M + M ! R & U / V # [  h  u      $  !    /  !  #          '           /  6  7 % E F G  H  O  P , ^ \  ^ gnamegprocessCARBAht]MNClge  gfilenamefscripts/read-scheme-source.scm   4 *  Chn]LO6fgfile  gfilenamefscripts/read-scheme-source.scm      C6h0-13H4O>"GJ6gfiles +gres +gfilenamefscripts/read-scheme-source.scm    +  + gnamegread-scheme-source-silentlyg documentationf6See commentary in module (scripts read-scheme-source).CRBACDht]4>"G6lge  gfilenamefscripts/read-scheme-source.scm   (  2   Chn]6fgfile  gfilenamefscripts/read-scheme-source.scm   Ch-136gfiles gfilenamefscripts/read-scheme-source.scm    gnamegread-scheme-sourceg documentationf6See commentary in module (scripts read-scheme-source).CR(EFGHIhB]"$ 45$&${ 45$l&a"Q(C$"4>"G4445 55""CCCCCC:gsym  gform  ginside  $ gls  G galist  G gfirst  S gfilenamefscripts/read-scheme-source.scm            #  $  )  - /  6  : ?  C G  M  S ! S  X  \  a  e ! j  u  w # z $ } / $ # #     2 )  gnamegquoted?CR6@82:JKL ht]Y"g(6$"45$"45$"45$"|45$"(45"G 4 5  $I4 5  $4  5"45"45"454 5"E""lgforms  {gforms  mgacc   mgpass-this-one-through?   mgform   mgt  mg inner-forms  8glevel  8gtext  8g inner-form 8gt 8g new-level  gfilenamefscripts/read-scheme-source.scm            % # 0  1  5  9  = @  E # P  Q  U  Y  ] `  m  n  r  v  z }         < 0 * $  0    '  0  '   3  4  3  ,  2  .  9  ?  @  ?  9   2  <  0  *  $ # < * 0 - * 8 $ 8  ; / < ) B 9 D ) E . K > M . P ( Z  ]   b  ( m   m  p { R  { gnamegclumpCRiMRCgm  ,gfilenamefscripts/read-scheme-source.scm  V 0 ] 2 ^  5 ^  c   F ] w ~     C6