GOOF----LE-8-2.0)]n4h] gguile  gdefine-module*   gice-9 gscm-style-repl  gfilenameS fice-9/scm-style-repl.scm gimportsS g save-stack      gexportsS gscm-repl-silent gscm-repl-print-unspecified gscm-repl-verbose gscm-repl-prompt  g replacementsS gassert-repl-silence gassert-repl-print-unspecified gassert-repl-verbosity gdefault-pre-unwind-handler g bad-throw gerror-catching-loop gerror-catching-repl ghandle-system-error   gset-current-module !  "  #fguile>  $gsymbol-property %gthrow-handler-default &gerror 'funhandled-exception: (gthrow )ghas-shown-debugger-hint? *gcatch +gcall-with-unblocked-asyncs ,gquit -g switch-repl .gabort /grun-hook 0g abort-hook 1g force-output 2gcurrent-output-port 3gdisplay 4fABORT:  5gcurrent-error-port 6gwrite 7gnewline 8gmemq 9g backtrace :gdebug-options-interface ;gstack? gprimitive-exit ?g stack-saved? @glength Agrestore-signals Bgensure-batch-mode! Cg batch-mode? Dgcall-with-blocked-asyncs Egfor-each Ff;;;  Gginexact->exact Hgget-internal-run-time Iginternal-time-units-per-second Jf msec ( Kg gc-run-time Lf msec in gc)  Mgstring? Ngthunk? Of>  Pf Qg repl-reader Rg eof-object? Sgafter-read-hook Tf;;; EOF -- quitting Ugbefore-print-hook Vg unspecified? Wgafter-print-hook Xf ;;; QUIT executed, repl exitting Yg peek-char Zgchar=? [g read-char \gbefore-eval-hook ]g %start-stack ^] _] `g repl-stack agprimitive-eval bgafter-eval-hook cgwrong-type-arg dg out-of-range eglist-ref fgbefore-backtrace-hook gf Backtrace:  hgdisplay-backtrace igafter-backtrace-hook jgbefore-error-hook kgapply lg display-error mgafter-error-hookC5hP]4   5 4">"GRh] Czgv  gfilenamefice-9/scm-style-repl.scm '  '    gnamegassert-repl-silenceCRRh] Cgv  gfilenamefice-9/scm-style-repl.scm *  * *   gnamegassert-repl-print-unspecifiedCRRh] C|gv  gfilenamefice-9/scm-style-repl.scm -  - "   gnamegassert-repl-verbosityCR#R$%&'h@-1345$ 4?"$C@gkey =gargs =gdefault   =gt  ( =gfilenamefice-9/scm-style-repl.scm 9 :   : &  :   :   ;   ;  ( ;  7 <  = <  = gnameg bad-throwCR (h(-134 >"G@gkey #gargs #gfilenamefice-9/scm-style-repl.scm @ B  # C  # gnamegdefault-pre-unwind-handlerCR)R*+h8]4M>"GN" 4L5"4L5"Cgv  $gfilenamefice-9/scm-style-repl.scm R   S   Y   Z   [ ! $ [  $ Z  % Z ' / Z   1 ChS]LLO6Kgfilenamefice-9/scm-style-repl.scm P   Q    C,-(./01234567)89:;<=>?h]4>"G445>"G445>"G4L45>"G4 45>"GM$x $"4  4 55$"4[5$34 45>"G445>"G "445>"G"4 >"G Cygfilenamefice-9/scm-style-repl.scm k   l   m   m ) ! m  * n  . n $ / n / 8 n  A o  F o ' O o  X p  [ p $ d p  r q  x s % ~ u + u 1 v 1 u + s % w & s ! y ' y 0 y ' z ' { ( | ( z ' } ' ~ ! ~ / ~ ! ! &   C@h y]4L5 $LL@LL@qgfilenamefice-9/scm-style-repl.scm   % "    " "  ChH-13$NC$@$ LOCOCgkey Fgargs Fgfilenamefice-9/scm-style-repl.scm ^   _   a  ! _  % e & ) e  2 _  F Ch8] H4LOLLO5$H"MCgfirst  3gnext 3gfilenamefice-9/scm-style-repl.scm L   N M  (  0   3 gnamegloopCAh}]N6ugfilenamefice-9/scm-style-repl.scm      gnamegensure-batch-mode!CBhm]MCegfilenamefice-9/scm-style-repl.scm   !   gnameg batch-mode?CCDhL]CDgfilenamefice-9/scm-style-repl.scm    ChU]L6Mgfilenamefice-9/scm-style-repl.scm      Ch@]HHOQO O O6gthunk  ;gstatus  ;g interactive   ;gloop   ;gfilenamefice-9/scm-style-repl.scm I  J  '  0  ;   ; gnamegerror-catching-loopCREh ]4L4L5> GL6g the-values  gfilenamefice-9/scm-style-repl.scm   "  %  "       Ch]O6gr  ge  gp   gfilenamefice-9/scm-style-repl.scm     gnamegerror-catching-replCR3FGHIJKL hx<]4>"G44 45M5>"G4>"G44 45M5>"G64gfilenamefice-9/scm-style-repl.scm     #     #  2 % / ( , ) $ + # 0  9  = # B  K  N $ T 3 [ 0 ^ - _ % a $ f  r # t   t gnameg repl-reportCMNOPQR/SKH73T,h]45$""45$ 45"$"4545$"4L>"G4 >"G45$_4 5N4 5N $64 >"G4>"G4 >"G"4 >"G"Cgprompt 5 Agval A gfilenamefice-9/scm-style-repl.scm   0 )  0  )  0 - ) / @ 5 5 5  8  A  D  N  S  c  u    9 ' 6 '  " " + " "   gnameg-readC/UV67W1 h] $C4>"G$"45$&4>"G4>"G"4>"G $4L>"G" 6gresult  gt 8gfilenamefice-9/scm-style-repl.scm     , . 5 5 0 < ( = . O . c  |  } !   C3X7YRZ[hh]4545$C4 5$" 4 5$4>"G"4 5$6Cgch  hgt  hgt $ =gfilenamefice-9/scm-style-repl.scm          $  2 * A  B  U  V  b  f   h gnamegconsume-trailing-whitespaceCKH/\_`ahU]L6Mgfilenamefice-9/scm-style-repl.scm   ,   Cb hP] 45N45N4>"G4O54>"GCgsourc  Kgval 2 Kgfilenamefice-9/scm-style-repl.scm   9 ' 6  '   %  ) , 2  2  5   K gnameg-evalC h]@HHOOO"?$64>"G4>"G4>"G"COQQQQKK4  O5"og start-gc-rt  gstart-rt  gargs  ' fg repl-report  n g-read  n g-print  n gconsume-trailing-whitespace  n g start-gc-rt  gstart-rt  gstatus   gfilenamefice-9/scm-style-repl.scm   '  -  .  2 # 7  @  P  n         gnamegscm-style-replCR5;<89:cde/f73ghijklm1(.h0-13454[5$"4455$&"$ 4  5"4  >"G4 >"G4 >"G4[>"G4 >"G4 >"G"4 >"G4[>"G4 >"G4>"G6gkey /gargs /gcep   /gt   g highlights  Y gfilenamefice-9/scm-style-repl.scm              &  *   +   1  5   9  . =  ! >  % F  . G  % K   L  ! Y  ! Y  \  n                   +  /  # / gnameghandle-system-errorCRCgm  0gfilenamefice-9/scm-style-repl.scm   4 & ' )  *  , ' - ) /  , / | 9 a @ e G : I   N    P C6