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.0A ]I4h] gguile  gdefine-module*   gscripts glint  gfilenameS fscripts/lint.scm gimportsS gice-9 g common-list     gformat     gexportsS  gset-current-module   g%include-in-guild-list f1Check for bugs and style errors in a Scheme file. g%summary gscan-file-for-module-name guniq gscan-file-for-free-variables gresolve-module fResolved module: ~S  !gcatch "geval #f!Unresolved free variables in ~A:  $g write-char %gwrite &gnewline 'f#No unresolved free variables in ~A  (gwith-input-from-file )g eof-object? *gread +g define-module ,gappend -gdetect-free-variables .gmemq /gdefine-generic 0gquote 1g quasiquote 2glet 3gletrec 4gmap 5gcar 6glet* 7gand-let* 8gdefine 9g define-public :g define-macro ;glambda g define-method ?gdefine* @g define-class Agdetect-free-variables-noncar Bgcase Cgunquote Dgunquote-splicing Egelse Fg=> Ggfor-each HgmainC5h0]4   54>"GRR !"hS]LL6Kgfilenamefscripts/lint.scm x   y  y   C#$%&hh-13M$4L>"G"4 >"G4L>"G4>"GNCgargs bgfilenamefscripts/lint.scm z   {   |   }   |  )   ;  @  E  N  `  b C' h])45445545H4>"G"8("64O O>"G""J$  6C}gfilename  g module-name  g free-vars   gmodule  ! g all-resolved?  ! g free-vars  > vgfilenamefscripts/lint.scm n  o  p  p   p   o   q  ! q  & s  + s  2 s  > t  D u  I w  p  v  v t      gnameglintCR()*+hP]"945$C" 45"$&C""45"gx  ?gfilenamefscripts/lint.scm          "  "  %  )  ,  . ! 2  5  ?  @  J   J Ch]6gfilename  gfilenamefscripts/lint.scm   gnamegscan-file-for-module-nameCR(),*-h@]")45$@4545"45"gx  /gfvlists  /gfilenamefscripts/lint.scm            " 8 $  '  / /  0  5 % =   = Ch]6gfilename  gfilenamefscripts/lint.scm   gnamegscan-file-for-free-variablesCR.+/0123,45-hu]L$L"M6mgbinding  gfilenamefscripts/lint.scm "  ;  ;  $   C-hd]L6\gbodyform  gfilenamefscripts/lint.scm " $  C67-hd]M6\gbodyform  gfilenamefscripts/lint.scm    C-89:;<-hd]L6\gbodyform  gfilenamefscripts/lint.scm    C=-hd]L6\gbodyform  gfilenamefscripts/lint.scm    C>?-hd]L6\gbodyform  gfilenamefscripts/lint.scm      C@Ah]$"M6zg slot/option  gfilenamefscripts/lint.scm     <  8   <      CB-hi]M6agcase  gfilenamefscripts/lint.scm     1    CCDEFA%hh]H$4J5$CC$;$"!$"$"$C$"$r$"4J4  5544  O5?44  O5?6 $"$I(4 O5@4J54 J56$"$"$:$JKJ6JKJ6$"$U"-("/$""J"4 O5@$.4J54J54 O5@$"$f"=("@$!$"""J"4 O5@$4 O5@$4J54 O5@ $"!!$""$"#$ $J64J54$J56Cgx  fglocals  fgkey  , dgletrec?  glocals-for-let-body  glocals   gargs   glocals-for-lambda-body   glocals-for-receive-body  + Nglocals  i gargs  i glocals-for-method-body    gfilenamefscripts/lint.scm      ! ! % )  ,  , b l }    . ( ; " "   (  ' 6 ? 6 '   "     "               "  ' 5 * / /  0  4 / 7 7 < C > / B 5 H / J  L  U t  v  z } %      )  3  ?  )    %      )     *  ,  3  ,  ?  9  9  3  3  *  ;  *           ! + ( : + + + 0  5 , ;  <  H  L  N  W i * o  , x  3 |  ,   J   C   ?   C   C   9   9   3   3  *  ;  *                                *                I " * M " P $  T $ 0 X $  Y %  ^ % 7 b %  d $  e '   f gnamegdetect-free-variablesC-R.FA,-hXU] $45$CC$.$ 645456CMgx  Uglocals  Ugkey  ( Sgfilenamefscripts/lint.scm )  - -  .  .  .   . ! ! 0 % -  ( 1  ( 1 8 3 * < 3 ? 5  C 5 0 G 5  H 6  M 6 7 Q 6  S 5  T 8   U gnamegdetect-free-variables-noncarCARGhs-136kgfiles gfilenamefscripts/lint.scm :  ;   gnamegmainCHRCgm  ,gfilenamefscripts/lint.scm  f 0 k 2 l  5 l  n     ) . :   0 C6