ELF@X @8@!!X X  pp@ ; ?T ?; ?T ?;@T#@;s@T@T~@|@@qUu@GP 0@p`' 0 T {@|  j@x@qU r@G ' - >U r@T z@4 ); x@H  T ?4 ); u@H  T ?4 ); r@H  T ?4 ); o@H  T ?4 ); l@H  T ?4 ); i@H  T r@4 ); p@H  T ?4 ); m@H  'p@ |}''e@  'm@|'}$TX@| T @T[@4oUM@GB@>EL<LHH 0@'@'P@'B@  GG 0';@ @0 '7@ |4}1T,@| T?T>4oU!@GBP>EL<#LH H H '   p`'    '   '? 0GGG 0P@'? @0 '?| 7} 4' T ?|  T Z?T |>4 oU ?G B P>EL <L H H H  p'  p' '? 0GGG 0P@'?  | "| } G #p' G ; ?p `  `'& ?# #  '? | E} B# '    BP>EL<5LH H H ; >0p'   T m?|  T >Tp?4 oU b?G '  '#    '^? #;>GGG@P `0p'j? `T K?|  T >TN?4 oU @?G p'p |  | } G '& =? `'M? B 0>EL <,L H B H H; 4?;6?  pP`' K | }G  p'&>q?  T #?# j?'|}GT>| T>T>4oU>G' | |}G&>|GT>' |  | } G & >; >G'  | |}G&>| `' GT>' |  | } G & }> | GT>' |  | } G & c>GT>' |  | } G & M>;>' GTn>' |  | } G & ->; [>GT>' |  | } G & >B @>EL <L H H  | T =|  T '=T=4 oU =G ' G G G' | |}G&=G | M| H} EG | 4} 1G T/>~p,T =|  T <T=4 oU =G G ' B H H  G| } G  '&=B HH    '& Q=B H H    '' ;=     '&.== %== '= G|} G#G0@'&== 0T=| T^<T=4oU=G0'`P'= @T=| TC<T=4oU=G@' Pp`'   B HH     '= pT <|  T <T<4 oU <G T=' |  | } G & <;<'   B H H      '~= V:;:1U:U:V:;:1U:U:V::V:;:1U:T:1U:V:V:;:1U:T:1U:V:;:1U:U:V:;:1U:U:V::V::V::V:;:1U:T:1U:V:;:1U:U6;V:|;:1U:U';V:w;:1U:U;V:r;:1U:U ;V:o;:1U:U:V:l;:1U:U:V::V::V::V::V::V:Z;:1U:T:1U:V:S;:1U:U:V:NV:SV;Z;:1U;V;V;V;V;oV ;V ;V ;E;;1U ;V ;TV ;|V";>;;1U!;VU;;;P;1UT;U;Ud;VR;6Va;M;VT;6;O;U;UY;Vc;?;^;1Ub;Vr;<;m;1Uq;Vs;9Vz;n;V;NV;{V;3;;1U;V;0;;1U;V;V;,;;1U;V;);;1U;V;(;;1U;V;V;$;;1U;V;!;;1U;V;V;;;1U;U;V;V;;V;;;1U;V;;;1U;'sxml'fold'filename' sxml/fold.scm'imports'srfi'srfi-1'exports'foldt'foldts'foldts*' fold-values'foldts*-values' fold-layout' declarative?'guile'define-module*'set-current-module'atom?'assq-ref'map'wrong-type-arg'car'6Wrong type argument in position 1 (expecting pair): ~S'append'assq'cdr'macro' *default*'pre'bindings' pre-layout'post'@' misc-error'no binding available ~S'reverse'*text*4X@X   $    x  , P  l"%|(`+-. 135*(" "   * ((" **"*"`7`7`7`7X H`7p    EEEEEEEEXX@lL,D$ L4dLT<6TXEE E EE< 0L4P8Pd $  ((GX  <*pp7< pEXnM@Uk z`! xH V8PzF@+X @-D/Dl;l0H  0dwd    PAP U X}X\  \ , , ]^88 d? d`   ' - 3 : B N ] fr $,4 <(D0L8P@XHtH|HHvrr (8x|   x|   ,@H PX\` l*x* x|    (x|     ,(@(H0P(X(\(`0l:x:P   x|    (x|     P P@X(l(t0|(((0::     <@ lpxx|  (0d dPh0t::0@ $((0, r   (0 8@D8`     (2(24(80<8LT@08                      ( 008 (D@LH`HhPpHxH|h@@hp00hPPhp00hp0hp0h(hp00hp80(08BB00@00h0h  0 @ H   @    `           48<     (08@D0\     ( 0 8 @ H P X(08@Dp`pX      ( 0(088@DPLXdPXDldllP "\ R3< D,(T4L0|xD 0 D(84L@ XC LD X t^b` lptLH%.. . .Guile 3.0.7atom?foldtfoldtsfoldts*fold-valuesfoldts*-valuesassq-reffold-layoutfdownerrcont-with-tagfupfhereB5 sxml/fold.scmice-9/boot-9.scm ;,a,,,b,,,b,$,;bJz w ww ww{<h q :ZZs h gjig h dmi]">w# ;"*_KY;(<+ /wJB,7&; m,,J w w7 ;2 ,h  w'o;   ,h% ; ,h)   ,h+ % ,h  ,hd<0y  ,w; >w)h$ K'w=C x./T; { +' : , X,Z",aw*iw*,!< hJ*?) w. ; ; ~,h . ;DD(l04 d0 D0 DP( LXX7@\ L, tRV`8ldhd`atom?foldtfoldtsfoldts*fold-valuesfoldts*-valuesassq-reffold-layoutfdownerrcont-with-tagfupfhereclosureargcachevarproctmpmoduleatom?foldtfoldtsfoldts*fold-valuesfoldts*-valuesassq-reffold-layoutvalxfupfheretreecachedmodnameboxtagcodekidfdownseedkseedlistseedsprimkseedsalistkeydefaultbindingsparamslayoutstylesheetpairpcontrettag-bindingstnew-bindingsnew-layoutcontstyle-paramsbargsold-layoutkidskbindingskcontkparamsklayoutkrettlayouttretThe standard multithreaded tree fold. @var{fup} is of type [a] -> a. @var{fhere} is of type object -> a. The single-threaded tree fold originally defined in SSAX. @xref{sxml ssax,,(sxml ssax)}, for more information.A variant of @ref{sxml fold foldts,,foldts} that allows pre-order tree rewrites. Originally defined in Andy Wingo's 2007 paper, @emph{Applications of fold to XML transformation}.A variant of @ref{SRFI-1 Fold and Map, fold} that allows multi-valued seeds. Note that the order of the arguments differs from that of @code{fold}.A variant of @ref{sxml fold foldts*,,foldts*} that allows multi-valued seeds. Originally defined in Andy Wingo's 2007 paper, @emph{Applications of fold to XML transformation}.A traversal combinator in the spirit of SSAX's @ref{sxml transform pre-post-order,,pre-post-order}. @code{fold-layout} was originally presented in Andy Wingo's 2007 paper, @emph{Applications of fold to XML transformation}. @example bindings := (...) binding := ( ...) | (*default* . ) | (*text* . ) tag := handler-pair := (pre-layout . ) | (post . ) | (bindings . ) | (pre . ) | (macro . ) @end example @table @var @item pre-layout-handler A function of three arguments: @table @var @item kids the kids of the current node, before traversal @item params the params of the current node @item layout the layout coming into this node @end table @var{pre-layout-handler} is expected to use this information to return a layout to pass to the kids. The default implementation returns the layout given in the arguments. @item post-handler A function of five arguments: @table @var @item tag the current tag being processed @item params the params of the current node @item layout the layout coming into the current node, before any kids were processed @item klayout the layout after processing all of the children @item kids the already-processed child nodes @end table @var{post-handler} should return two values, the layout to pass to the next node and the final tree. @item text-handler @var{text-handler} is a function of three arguments: @table @var @item text the string @item params the current params @item layout the current layout @end table @var{text-handler} should return two values, the layout to pass to the next node and the value to which the string should transform. @end table .guile.procprops.rodata.data.rtl-text.guile.frame-maps.dynamic.strtab.symtab.guile.arities.strtab.guile.arities.guile.docstrs.strtab.guile.docstrs.debug_info.debug_abbrev.debug_str.debug_loc.debug_line.shstrtab