ELF

�
@�
@8@
pp




��
pp
�@

�;�?T�?;
�?T	�?;1@T=@;�?TE@�TD@|��K@O@qU;@G

P�	0@��p�`�'
0
TA@|��0@>@qU8@G
�'
TB@4);
@@H

T�?4);=@H
�
'
@@


'
>@��
B HH

 
'
5@B >
L
H
B L
H
B L
H
BP>
EL
<L
HHHBPL
<
@L

HHH0'
V@
0�B
 H
H

GG
|�(}
�%H

H

GG

|
�}

�G
~�GG
|��G

H
G
|����H
�
'%�?&

@&@
'@

0GG
G
G


GG
 
0'����
@
P
P'
���P`0'
B@|��}
�AG|�}
�}
�
�'
	
���'�
�'����G
|�
}
�}
�

	
'

	
�'����B HH


'}
��Kh
�
^
A�j^
L>
p��H

^
p���?'D
^
p������v�pK
h

?q��g
�^


C

|
�}

�}

��'
		`
��'��'
t���
pK	h		q��?D
?
�?'Y

q��9Khq��/
^
C
|
�}

�|
�}

��'
		`
��'��'
=���
pK	h		q��D
^
��&
[?&
i?&W?&e?�
'
'
�?

V�=A
;
�=1
U
�=U
>>U

>V�=:
;
�=1
U
�=U
�=V�=�=V>4
;
�=1
U
�=T
�=1
U
�=V�=-
V>4
;
�=1
U

>T
�=1
U
�=V�=+
;
�=1
U
�=U
�=V>�=V
>�=V&>�=V
>
;
�=1
U
>U
>V>
;
�=1
U
�=U
�=V>�=V>�=V>�=V>>V>
;
>1
U
>T
>1
U
>V>
;
�=1
U
>T

>1
U
�=V>�;
�=1
U
>U
>V>�V
>�V>
;

>1
U
>V>���V>`���V->�;
(>1
U
,>U
^>U
L>U
2>V2>H=V%>�V.> >V/>�V>>*>V1>�;
,>U
H>U
6>V8>
V?>3>VT>
;
O>1
U
S>U
u>U
c>VQ>�V`>L>VS>

;
N>U
j>U
X>VZ>
Va>U>Vj>
;
e>1
U
i>U
�>U
�>U
y>U
k>Vc>�Vh>^>V�>c>Vf>
Vk>a>V�>f>Vi>
Vn>d>V}>i>Vl>$
Vq>g>Vp>l>Vs>m>Vt>n>Vu>o>
�'ice-9'	copy-tree'filename'ice-9/copy-tree.scm'imports'match'srfi'srfi-11'replacements'declarative?'guile'define-module*'set-current-module'	make-race'wrong-type-arg'(Expected non-circular data structure: ~S'car'6Wrong type argument in position 1 (expecting pair): ~S'set-cdr!'out-of-range'vector-set!'Argument 2 out of range: ~S'
vector-ref'
documentation'<the new data structure.  @code{copy-tree} recurses down the
'Econtents of both pairs and vectors (since both cons cells and vector
'Hcells may point to arbitrary objects), and stops recursing when it hits
'any other object.�p�pxq�r t<w�x�z�|���x�������*��j�j�j%f�f�f&`7`7�`7

`7�`7p		EE��������� ������D���,������(�6������|���d���������������
�����p��
<EH0
��<��

0



Z


� 
��$*
pp�<pE�
+M�
�U�
�k
(
	z�

�
0
�
8
��
�
/�

7�
@
�
@
�
��
�
�
�
@�H
�H
h
?

h
�
E
 
�
@Q
 @u

X�
X��

��
 B
									

	 	*4$,4 <(D0L8P@XHtH|H�
H�
�
�
�
�
 �������
88	<ASa8k88
ko
o"(4@L"X*l(x"
t	<yy	y	y	�
 $ HLh tx�
�
�
�

yyy $
8�
�
((08�
�
8�
�
�
�
8�
<�
�
�
�
	�
�
�
�
�
�
�
�
�
�
�
�
�
�
�
�
�
�
�
8�
�
		�
�
�
�
�
�
�
�
�
�
�
�
�
�
8�
�
		�
�
�
�
�
�
�
(l l@�
�
�
���
�
�
�� �*�0�
�
�
�
�
�
�
��"�"�"�#�+�"�"�#�"�8�@�`�8�8�B�B�B�C�� �*�*�*�+�*�*�+�*�8�@�`�8�8�B�B�B�C�
�
�X�
�

3��$�H

0 
P<
��(� �D'@H1�x

%
.
.
.
Guile 3.0.8make-raceadvance!split!copy-treevisit}
;
�





ice-9/copy-tree.scmice-9/boot-9.scm	�
5c;�,

�a,,�,

�b,,�,

�b,$�,

�b,��

�awn��Kqw�tY<	ix<
wM<	-h	U+	*4�
�# ;xf�; is$h+?
�i �r$hDi	�x<<i*-k�$h+?
�i�Zu*-kw$h+l
�i�Z
+*,
,*,�

H

H
 
h
<
�
�@�DXH%�xmake-raceadvance!split!copy-treevisitclosureargcachevarproctmpmake-racecopy-treevalobjpairadvance-tortoise?tortoise-pathhare-tailtagcodehareunboxedunspecifiedadvance!split!headtailw0ulenrlenslennwordsvw0-highposisidxa*res*aresults64.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