GOOF----LE-8-2.0X]4h] gguile  gdefine-module*   glanguage g ecmascript gtokenize  gfilenameS f language/ecmascript/tokenize.scm gimportsS gice-9 grdelim    gsrfi gsrfi-1  gselectS g unfold-right   gsystem gbase glalr    gexportsS g next-token gmake-tokenizer !gmake-tokenizer/1 "g tokenize/1 # !" $gset-current-module %$ &$ 'gthrow (g syntax-error )gand=> *g"source-location->source-properties +g port-filename ,g port-line -g port-column .gcatch /. 0. 1gftell 2gsource-location 32 42 5gport-source-location 6g eof-object? 7g peek-char 8fEOF while reading a token 9gread-delimited :gpeek ;g read-until abcdef ?ABCDEF @g char-hex? Ag char->integer Bg digit->number Cg char-downcase Dg hex->number Eg read-char Fg lexical-token GF HF Ig/ Jgchar=? Kg read-line LfEOF while in multi-line comment Mg/= Ng read-regexp Og read-slash Pgstring Qgchar-alphabetic? Rg string-append Sgreverse Tg RegexpLiteral Uf(regexp literals may not contain newlines Vf Wg StringLiteral Xf(octal escape sequences are not supported Yfbad hex character escape Zg integer->char [gstring->number \f(string literals may not contain newlines ]g read-string ^fbreak _gbreak `^_ afelse bgelse cab dfnew egnew fde gfvar hgvar igh jfcase kgcase ljk mffinally ngfinally omn pfreturn qgreturn rpq sfvoid tgvoid ust vfcatch wv. xffor ygfor zxy {fswitch |gswitch }{| ~fwhile gwhile ~ fcontinue gcontinue  ffunction gfunction  fthis gthis  fwith gwith  fdefault gdefault  fif gif  fthrow ' fdelete gdelete  fin gin  ftry gtry  fdo gdo  f instanceof g instanceof  ftypeof gtypeof  fnull gnull  ftrue gtrue  ffalse gfalse  `cfiloruwz} g *keywords* fabstract gabstract  fenum genum  fint gint  fshort gshort  fboolean gboolean  fexport gexport Œ f interface g interface Ō fstatic gstatic Ȍ fbyte gbyte ˌ fextends gextends Ό flong glong ь fsuper gsuper Ԍ fchar gchar ׌ ffinal gfinal ڌ fnative gnative ݌ f synchronized g synchronized  fclass gclass ㌤ ffloat gfloat 挤 fpackage gpackage 錤 fthrows gthrows 쌤 fconst gconst  fgoto ggoto  fprivate gprivate  f transient g transient  fdebugger gdebugger  f implements g implements  f protected g protected  fvolatile gvolatile  fdouble gdouble   fimport  gimport      fpublic  gpublic      g*future-reserved-words* g list->string g assoc-ref f&word is reserved for the future, dude. gstring->symbol g Identifier gread-identifier ferror reading exponent: EOF g+ g- f!error reading exponent: non-digit e1.0 gexpt e0.0 f$bad digit reading hexadecimal number finvalid digit in octal sequence  g read-numeric !f{ "glbrace #!" $f} %grbrace &$% 'f( (glparen )'( *f) +grparen ,*+ -f[ .glbracket /-. 0f] 1grbracket 201 3f. 4gdot 534 6f; 7g semicolon 867 9f, :gcomma ;9: <= ?f> @g> A?@ Bf<= Cg<= DBC Ef>= Fg>= GEF Hf== Ig== JHI Kf!= Lg!= MKL Nf=== Og=== PNO Qf!== Rg!== SQR Tf+ UT Vf- WV Xf* Yg* ZXY [f% \g% ][\ ^f++ _g++ `^_ af-- bg-- cab df<< eg<< fde gf>> hg>> igh jf>>> kg>>> ljk mf& ng& omn pf| qgbor rpq sf^ tg^ ust vf! wg! xvw yf~ zg~ {yz |f&& }g&& ~|} f|| gor  f? g?  f: gcolon  f= g=  f+= g+=  f-= g-=  f*= g*=  f%= g%=  f<<= g<<=  f>>= g>>=  f>>>= g>>>=  f&= g&=  f|= gbor=  f^= g^=  #&),/258;>ADGJMPSUWZ]`cfilorux{~. g *punctuation* f/ I f/= M  g*div-punctuation* gassv-ref g string-ref g string-length g substring f!bad syntax: character not allowed gread-punctuation g*eoi* gNumericLiteral funexpected right parenthesis gsrfi-9  gthrow-bad-struct   glexical-token-source glexical-token-category funexpected right bracket funexpected right brace greverse!C5h:]4    #54&>"G'()*h -13456gwhat gloc gform  gargs  gfilenamef language/ecmascript/tokenize.scm        gnameg syntax-errorC(R+,-01h[]L6Sgfilenamef language/ecmascript/tokenize.scm #   # ,   Chh-13C`gargs gfilenamef language/ecmascript/tokenize.scm #  C4h@]!4545454O5Cgport  =ginput & =gline  & =gcolumn  & =goffset  & =gfilenamef language/ecmascript/tokenize.scm    !   "   #  &   = gnamegport-source-locationC5R67(89:hH4] 4455$ 6454455$ 6C,gdelims  Egport  Egloc   Egtoken  & Egfilenamef language/ecmascript/tokenize.scm '  (   (   (   (   )   )   *  $ * / & *  & *  ) + , +  4 + 8 +  < ,  B ,   E gnameg read-untilC;R6<=>?h@] 45$C45$C45$C6gc  =gt  =gt * =gfilenamef language/ecmascript/tokenize.scm /  0 0   1  1  " 2 * 1  = 3   = gnameg char-hex?C@RAh]45 0Cgc  gfilenamef language/ecmascript/tokenize.scm 5  6  6  6   gnameg digit->numberCBR<BACh(]45$6 4455 aCgc  &gfilenamef language/ecmascript/tokenize.scm 8  9  9   :   ;   ;  ! ;  # ; 1 $ ; % ;   & gnameg hex->numberCDRE76HIJK(LMN h0%]4>"G4545$ C4/5$4>"G64*5$4>"G"c45$   64*5$545/$4>"G645"45"45"$1=$4>"G CC 6gport  ,gloc  ,gdiv?   ,gc1   ,gc  } gfilenamef language/ecmascript/tokenize.scm =  ?   @   >   B  ( A  , D  2 D  4 E  @ A  A F  Z G  [ H  g A  h I  } J  ~ L K  M  M N K  O  O  O Q  R  S  S  U  U J  J  J  A  W  X   X 4  X  Y " # Y  , [ +  , gnameg read-slashCORP7JE6Q<RSHT;(UVhx%]B4/\  5"G454/5$4>"G"45$"T45  $ ";45  $ "#4$5  $ " 4_5   $454 5  C4>"G45"L45"<4\5$@4>"G454 544\55" 64 5"gport  qgloc  qgterms   qgstr   \ghead   \g terminator   \gc  A gflags  A gt  H gt \ gt q gt gvalue  gechar  + Rgfilenamef language/ecmascript/tokenize.scm ]  _   _   `   a   a   c + b  , d A f B g  H g  V h  \ h  k i  q h  j  h  k  h  g m * n * m $ l  l $ l  o  p  p , p  f f  f /  f  q  b   r % s  + s . t  9 u  @ u ( J u  R t V w  \ w \ `  ] `  i ` 5 q ` 4  q gnameg read-regexpCNREP7JHW6<(XY@ZD[R;\hX5]J454\  5"(4545$4>"GC4\5$4>"G45'$""$"\$"sb$"df$ "Un$ "Fr$ "7t$ "(v$ "0$<4545$"45$4  5""x$s4545"4  455"=4 5$.4 5$4 45455"""""Xu$M454545 45 4 44  5 55  "445455" 645"-gport  Wgloc  Wgc  Wgterms   Wgstr   Fg terminator  % Fgc  x gnext   @ga  T gb  ] ga   gb   gc   gd   gechar   <gfilenamef language/ecmascript/tokenize.scm z  { {  |   |      %  ( 4 5 J Q S _ ` r ~  x ~          #  -  .  2  7  M  N  T W  ] d  h  k > u  y  z     $      )  #  :                       .        # % * ! 6  <  @  F F  G  W J  W gnameg read-stringC]RRR6Q<JSH(E7h]*"45$"T45$";45$"#4$5$" 4_5$V445545$  C4 5$   64 5 C4>"G45"45"xgport  gloc  gc   gchars   gt  qgt  ! mgt  6 jgt  M ggword  gt  gvalue   gfilenamef language/ecmascript/tokenize.scm       !  0  6  E  M  \  n u  v  y "       *  *    $    '  %   gnamegread-identifierCRJ7E6B<(@Dh/]:445.5$0"454545$6"?"*45$C45$.4>"G45 45"4e5$" 4E5$4>"G4545$45"f4+5$4>"G "A4-5$4>"G "45$ " 4 5"k45$"45$24>"G454 455" $  "4 5C45 "4.5$4>"G"d45$"45$:4>"G45454 5""45 "C45"405$Y4x5$" 4X5$4>"G4545$"4>"G"<45$.4>"G45 45"C "45$"45$C45$n485$" 495$4>"G"4>"G45 45"yC "k"["W'gport  gloc  gc0  ! gc1  * gc1  E ogacc  E ogt  gc  Ogadd  O gc  U ge  U gc   Wgdec   Wgn   Wgt   gc   >gc   3gacc   3gc  M gacc  M gt  o gfilenamef language/ecmascript/tokenize.scm                !   $  *   -   7   =   E "  F $ P #  T % ^ #  _ & q '  | (  } (  (  ' )  ) )  #  * +  +  ,  ,  -  - , -  /  ,  / -  0   ,   0 - 1 1  ; ,  B 3  F 3 , L 3  O + U 5 V 6  ` 6  f 6 0 p 6  q 7   8   8 *  8 /  8 8  8 *  8   :   :   : 1  : *  : ;  :   5  5   5  ;  #   <  =  >   >   > .  >  ?  ! @  * A " 1 A 4 : A  ; A  > B  H @  O E  W E  W = X =  ` = . l = o "  r "   "                  /                                           !  # (   0   3   ?   I   M   N   X   \   f   g   o   }  &         !                          gnameg read-numericC RRRh] (C44 55$D45 $ "4L4 55"4 5"gnodes  gpuncs  gt   gfilenamef language/ecmascript/tokenize.scm          ,   8   ,       %  ( *  7 -  ( /  % 3  ! 8  9 :  % A  / F  3 G  7 L  B P  7 S  9 U  3 Z  / [  % `  + h  ! i  , n  8 r  , v  & y   !  gnameglpCOQ4i5E7H(hpF]""U45$)4>"G45"$ C645L">gport  ogloc  ogc   [gtree   [g candidate   [gt   [gfilenamef language/ecmascript/tokenize.scm              *   3  $ 6  4 @   F   P  U   [  [   \   o    o COR75EO]6QJ< HhP]"4545 $"/ $"! $" $"$4>"G6 $" $4>"G6/$ 6"$"'$645$C4 5$""4 $5$" 4 _5$ 64 5$4 5C6gport  Ogdiv?  Ogc   Ogloc   Ogt  gt  gvalue  9 Ggfilenamef language/ecmascript/tokenize.scm           V   o   x                            %  &  0   1  1 9  ?   F  O    O gnameg next-tokenCRHWhX]4LM5$:&, &"&"""NCgtok Tgcat ! Egfilenamef language/ecmascript/tokenize.scm                 !  # !   '  ' +   ,   4  ' 8   9   A  ' B   Q    T Ch] HOCgport  gdiv?  gfilenamef language/ecmascript/tokenize.scm       gnamegmake-tokenizerC RH(+(.1"%7Whh]M$C4LM5$& ""$ MN"$}"14& " 4 5>"KG"DM$9M& " 4 5& MN"""""F $ MN"2 $}"14 & " 4 5>"KG"DM$9M& " 4 5 & MN"""""$ MN"$}"14& " 4 5>"KG"DM$9M& " 4 5& MN"""""$ MN"$:&, &"&"""NCgtok  bgkey 6 gs  gs  . Mgs   gcat / Sgfilenamef language/ecmascript/tokenize.scm                   *  + 6  F   H   U  Z   ^  ! a  ! ~          5    B                !  !    $   '   +   .  5 .   O  B S   V   X   u  z   |          !   !               5      B                     "   %   /  ' /   5  + 9   :  " B  + F   G  " O  + P  " _  N  b Ch ]HHHOCgport  gdiv?  geoi?   gstack   gfilenamef language/ecmascript/tokenize.scm          gnamegmake-tokenizer/1C!R h8#]45" 45&6""gport  6gnext 6gout   /gtok   /gfilenamef language/ecmascript/tokenize.scm                      $  )   /  /   0   6    6 gnamegtokenizeCR!h8%]45" 45&6""gport  6gnext 6gout   /gtok   /gfilenamef language/ecmascript/tokenize.scm                      $  )   /  /   0   6    6 gnameg tokenize/1C"RCgm  ,glp ( (g punc-tree ( *gfilenamef language/ecmascript/tokenize.scm   9    ' ' O /  5  8 = ` ] ( z *  - 0  4  &S  &V J  &Z I &] z  &a y (   (  # (   (   * ~ .S  0  7  9^  :    : C6