GOOF----LE-8-2.0l];4hÁ] gguile¤ ¤ gdefine-module*¤ ¤ ¤ gsxml¤ g transform¤ ¤ gfilenameS¤ fsxml/transform.scm¤ gexportsS¤ gSRV:send-reply¤ gfoldts¤ g post-order¤ gpre-post-order¤ g replace-range¤   ¤ gset-current-module¤ ¤ ¤ gmake-syntax-transformer¤ ¤ ¤ g let*-values¤ gmacro¤ g $sc-dispatch¤ ¤ ¤ g_¤ gany¤ Œ¤ g syntax->datum¤ ! ¤ " ¤ #g datum->syntax¤ $#¤ %#¤ &gbegin¤ 'glet¤ (gcall-with-values¤ )glambda¤ *gsyntax-violation¤ +*¤ ,*¤ -f-source expression failed to match any pattern¤ .g procedure?¤ /gdisplay¤ 0gassq¤ 1g *default*¤ 2g*text*¤ 3g *preorder*¤ 4g*macro*¤ 5gappend¤ 6gmap¤ 7gerror¤ 8fUnknown binding for ¤ 9f and no default¤ :greverse¤C5hÈ‚]4   54>"G4"%&'()hXó] LŽLŒŒˆ$1Ž(CCCëgvars  Wg initializer  Wgcont  Wgfilenamefsxml/transform.scmŒ V ŒŒ  X ŒŒ  Y ŒŒ Y ŒŒ X ŒŒ W ŒŒ  [ ŒŒ  Z ŒŒ  ] ŒŒ  Z ŒŒ  ^ ŒŒ ^ ŒŒ % ^ ŒŒ 0 ` ŒŒ G \ ŒŒ  W Ch(–-13(ŒCO@Žgbindings #gbody #gfilenamefsxml/transform.scmŒ S ŒŒ  T ŒŒ  T ŒŒ  T ŒŒ ! b ŒŒ # U ŒŒ # Chf] 45L4?6^gargs  gv gfilenamefsxml/transform.scmŒ  S ŒŒ   C,-h(d] 45$ O@6\gy  'gtmp 'gfilenamefsxml/transform.scmŒ S ŒŒ  ' C5R./h°¥](C$( Ž"ÿÿÜ& Ž"ÿÿȈ$Ž4L5"ÿÿ«45$4>"GŽ"ÿÿ‚4>"GŽ"ÿÿcŽ"ÿÿVg fragments  ¬gresult  ¬gfilenamefsxml/transform.scmŒ n ŒŒ  o ŒŒ  q ŒŒ  o ŒŒ  r ŒŒ  o ŒŒ  r %ŒŒ & r ŒŒ * s ŒŒ . o ŒŒ 1 s &ŒŒ : s ŒŒ = t ŒŒ > t ŒŒ B o ŒŒ E u ŒŒ F u ŒŒ K u $ŒŒ O u ŒŒ W u ŒŒ X v ŒŒ ] v ŒŒ _ v ŒŒ c o ŒŒ d w ŒŒ g w ŒŒ l w ŒŒ w x ŒŒ € x ŒŒ z ŒŒ † z ŒŒ ‹ z ŒŒ – { ŒŒ Ÿ { ŒŒ ¢ q #ŒŒ ¬ q ŒŒ%  ¬ gnamegloopŒCh µ-13OQ6­g fragments gloop  gfilenamefsxml/transform.scmŒ d ŒŒ  n ŒŒ  gnamegSRV:send-replyŒg documentationf Output the @var{fragments} to the current output port. The fragments are a list of strings, characters, numbers, thunks, @code{#f}, @code{#t} -- and other fragments. The function traverses the tree depth-first, writes out strings and characters, executes thunks, and ignores @code{#f} and @code{'()}. The function returns @code{#t} if anything was written at all; otherwise the result is @code{#f} If @code{#t} occurs among the fragments, it is not written out but causes the result of @code{SRV:send-reply} to be @code{#t}.ŒC R012.034567892 hÐ](Cˆ$¢Š$’4L5$"L$_Žˆ$FŽ&ŽŽ@Ž&4ŽŽ?"ÿÿŽŽ4Ž4ŽL55@Ž4LŽ5@ 6L6L$L 6  6ˆgtree  Ëgtrigger  «gt  ' :gbinding  : «gfilenamefsxml/transform.scmŒ ˜ ŒŒ  ™ ŒŒ š ŒŒ › ŒŒ  ™ ŒŒ  Ÿ ŒŒ  Ÿ ŒŒ  ™ ŒŒ  ¡ ŒŒ  ¡ ŒŒ  ¢ ŒŒ ' ¢ ŒŒ : ¡ ŒŒ B £ ŒŒ E ¦ ŒŒ F ¦ ŒŒ J £ ŒŒ L ¨ ŒŒ O ¨ ŒŒ T £ ŒŒ W © ŒŒ \ © ŒŒ ^ ª ŒŒ a ª ŒŒ f £ ŒŒ g « ŒŒ j « ŒŒ o « ŒŒ u « ŒŒ x ­ ŒŒ | ® ŒŒ ® "ŒŒ ‚ ® -ŒŒ ‡ ® 5ŒŒ Œ ® -ŒŒ Ž ® ŒŒ ­ ŒŒ “ § ŒŒ – § -ŒŒ § 7ŒŒ Ÿ § -ŒŒ ¡ § ŒŒ ¥ ¥ ŒŒ © ¥ 6ŒŒ « ¥ ŒŒ ³ Ÿ $ŒŒ ¹ ŒŒ ½ œ ŒŒ Á ŒŒ Å ž ŒŒ Ç œ ŒŒ É ž 4ŒŒ Ë ž ŒŒ6  Ë gnamegloopŒChp]"4545$"$4Ž5$Ž"ŽŽ"OQ6•gtree  kgbindings  kgdefault-binding  kgt   )g text-binding  ) kg text-handler  M kgloop  Z kgfilenamefsxml/transform.scmŒ ‘ ŒŒ  ’ ŒŒ  ’ ŒŒ ’ ŒŒ ’ ŒŒ  “ ŒŒ  “ !ŒŒ  “ ŒŒ  “ ŒŒ ) ’ ŒŒ 1 • ŒŒ 2 – ŒŒ 7 – ŒŒ 9 – ŒŒ = – ŒŒ @ — ŒŒ G — $ŒŒ M ’ ŒŒ Z ˜ ŒŒ  k gnamegpre-post-orderŒCRiR h`l](Cˆ$C"+( 645Ž"ÿÿÕ45Ž"ÿÿÁ6dgfdown  ]gfup  ]gfhere   ]gseed   ]gtree   ]gkid-seed   Agkids   Agfilenamefsxml/transform.scmŒ Å ŒŒ  Æ ŒŒ  È ŒŒ  Æ ŒŒ  Ë ŒŒ  Ì ŒŒ & Í ŒŒ ' Î ŒŒ 4 Î 1ŒŒ 6 Î ŒŒ 9 Ï ŒŒ A Î ŒŒ A Ë ŒŒ B Ë ŒŒ M Ë 2ŒŒ U Ë ŒŒ ] É ŒŒ  ] gnamegfoldtsŒC R:5hP†]+( 45D$‘4L5$Ž4455"ÿÿ¹ˆ$KŠ4L$Ž"> GŽ$ Œ"Œ"ÿÿgŽŒ"ÿÿS4L5$4Ž5"ÿÿ-ˆ$cŠ4L$Ž"> GŽ$"ˆ$$ Œ"Œ""ÿþÃŽ"ÿþ²~gforest  Pgkeep?  Pg new-forest   Pgnode   Pgt  % ¯gnode?  T ›gnew-kids  p ›gkeep?  p ›gt  ¶ Pgnode?  à ?gnew-kids  ü ?gkeep?  ü ? gfilenamefsxml/transform.scmŒ ü ŒŒ  ý ŒŒ ý ŒŒ  ý ŒŒ  þ ŒŒ  þ ŒŒ  ÿ ŒŒ   ŒŒ %  ŒŒ 0  ŒŒ 2  ŒŒ 5  ŒŒ ?  ŒŒ I  ŒŒ L  ŒŒ P  ŒŒ S  $ŒŒ T  ŒŒ T  ŒŒ W  ŒŒ _  ŒŒ b  #ŒŒ j  7ŒŒ o  ŒŒ z  ŒŒ ‚  ŒŒ …  (ŒŒ ˆ  "ŒŒ ‘  ŒŒ ›  ŒŒ ž  ŒŒ ¥  )ŒŒ ¯  ŒŒ °  ŒŒ ¶  ŒŒ ¿  ŒŒ Æ  .ŒŒ È  ŒŒ Õ  ŒŒ Ø  ŒŒ Ü  ŒŒ ß  $ŒŒ à  ŒŒ à  ŒŒ ã  ŒŒ ë  ŒŒ î  #ŒŒ ö  7ŒŒ û  ŒŒ   ŒŒ   ŒŒ   %ŒŒ   ŒŒ   ŒŒ #  ,ŒŒ &  &ŒŒ /  ŒŒ ?  ŒŒ B  ŒŒ P  ŒŒ=  P gnamegloopŒCh0]OQ4> GCùgbeg-pred  ,gend-pred  ,gforest   ,gloop  ,g new-forest  " ,gkeep?  " ,gfilenamefsxml/transform.scmŒ 𠌌  % $ŒŒ  % 4ŒŒ ! % $ŒŒ % % ŒŒ  , gnameg replace-rangeŒCRCzgm  (gfilenamefsxml/transform.scmŒ  H ŒŒ ø d ŒŒ ¨ ‘ ŒŒ ¯ ¶ ŒŒ  Å ŒŒ Ä ð ŒŒ  Æ C6