ELF@P4@8@wwP4P40w0w0wpp.B ; ?T ?; ?T @;@T@;mATyATxA|AAqUoAGP 0@p`' 0 T uA|  dArAqU lAG ' - >T tA4 ); rAH  T _@4 )T wATwA|DAtAqUnAG;uA' H  T vA4 ); tAH  T E@4 );qA'` - >U iAH  T <@4 ); dAH  T ?@4 ); aAH  T B@4 ); ^AH  T E@4 ); [AH  T H@4 ); XAH  T K@4 ); UAH  T N@4 ); RAH  T Q@4 ); OAH  T T@4 ); LAH  T a@4 ); IAH  T P@4 ); FAH  T ]@4 ); CAH  T `@4 ); @AH  T IA4 ); GAH  T \@4 ); DAH  'YA PVA'| $|} GGpP'` T4A;?;2AB HHB HHB HH$PP'A ; LATNA|q@KAqUEAGp'` | \;KAp'` | ?TAp'P | B0>EL<HLH#`p'p |;"A `' ;AT$A|#@!AqUAG` P'B0>EL<8LH#p `'#; Ap `' A  TAG ' A|?AqU@G'A ;A'A 0T>;ATAG@'A|?@qUAG'QE  ;JEB HHB HHB HHB HH@'AE P>E'| )|}G G`P'   T '@;>;%@B HHB HHB HH$ ` `P'!E ; ET@@|c?=@qU7@Gp'` | \;=@p'` | ?T@p'P | B0>EL<HLH#`p'p |;D `' ;@T@|?@qU @G` P'B0>EL<*LH#p `'#;Dp `'D  T?G 'E ;E'E 0T=;@T@G@'}G  ;vGB HHB HHB HHB HHB HHP'vG pTgG| T>TjG4oU\GGp'P |G5p'` |'`''nG PTGG| T>TJG4oUTHG4oU:GGB0>EL<LHT:G| T>T=G4oU/GG0@P'@'?G pT0G| T>T3G4oU%GGG '  p `'AG `T"G| Ta>T%G4oUGGTF| TS>TF4oUFGTG| TE>TG4oUGG;GP`'@'G T G| T(>TG4oUGG 'G `TF| T>TF4oUFGTF| T>TF4oUFGTF| T=TF4oUFG;FP`'@'F TF| T=TF4oU}FG0'F 0TSF| T=TVF4oUHFGTQF| T=TTF4oUFFG;F 0'F  TF| T=TF4oUFGB0>EL<LH'F  TF| T}=TF4oUFGG@ 0'F PTE| Tb=TE4oUEGTcF| TT=TfF4oUXFGB0>EL<LHTE| T==TE4oUEG0@P'@']F `TE| T!=TE4oUEGGp'p P@`p@'BF PTE| T=TE4oUzEGTF| T<TF4oUEGB0>EL<LHTxE| T<T{E4oUmEG0@P'@'F pTnE| T<TqE4oUcEGTE| T<TE4oUEGG P'p ` PpP'E1B0>EL<\LHTQE| T<TTE4oUFEG~ BP>EL<zLHHH#0`P '0'  B0>EL<pLHT!E| TT<T$E4oUEG~B`>EL<LHHHH#0`P'0 'E  TD| T)<TD4oUDG~BP>EL<LGHHH#0@0' 'eE 0GGG 0'^E 0GGG 0'WE  TD| T;TD4oUDG~B`>EL<LGHHHH#0P@'0 '1E @GGGG0 @'(E @GGGG0 @'E'`~ E' 'P~ ' ' ~ ~ `D'`'   ~~ ` 'D 'DTD| TD;TD4oUDG'D T>D| T/;TAD4oU3DGB0>EL<CLH T]D| T;T`D4oURDG'  TC| T;TC4oUCG'   `p'  B H H    P'~D `ToD| T:TrD4oUdDG`'p |G ' p`'gD T BC|  T :TEC4 oU 7CG T(C| T:T+C4oUCGT2C| T:T5C4oU'CG;2D'  p'P ;&DpP'(D TC| Tl:TC4oUCGT+C| T^:T.C4oU CG 0'D  TUC| TF:TXC4oUJCGB0>EL<LH'C 0TIC| T(:TLC4oU>CGTC| T:TC4oUCGG P0@'C 'C T B|  T 9T B4 oU |BG TmB| T9TpB4oUbBGTwB| T9TzB4oUlBG;C'  '  ;C'  B0>EL<LH G T C|  T 9TC4 oU CG G' P `'  G ; {C  '}C T.B| T9T1B4oU#BGT>B| Tq9TAB4oU3BG 0']C  ThB| TY9TkB4oU]BGB0>EL<LH'EC 0T\B| T;9T_B4oUQBGTB| T-9TB4oUBGG P0@'&C B @>EL <YL H  G H TLB| T9TOB4oUABG;C' |6TA| T8TA4oUAGGG '  TA| T8TA4oUAG'    p  ' 'B TA| T8TA4oUAG;B'p |4TA| T8TA4oUAGGG ' TA| T8TA4oUAGG '    p' 'B 'B 'B `T B|  T O8TB4 oU BG TA| TA8TA4oUAG'p TMA| T,8TPA4oUBAGTKB| T8TNB4oU@BG` @'B T@| T8T@4oU@GT@| T7T @4 oU~@G T @|  T 7T @4 oU @G ;B' 'G ~T B|  T 7T B4 oU BG '5  T B|  T 7T B4 oU AG T @|  T 7T @4 oU @G '  '  ' G T @|  T ~7T@4 oU @G ;A' T?| Tg7T?4oU?GGB@>EL<LHH G `P'  p' G GG ;A'  '  ;A' GG ;A' G ' 'p|D}AGG ~ | } | } zTJ7;&5; H7 B H H  B H H B H H $TIA| T6TLA4oU>AGB0> EL < L H'T7;4; 7 B H H  B H H B H H $-A T?| T6T?4oU?G 'A  T?| T6T?4oU?GB0>EL<LH'A  T?| Ty6T?4oU?GG@ 0'@ T ?| T^6T?4oU?GT@| TP6T@4oU@GTQ?| TB6TT?4oUF?GB@>EL<,LG HG H T >|  T (6T>4 oU >G `P'   p'     '@ T?| T6T?4oU?GB0>EL<#LG HT-?| T5T0?4oU"?GG P' p P `'q@ pT?| T5T?4oU?GT>| T5T?4oU>GG P'p p `'J@ TI>| T5TL>4oU>>GTY>| T5T\>4oUN>G 0'*@  T>| Tt5T>4oUx>GB0>EL<LH'@ 0Tw>| TV5Tz>4oUl>GT ?| TH5T?4oU?GG P0@'? T=| T-5T=4oU=G~ T>| T5T>4oU>G0''?  TH>| T5TK>4oU=>GG 0'? PT]=| T4T`=4oUR=GP'PTc?| T4Tf?4oUX?GP`'@P`@'P`@'? | ;Tj=| T4Tm=4oU_=GT,=| T4T/=4oU!=GTZ=| T4T ]=4 oUO=G ; P?  p'   ' T<| Tn4T<4oU<> E< |  T O4T >4 oU >G ' | T z=|  T 54T }=4 oU o=G `' G @'0G 0'@G P'P '`p'`~KT>| T3T>4oU>GP'0T<| T3T<4oU<GB@L L HH G p' PT <|  T 3T <4 oU <G `' T z<|  T 3T }<4 oU o<G T =|  T 3T =4 oU =G p'.T <| T3T<4oU<G`'pGP'Pp`'N> TG<| Td3TJ<4oU<<G '>> pT<| TN3T<4oU<G'p G G P`' ~/T>| T.3T>4oU=G'p T<| T3T<4oU<Gp'@ '  p'= V0 ;01U0U1Un1U0V0 ;01U0Uw1U[1U0V0 ;01U0U0V00V00V0 ;01U0T01U0V0 V0 ;01U0T01U0V0 ;01U0U0V0 ;01U0U:Ua7U0V00V00V710V0 ;01U0U0V0 ;01U0U0V00V00V10V0 ;01U0U0V00V00V00V00V0 ;01U0U0V00V00V00V00V00V00V00V0f ;01U0T01U0V0] ;01U0U5Uj3UL3U1V0R ;01U0U8U7U7U1V0G ;01U0U1V0D ;01U0Uy1V0A ;01U0Uj1V0> ;01U0U[1V0= ;01U0UL1V0< ;01U0U=1V09 ;01U0U.1V06 ;01U0U1V03 ;01U0U1V00 ;01U0U1V0- ;01U0U0V0. ;01U0U0V01 ;01U0U0V06 ;01U0U0V00V00V00V00V00V00V00V00V00V00V00V00V00V00V00V0 ;01U0T01U0V0 ;01U0U0V0V0 V0 ;01U0U4Uo2U?2U2V0V0;01U0V0V03V0 ;01U0U7U6U6U6V0V0*V0V0V0sV0V0 V0iV0V06V0'V0qV0 V0V0V0;01U0V0V0V0;01U0V0V1;11U1U5U31U1V1;01U1U5U1U1U1V10V10;0U5U0V1V1;11U1U1V 19V 1V1V1VV&1V11;,11U01U01;.1U6U5U&6U3UJ3U2U2U2U2U2Un1Up1UF1U1V1;11U1U6U5U5Ue3U53U3U2U{2U92U#2U1U71U0;0U{6U5U3U1V0y;01U0U2U0;0U5U1V0l;01U0U0;0U1U1U1Ua3U0V10V0\V00V00;0UC3UK1V00V810;0Uq5Ua5U2U3U1U1U0;0Uy5U2U!1V09;01U0U2U0V0-;0U7Uu7US7U37U7U6U6U6U6Uw6Uc6U16U6Ue5U/5U15U5U5U_4U=4U4U3U3U3U3UC3U3U0U0U0U0U0V00V00V00V00V00V00;0U2U0U0V00V00V00;0U2U0V00V0V0;01U0U5U2V0;01U0U0V0;01U0U0V0;01U0U0V 10V 10V0V00V0V00V0V00V00;0U2U[2V0;01U0U@2;0U,2U.2U02U22V0;01U0U0V0;01U0U0V10V10V0V10V0V00V10V10V1;01U1U1V1;01U1U1V1;01U0U1V110V011V 1V11V 1V11V 1V11V1 1V11V1;11U1U(1V1;11U1U1V11V811V1V*11V1V 11V#11V*11V}11V>1&1V=1'1V*1V/1%1V61*1Vg1+1V41;/11U31U=1U11VM1/1V21-;-1U4U4U}4U2U1U1U)1U+1V+11V*1&1V31'1V21(1V51/1V6101V7111V8121V9131V:141V;151V<161V=171;81U04U:1V<161V=171V>181V?191;:1U1U1UL1V81&;31U1Uo1U71;31U%4U?1V251VB1<1;=1U2U]2U52U2U1U1U1Uc1U;1;+Ug5US5U15U5U4U4U4U4Ui4UU4UA4U3UI2U'2U1U1U1U1U{1U1V11VD11V1; 11U1U3U1; 1U3U1V&11V11V"11V!11V$11V#11Vn2 1V#1;11U"1U5U3U(1;1U3U(1VN21V'1;"11U&1U3U.1V21"1;'1U1Um1V-1;(11U,1U3U41V81(1;-1U1U1U1U1U1UK1V+1};&11U*1U3U21V61&1;+1U1U11;/1U1U1Uw1U-1V/1)1V1*1V-1];(11U,1U3U41V81(1V1-1V61P;111U51U3U=1VA111;61U1U1V@1:1VG1;1V@1<1VC1=1V1>1VO1?1V1D1V1K1VN1(;I11UM1U+4UU1VY1I1;N1UZ1UT1Vn1R1VY1S1VX1T1V[1U1V\1V1V[1W1V^1X1V]1Y1V`1Z1Va1[1Vb1\1Va1]1Vd1^1Ve1_1Vf1`1Ve1a1Vh1b1Vi1c1Vh1d1Vk1e1Vl1f1V}1w1V~1V1V1;11U1U1;1U?2U;2U72U32U}2U1V11V1V1}1V11;1U_2U1V11V11V11V11V11V11V11V11;1U=2U1U1V11V11V11;1UL2U1V11V1;11U1U1V1;11U1U1V1;11U1U1V1;11U1U1V11V11V1}V11V1V11V1V11V1V11V11;1U1U1V11V11V11V11;1U(2U1U1V31V11;1U>3U*3U3U2U2U2U2U^2U@2U,2U2U1U1V11V11V11V11V11V11V11V11Vz31Vo31V11;1U 3U?2V21;1U2U<3U\2U^2U,2V21;1UY2U[2U2V1 ;11U1U2V 21;1UK2U2;2UG2U2;2U2U2U{2U1;1U2U1V31V 21V 31V22; 2U2U2V22V(22V22V22V22V22V22V22V'22V22V%2; 21U$2U.2V22"2V12'2V22.2V52/2V202VA212;62Up2U<2V2:2V=2;821U<2UF2VJ2:2V2?2VV2F2;K2Us2Ua2VU2O2VT2P2VW2Q2VX2R2Vk2S2VX2T2V[2U2V\2V2V[2W2V^2X2V_2Y2V^2Z2Va2[2V`2\2Vc2]2Vd2^2Ve2_2Vd2`2Vg2a2Vh2b2Vi2c2Vh2d2Vk2e2Vl2f2Vk2g2Vn2h2Vo2i2Vx28;s21Uw2V27;|21U2V28;21U2V27;21U2V26;21U2V25;21U2V26;21U2V2V22;21U2V2V2V2+;21U2V2*;21U2V2);21U2V23(;-31U13V93V:3@VO3!;J31UN3V\3V]3V`3;[31U_3Va3Vz3V3V3;31U3V3V3 ;31U3V3 ;31U3V3V3V3V3V3;31U3V3;31U3V3V3;31U3'language'cps'graphs'filename'language/cps/graphs.scm'imports'ice-9'match'srfi'srfi-1'intset'intmap'exports'fold1'fold2'trivial-intset' intmap-map' intmap-keys'invert-bijection'invert-partition'intset->intmap' intmap-select' worklist-fold'fixpoint' invert-graph'compute-reverse-post-order'%compute-strongly-connected-components',compute-sorted-strongly-connected-components'solve-flow-equations' declarative?'guile'define-module*'set-current-module'% fold1-procedure'syntax-parameter'make-syntax-transformer'% fold2-procedure' intset-pop' match-error'no matching pattern'_'any' $sc-dispatch'each-any'-source expression failed to match any pattern'syntax-violation' identifier?'top'ribcage'x'm-1f7a2e74024e9271-3'l-1f7a2e74024e9271-7'hygiene'Wrong number of arguments'syntax-parameterize't-1f7a2e74024e9271-0't-1f7a2e74024e9271-1't-1f7a2e74024e9271-2'l-1f7a2e74024e9271-a'l-1f7a2e74024e9271-b'l-1f7a2e74024e9271-c'shift' proc-name'args'l-680b775fb37a463-27f9'l-680b775fb37a463-27fa'name'formals'body'l-680b775fb37a463-27f0'l-680b775fb37a463-27f1'l-680b775fb37a463-27f2'make-procedure-name'prefix'l-680b775fb37a463-27e6'l-680b775fb37a463-27e4'l-680b775fb37a463-27e3'define-inlinable'ice-9/boot-9.scm'identifier-syntax'lambda'f'l's0'let'lp'elt'm-1f7a2e74024e9271-7f'l-1f7a2e74024e9271-83't-1f7a2e74024e9271-7b't-1f7a2e74024e9271-7c't-1f7a2e74024e9271-7d't-1f7a2e74024e9271-7e'l-1f7a2e74024e9271-86'l-1f7a2e74024e9271-87'l-1f7a2e74024e9271-88'l-1f7a2e74024e9271-89's1'values'call-with-values' intset-next'persistent-intmap' intmap-fold' empty-intmap' intmap-add!'persistent-intset' empty-intset' intset-add!' intset-fold' intmap-add' intmap-ref' intset-ref' intset-add'fold' intset-union' intset-prev' intmap-remove'map' intset-remove'intmap-replace!04 8 h   , `  Lh4dpxp   0!P!#$$|$%x%%&0(H((D)d)))h*** * *+@+`+4/T/400$445 5#86&6*6.72<77\7<|7A7F7Kd8P8UX9Y9]9_:`:b;dp;f"(((((( (  * * ** **(***" **"( jj j)jjj j)(j) *jj jj`7`7`7`7P4 <`7s     %, EEEEEEEEEEEEEEEEE EEH \ E-E ===$ =GB=N=G==GB=f=n=v===="=EE|h====N====f=n=v=====.="="=j= p (  HL  E EEd  L t\lT2l3sl33 3449v9@: @:;*   $ 6 <CG L ^d k z              $,4 <(D0L8P@XHtH|HH    XH      @Ddt| ( <CG  G <CGGG 8@Ddx@8 $,0  $($,0     ((4@       @Dtt8 ( <CG  G <CGGG 8@Ddx@8   $(     (0( 4@L< C   (08@D(\l0t@< C < C < C   (08@DL`h px| **(8< C     ( 0(8 @ D H@d< C < C < C  (08@DL`hpx| 8(< C   (08@D< C < C < C  (08@DL`hpx| 8(< C   (0 8@D< C < C (08@DL`hpx|< C    (0 8@DH T*`*< C  (0 8@DH< C < C < C   (08@DL`h px| **(8< C   (0 8@DH8`< C < C < C   (08@DL`h px| **(8< C < C   (0 8@DL ` h(p x | @< C G$"0"@ T \(d l p | **< C G * *0(D(L0T(\(`(l(x22< C G  (0 8@DP\"h"p   < C G    ( 0(8 @ D P \*h*p(  08`t00@@@@xxhh   < C ,4 <DH< C < C < C     ( 0(8 @ D H(T2`2p00800H00800HH0< C     ( 0(8 @ D8` p< C < C < C  (08@DL`hpx| H80< C < C   (08@DL`h px|< C    (0 8@DH T*`*< C < C  (0 8@DL ` h(p x |   < C < C < C  < C  (08@DL ` h(p x | ((0((`PP`P 2200`< C < C   (08@DL`h px|< C    (0 8@DH T*`*< C < C  (0 8@DL ` h(p x | < C < C < C   "("4 @ T \(d l p@xX(((0((( P  0  H< C < C < C   (0 8@D8LPh |  (   @H((0((@X  < C < C < C < C   (0 8@DL ` h(p x |@   (   < C < C < C  < C < C < C  < C < C      < C   (08@DL`hpx|  (  XHH(@((0(((00800PPX(88@88p`(@@H@@HPXbbh(@xhXhX(hX88   (              (  < C   (08@D< C    (0 8@DH T*`*< C  (0 8@DH< C < C < C < C     ( 0(8 @ D L(`(h0p(x(|(0080008BB@@`H< C < C   (0 8@DH T*`*h(t((0(((H< C < C   (0 8@DL ` h(p x | @< C < C   (08@DL`h px|< C    (0 8@DH T*`*< C < C  (0 8@DL ` h(p x | < C < C   (0 8@DThpx< C (08@DH< C < C  (08@D(\l < C < C < C < C  < C < C    < C < C  < C < C < C < C   (08@H,@HHPX\dHxHPHHHPPXPPxhhHHPHHPZbhppxpphppxppxxhppxpphhphhhhhph h   8  ( < C   (08@D< C < C < C     ( 0(8 @ D8` d(hP  (  8    d0p;@dW|`'R4h3c \`48D2,8dXJ  4  D, d\ kX \vX\Xxll`d$d44|<<4($LXdHx d $  d""xt#/$%P&'$'$9H(d-X.x|.l.x`0D112x33T4df4q5,:X(;X<'%.. . .Guile 3.0.7% fold1-procedureidentifier?@@guilesyntax-violation@@guile% fold2-proceduretrivial-intsetintmap-mapintmap-keysinvert-bijectioninvert-partitionintset->intmapintmap-selectworklist-foldlpfixpointcompute-reverse-post-ordervisitinvert-graphcompute-strongly-connected-componentsvisit-scccompute-sorted-strongly-connected-componentsintset-popsolve-flow-equations}[ language/cps/graphs.scmice-9/match.upstream.scmice-9/boot-9.scm ~;,a,,,b,,,b,$,;a&Y~Y}|~}} www ww4w|~j*,$,~,#\;-#!,\;+j% {;,$,~, V#\;-#;,\; >i< ,g ;}<<$;6#w{=>v<%;$[?>v<$;#j?h<J0;/<<<,h<<<+*w[ .  . vyY< . )hw)hy< . vZ)w)w\xXx,%",%W",.X\$2 zy z ;wY<wLIb>h$;.#w<K<1wv w!#{;h$;.#w<K<1<  w=,x <  w=,i u-9;-J9;P<" x& {;>vh .  h: .-v|!wh 9vw"{;'&,$,@, f,$,@,~%;$Y<!!J5;4$;y#~ww<t<z}~h$;.#w<K<1<- ;y <wg k~h;>v   k "h;xxxx x. !`  4  DD dP _p t j Xv0\p xlx|<|44<< 4@$dXd `x|$|!"x"#0#$P& &<&$-`'d,X-x-l.xx/\011x 22l3dZ3e4,9X@:X;'% fold1-procedureidentifier?@@guilesyntax-violation@@guile% fold2-proceduretrivial-intsetintmap-mapintmap-keysinvert-bijectioninvert-partitionintset->intmapintmap-selectworklist-foldlpfixpointcompute-reverse-post-ordervisitinvert-graphcompute-strongly-connected-componentsvisit-scccompute-sorted-strongly-connected-componentsintset-popsolve-flow-equationsclosureargcachevarproctmpmod% fold1-procedurefold1cachedboxprim% fold2-procedurefold2moduletrivial-intsetintmap-mapintmap-keysinvert-bijectioninvert-partitionintset->intmapintmap-selectworklist-foldfixpointcompute-reverse-post-orderinvert-graphcompute-strongly-connected-componentscompute-sorted-strongly-connected-componentsintset-popsolve-flow-equationsvalfls0wxtailpairtagcodearg0arg1aarg2arg3t-1f7a2e74024e9271-0t-1f7a2e74024e9271-1t-1f7a2e74024e9271-2s1t-1f7a2e74024e9271-7bt-1f7a2e74024e9271-7ct-1f7a2e74024e9271-7dt-1f7a2e74024e9271-7esetnamemapkvoutkeysv*labelpredsinout0out1x0x1x0*x1*succsstartordervisitedsuccpredsccsccs-by-label_sccsedgesidnodesnodesuccessorkillgensubtractaddmeetworklistpoppedchangedReturns the sole member of @var{set}, if @var{set} has exactly one member, or @code{#f} otherwise.Return an intset of the keys in @var{map}.Assuming the values of @var{map} are integers and are unique, compute a map in which each value maps to its key. If the values are not unique, an error will be signalled.Assuming the values of @var{map} are disjoint intsets, compute a map in which each member of each set maps to its key. If the values are not disjoint, an error will be signalled.Compute a reverse post-order numbering for a depth-first walk over nodes reachable from the start node.Given a graph PRED->SUCC..., where PRED is a label and SUCC... is an intset of successors, return a graph SUCC->PRED....Given a LABEL->SUCCESSOR... graph, compute a SCC->LABEL... map partitioning the labels into strongly connected components (SCCs).Given a LABEL->SUCCESSOR... graph, return a list of strongly connected components in sorted order.Find a fixed point for flow equations for SUCCS, where INIT is the initial state at each node in SUCCS. KILL and GEN are intmaps indicating the state that is killed or defined at every node, and SUBTRACT, ADD, and MEET operates on that state..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