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.0t]4hU] gguile  gdefine-module*   gsystem gvm gtraps  gfilenameS fsystem/vm/traps.scm gimportsS gbase gpmatch      gframe   gprogram   gobjcode   g instruction   gxref  !  "grnrs #g bytevectors $"# %$ &!% 'gexportsS (gtrap-at-procedure-call )gtrap-in-procedure *gtrap-instructions-in-procedure +gtrap-at-procedure-ip-in-range ,gtrap-at-source-location -gtrap-frame-finish .gtrap-in-dynamic-extent /gtrap-calls-in-dynamic-extent 0g#trap-instructions-in-dynamic-extent 1gtrap-calls-to-procedure 2gtrap-matching-instructions 3()*+,-./012  4gset-current-module 54 64 7gmake-syntax-transformer 87 97 :g arg-check ;gmacro < ?gany @???? Ag syntax-object Bgif Cgtop DC Egribcage Fgdummy Ggarg Hg predicate? Igmessage JFGHI Kg m-1f68148ae-0 LKC MLDDD Nf l-1f68148ae-5 Of l-1f68148ae-6 Pf l-1f68148ae-7 Qf l-1f68148ae-8 RNOPQ SEJMR TE Ugx VU WL Xf l-1f68148ae-2 YX ZEVWY [DSTZ \ghygiene ]\ ^AB[] _gnot `A_[] agerror bAa[] cfbad argument ~a: ~a dAc[] egquote fAe[] g??? hFGH iLDD jf l-1f68148ae-e kf l-1f68148ae-f lfl-1f68148ae-10 mjkl nEhim oDnTZ pABo] qA_o] rAao] sfbad argument ~a: expected ~a tAso] uAeo] vgsyntax-violation wv xv yf-source expression failed to match any pattern zftrap already enabled {ftrap already disabled |gnew-disabled-trap }gnew-enabled-trap ~g procedure gframe-procedure gprogram? gprogram-objcode g frame-matcher gvmS   gclosure?S   g our-frame?S    gthe-vm g procedure? gproc ghandler g add-hook! g vm-apply-hook g remove-hook! g current-frameS          g enter-handler g exit-handler gwarn falready in proc gframe-previous gvm-push-continuation-hook gvm-pop-continuation-hook gvm-abort-continuation-hook gvm-restore-continuation-hook g next-handler g vm-next-hook gnumber? ginteger? gexact? gnon-negative-integer? gpositive-integer? gand-map grange? gor-map g in-range? grange g frame-address gframe-instruction-pointer gobjcode->bytecode gprogram-last-ip f unexpected gfor-each g assv-set! gassv-ref gsort! gprogram-sources-pre-retire gprogram-sources-by-line fno instructions found at f: f ; using line finstead fno instructions found for gsource->ip-range gsource-closures gsource-procedures gsource-closures-or-procedures  gstring? gfile g user-line gmap fNo procedures found at ~a:~a.    gframe? greturn-handler g abort-handler f.return-or-abort traps may only be enabled once          g apply-handler        glength gdelq  g frame-predC5hc]4    &'3546>"G49:;>@^`bdfh(k]Ccgdummy  $garg  $g predicate?   $gmessage   $  $ Cgpqrtuh0V]CNgdummy  )garg  )g predicate?   )  ) Cxyh@]45$@45$@6gx  9gtmp 9gtmp  " 9gfilenamefsystem/vm/traps.scm N   9 g macro-typeg syntax-rulesgpatternsgargg predicate?gmessagegargg predicate?C5:Raza{hP-.,3#M$"4>"G4L>"GNLCgframe Igfilenamefsystem/vm/traps.scm c   d  d  $ d  ) d  2 e  D f  I gnameg disable-trapChX-.,3#M$4>"G"4L>"GNLLLOCgframe Rgfilenamefsystem/vm/traps.scm ]   ^   ^  ^  % ^  2 _  F `  R gnameg enable-trapCh ]HOQCgvm  genable  gdisable   genabled?   g enable-trap   gfilenamefsystem/vm/traps.scm V  W    gnamegnew-disabled-trapC|R|h]456gvm  gframe  genable   gdisable   gfilenamefsystem/vm/traps.scm k  l   l    gnamegnew-enabled-trapC}R~h8] 45L&C45$454L5CCgframe  2g frame-proc 2gfilenamefsystem/vm/traps.scm s   t  t  u  u   v  v  ! w  ( x  / w   2 Chj]45LCbgframe  gfilenamefsystem/vm/traps.scm y   z  z   Ch0] $ 45"$OCOCgproc  .gmatch-objcode?  .gproc   .gfilenamefsystem/vm/traps.scm n  o  o  p   o   r   . gnameg frame-matcherCRash]4L5$L6Cgframe  gfilenamefsystem/vm/traps.scm        gnameg apply-hookC}hm]4L5L6egframe  gfilenamefsystem/vm/traps.scm        Chm]4L5L6egframe  gfilenamefsystem/vm/traps.scm        ChM-/03#45## 4545$"4>"G45$"4 >"G OQ  O O6Egproc  ghandler  gvm   gclosure?   g our-frame?   g apply-hook  gfilenamefsystem/vm/traps.scm ~  ~ 8 0 - ;  `     gvmS gclosure?S g our-frame?S gnamegtrap-at-procedure-callC(RashX]M$4L>"GN"4L5$%M$64L>"GNCCgframe  Sgfilenamefsystem/vm/traps.scm     " ,  2  6  : ; O   S gnameg apply-hookCh(]M$4L>"GNCCgframe  !gfilenamefsystem/vm/traps.scm       ! gnamegpush-cont-hookChh] M$4L>"GN"4L455$.45M$64L>"GNCCgframe  agframe 8 _gfilenamefsystem/vm/traps.scm     " %  - 1  2  8 @  D  H I ]   a gnameg pop-cont-hookChX]M$4L>"GN"4L5$%M$64L>"GNCCgframe  Sgfilenamefsystem/vm/traps.scm     " ,  2  6  : ; O   S gnameg abort-hookChX]M$4L>"GN"4L5$%M$64L>"GNCCgframe  Sgfilenamefsystem/vm/traps.scm     " ,  2  6  : ; O   S gnameg restore-hookC} h4]44L5L>"G44L5L>"G44L5L>"G44L5L>"G44L5L>"G$24L5$%M$64L>"GNCCC,gframe  gfilenamefsystem/vm/traps.scm            ,  5  8  E  N  Q  ^  g  j  w        Ch]M$4L>"GN"44L5L>"G44L5L>"G44L5L>"G44L5L>"G4L5L6gframe  gfilenamefsystem/vm/traps.scm     "  %  2  ;  >  K  T  W  d  m  p  }     ChX9-/03 ##45## 4545$"4>"G45$"4 >"G45$"4 >"GH O O  O O O QQ Q Q Q     O     O61gproc  Qg enter-handler  Qg exit-handler   Qg current-frame   Qgvm   Qgclosure?   Qg our-frame?   Qgin-proc?  Qg apply-hook  Qgpush-cont-hook Qg pop-cont-hook Qg abort-hook Qg restore-hook Q gfilenamefsystem/vm/traps.scm # 4 9 ( D  i    Q   Q  g current-frameS gvmS gclosure?S g our-frame?S gnamegtrap-in-procedureC)Rash]4L5$L6Cgframe  gfilenamefsystem/vm/traps.scm        gnameg next-hookC)h8]44L5L>"G$4L5$L6CCgframe  6gfilenamefsystem/vm/traps.scm        !  " ,  2   6 gnamegenterCh(]4L>"G4L5L6gframe  !gfilenamefsystem/vm/traps.scm      !   ! gnamegexitCh-/03##45## 4545$"4>"G45$"4 >"G45$"4 >"G OQ  OO6 gproc  g next-handler  g exit-handler   g current-frame   gvm   gclosure?   g our-frame?   g next-hook  gfilenamefsystem/vm/traps.scm # A 9 * D  i      g current-frameS gvmS gclosure?S g our-frame?S gnamegtrap-instructions-in-procedureC*Rh0]45$ 45$45$ CCCCgx  /gfilenamefsystem/vm/traps.scm         #  & 0 ( +  / gnamegnon-negative-integer?CRh0]45$45$45$ CCCCgx  .gfilenamefsystem/vm/traps.scm               #   &  +  . gnamegpositive-integer?CRh ]$45$6CCgx  gfilenamefsystem/vm/traps.scm            .         .     Ch]$6C|gx  gfilenamefsystem/vm/traps.scm            gnamegrange?CRh]L$LCCgbounds  gfilenamefsystem/vm/traps.scm                 Ch]O6grange  gi  gfilenamefsystem/vm/traps.scm       gnameg in-range?CRash@] ","NC$$ """M"gfp  :gframes  2gfilenamefsystem/vm/traps.scm       !            #   !  $   *  2    : gnameg cull-frames!Chpk]!45454L>"G4L5M$ M"$$CMNC$ MNL6Ccgframe  ogfp  ogip   og now-in-range?  A og was-in-range?  A ogfilenamefsystem/vm/traps.scm #   $  %   $   &  ' '  2 ( " 6 (  9 ( 6 < ( 3 A '  K ) Q + V ,  X ,  ` ) e .  g . m /   o gnameg next-handlerC*h(]M$M45$MNCCCgframe  #gfilenamefsystem/vm/traps.scm 1   2  2  3  3 !  3   2  4   4   # gnameg exit-handlerCh-/03 ##45## 4545$"4>"G4 5$"4  >"G45$"4 >"GH OO QQ  O6 gproc  grange  ghandler   g current-frame   gvm   gclosure?   g our-frame?   gfp-stack  g cull-frames!  g next-handler  gfilenamefsystem/vm/traps.scm  #  @ 9  ) D   i         6    g current-frameS gvmS gclosure?S g our-frame?S gnamegtrap-at-procedure-ip-in-rangeC+Rh]4455 Cgprog  gfilenamefsystem/vm/traps.scm =  >   > 0  >   >    gnamegprogram-last-ipCRah0] 4M4M5$"5NCgpair  0gt  )gfilenamefsystem/vm/traps.scm T  V  V $ W $  X (  X 8  X (  X $ & Y ( * W  , V  . U   0 Ch]Cygx  gy  gfilenamefsystem/vm/traps.scm [   [ (  [ 0 [ %  C h ]R"$$$$g $L $0  $     "45 " 45" "45"45"45"-H4O>"G4J>"GJC45"gproc  gfile  gsources    gout    gv   gvx  " gvy  " gvx  3 gvy  3 gvx A gv ^ gvx j xgalist    gfilenamefsystem/vm/traps.scm @  A  C  C   D  E   E L G  P G  U I * V I # Z I  ] J + ^ J # u L & } M + M 2 M + N 2 N # H  H  Q  Q  Q  Q  Q  Q  Q  D  R  R  S [  A   A   B   A '   gnamegprogram-sources-by-lineCRh@]L$CL$#4LL>"GCCgline-and-ranges  ?gfilenamefsystem/vm/traps.scm _   a   a  `   b   c   c   `   d   d  # d 8 ' e  * e ' , e = 1 d  < f   ? Ch@] 4O455$C4>"GCgproc  >gfile  >gline   >gt   >gfilenamefsystem/vm/traps.scm ^  _   h   _   _  % j  ) j  - j / 4 j  = k   > gnamegsource->ip-rangeCRh(] 45$D45Dgfile  %gline  %gclosures  %gfilenamefsystem/vm/traps.scm m  n  n   o   o   p   q  % q   % gnamegsource-closures-or-proceduresCRas}+h(] 4LL5LLLL6 gproc  &grange  &gfilenamefsystem/vm/traps.scm     !  =   !    &    & Cah0]4LLLLLLOL5NM( LL6Cgframe  .gfilenamefsystem/vm/traps.scm       "  &   ,    . Chc]L6[gtrap  gfilenamefsystem/vm/traps.scm     $   Ch m]4OM>"GNCegframe  gfilenamefsystem/vm/traps.scm        Ch-/03##4545$"4>"G45$"4  >"G4 5$"4  >"GH4> GOO6gfile  g user-line  ghandler   g current-frame   gvm   gtraps  gprocs  g closures?  gfilenamefsystem/vm/traps.scm w # x : * y  O z  t {  |  ~  ~ 7 ~  }      g current-frameS gvmS gnamegtrap-at-source-locationC,Rash(]M$45M& NL6CCgframe  "gfilenamefsystem/vm/traps.scm                " gnameg pop-cont-hookCh(]M$45M$ NL6CCgframe  #gfilenamefsystem/vm/traps.scm                   # gnameg abort-hookC}ah`]M$"4>"G44L5L>"G44L5L>"G4L5L6gframe  ]gfilenamefsystem/vm/traps.scm               "   /   8   ;   H   S   ]    ] ChH]N44L5L>"G44L5L>"G4L5L6gframe  Dgfilenamefsystem/vm/traps.scm                 "   /   :   D    D Ch_-/03#4545$"4>"G45$"4  >"G45$"4  >"G4 5H OOQQOO6Wgframe  greturn-handler  g abort-handler   gvm   gfp  g pop-cont-hook  g abort-hook  gfilenamefsystem/vm/traps.scm    & !   F   k          gvmS gnamegtrap-frame-finishC-Rash ]4M>"GNL6gframe  gfilenamefsystem/vm/traps.scm              gnameg abort-hookC-h ]4M>"GNL6gframe  gfilenamefsystem/vm/traps.scm              gnameg return-hookChH]M$"4L5$,4L>"G4LLOLL5NCCgframe  Fgfilenamefsystem/vm/traps.scm             +   B    F gnameg apply-hookC}hm]4L5L6egframe  gfilenamefsystem/vm/traps.scm           ChH]M$+4M>"GN4L>"G"N4L5L6gframe  Cgfilenamefsystem/vm/traps.scm              6   9   C    C Ch(-/03 ##45## 4545$"4>"G45$"4 >"G45$"4 >"G45$"4 >"GH O  O Q  Q  O O6gproc  $g enter-handler  $greturn-handler   $g abort-handler   $g current-frame   $gvm   $gclosure?   $g our-frame?   $g exit-trap  $g abort-hook $g apply-hook $ gfilenamefsystem/vm/traps.scm  #  9 9  - D   i         $    $  g current-frameS gvmS gclosure?S g our-frame?S gnamegtrap-in-dynamic-extentC.Rash]MNC|gframe  gfilenamefsystem/vm/traps.scm          gnameg trace-pushCh ]4LM>"GMNCgframe  gfilenamefsystem/vm/traps.scm              gnameg trace-popCh|]LM6tgframe  gfilenamefsystem/vm/traps.scm      gnameg trace-applyC.hH]44L5L>"G44L5L>"G4L5L6gframe  Agfilenamefsystem/vm/traps.scm                  ,   7   A    A gnamegenterChH]44L5L>"G44L5L>"G4L5L6gframe  Agfilenamefsystem/vm/traps.scm                  ,   7   A    A gnamegreturnChH]44L5L>"G44L5L>"G4L5L6gframe  Agfilenamefsystem/vm/traps.scm                  ,   7   A    A gnamegabortCh  -/03 ##45## 4545$"4>"G45$"4 >"G45$"4 >"G H O O  O QQ Q   O  O  O6 gproc  g apply-handler  greturn-handler   g current-frame   gvm   gclosure?   g our-frame?   g *call-depth*  g trace-push  g trace-pop g trace-apply  gfilenamefsystem/vm/traps.scm  #  ? 9  ( D   i             g current-frameS gvmS gclosure?S g our-frame?S gnamegtrap-calls-in-dynamic-extentC/Rash{]L6sgframe  gfilenamefsystem/vm/traps.scm        gnameg trace-nextC.h]4L5L6wgframe  gfilenamefsystem/vm/traps.scm           gnamegenterCh]4L5L6xgframe  gfilenamefsystem/vm/traps.scm           gnamegreturnCh]4L5L6wgframe  gfilenamefsystem/vm/traps.scm "          gnamegabortCh-/03##45## 4545$"4>"G45$"4 >"G OQ  O OO6 gproc  g next-handler  g current-frame   gvm   gclosure?   g our-frame?   g trace-next  gfilenamefsystem/vm/traps.scm  #  F 9  / D   i   %    g current-frameS gvmS gclosure?S g our-frame?S gnameg#trap-instructions-in-dynamic-extentC0Ras-h0]4M>"G4MM5NNLL6gframe  *gfilenamefsystem/vm/traps.scm ?   :   <   ;  " =  * A   * gnameg return-hookCh(]4M>"G4MM5NNCgframe  $gfilenamefsystem/vm/traps.scm D   :   <   ;  " =   $ gnameg abort-hookCh`]4M54L>"G45&CH4LLOLOL5KJMNCgframe  \gdepth \g finish-trap  . \gfilenamefsystem/vm/traps.scm 2   3  3  5  7  + 7  . 8 1 H  S G  X J  Z I   \ gnameg apply-hookChf]L6^gdisable  gfilenamefsystem/vm/traps.scm _   _ $   Ch n-.,3#L4L56fgframe gfilenamefsystem/vm/traps.scm [   \ ) \  ChH-.,3#4OM>"GN4L5LOCgframe Dgtrap 8 Dgfilenamefsystem/vm/traps.scm ^   _  / a # 1 a  2 b & 8 b  D Ch]LLOC|gtrap  gfilenamefsystem/vm/traps.scm Y    gnamegwith-pending-finish-disablersC(h-/03#4545$"4>"G45$"4>"G45$"4 >"GH O OQQ4  56gproc  g apply-handler  greturn-handler   gvm   gpending-finish-traps  g apply-hook  gwith-pending-finish-disablers  gfilenamefsystem/vm/traps.scm +  , , ! -  F .  k /  0  0  e  d    gvmS gnamegtrap-calls-to-procedureC1Rash]4L5$L6Cgframe  gfilenamefsystem/vm/traps.scm n   o o   p    gnameg next-hookC}hm]4L5L6egframe  gfilenamefsystem/vm/traps.scm t   u   u    Chm]4L5L6egframe  gfilenamefsystem/vm/traps.scm v   w   w    C h-/03#4545$"4>"G45$"4>"G OQ  O O6g frame-pred  ghandler  gvm   g next-hook  s gfilenamefsystem/vm/traps.scm i  j / ! k  F l  r    gvmS gnamegtrap-matching-instructionsC2RCgm  ,gfilenamefsystem/vm/traps.scm  8  V  k [ n P ~   ! !  #  $  ,  , = 2z @ 5 ^ 6= m ; w B*  I  R(  W-  _ + c i   c C6