ELF

�
@�	
@8@
HH




�	�	
���pp
h@

�;�?T
�?;	�?T@;�?T
@�T@|��@@qU@G
@�p�`�
P�'0T

@|
��
�?@qU

@G

�'T
@4

)9	��
H

	T
�?4

);	@H

	T
@4

);		@H

	T
@4
);
@H

�
'
u@
pT
@T @9��
;�B HH
B HH
T@�B HH
B HH
;!@B HH
B HH
|	� }	
�G	
'
	�;@T @'8

�B HH
	B	 H	
H	

�	�'&	)@
O@�|�

�/|�*}
�'G'
7 G
B HH
7@'|�

�|�}
�G'
 G
B HH
P�&@&
@`T@|��L?@pU@G
@'
A|��}
��G|��}��Kh;�	��r��G��T�?~P��T@G
'
����P;@T�?'�PB HH
T@;<@�B HH
B HH
B HH
TJ?T�?B HH
B HH
B HH
B HH
`
'T(@~P�lG
|�"}
�GT&@TF?�B HH
B HH
B HH
T"@B HH
B HH
B HH
`
'&u?T@~P�3T!@~P�=G
|�)}
�&GT�?;�?�B HH
B HH
B HH
T@T�>T?B HH
B HH
B HH
B HH
`
'&??;'@
'T.@~p�;B@
'TI@�;H@�B HH
B HH
B HH
B HH
B HH
$@&?
I@|��\><@qU�>G
'
A@


'���
?@


'���
=@

V�=�
;
�=1
U
�=U
�=V�=�
;
�=1
U
�=U
�=V�=�
;
�=1
U
�=U
�=V�=�=V�=�=V�=�
;
�=1
U
�=T
�=1
U
�=V�=�
V�=�
;
�=1
U
�=T
�=1
U
�=V�=�
;
�=1
U
�=T
�=1
U
�=V�=�
;
�=1
U
�=U
�=V�=�
V�=�
V�=�
;
�=1
U
�=V�=���V�=�
;
�=1
U
�=V�=p���V�=�
;
�=1
U
�=V�=l���V�=�
;
�=1
U
�=V�=�
;
�=1
U
�=V�=�
;
�=1
U
�=U
5?U
�>V�=�
;
�=1
U
�=U
$?U
�>U
�=;
�
U
�>U
�=V�=�
;
�=1
U
�=U
;?U
�=V�=�
V�=�=V�=�
;
�=1
U
�=U
>U
>V�=�
V
>�=V�=�
;
�=U
>U
�=V
>�
V>�=V
>�
V>�
;
>1
U
>V>�
;
>1
U
>V>�
;
>1
U
>U
>V>>V>�
;
>1
U
>V>�
;
>1
U
>U
J>V>�
;
>1
U
>U
7>V>�
;
>1
U
>U
$>V >>V!>>;
>U
�>U
>V >>V>>V">>V#>�
;
>1
U
">V$>�
;
>1
U
#>V%>}
;
 >1
U
$>V&>z
;
!>1
U
%>V'>y
;
">1
U
&>V(>x
;
#>1
U
'>U
S>V'>u
;
">1
U
&>U
8>V&>r
;
!>1
U
%>U
%>V'>#>V*>$>V)>%>V,>&>V->'>V.>(>V/>]
;
*>1
U
.>V0>\
;
+>1
U
/>U
3>V3>->V2>.>V5>/>V6>P
;
1>1
U
5>V7>O
VB>Z

�'language'	brainfuck'compile-scheme'filename'%language/brainfuck/compile-scheme.scm'exports'declarative?'guile'define-module*'set-current-module'	tape-size'compile-body'compile-instruction'let'make-vector'tape'pointer'
write-char
'wrong-type-arg'cdr'6Wrong type argument in position 1 (expecting pair): ~S'car'reverse'	<bf-loop>'begin'iterate'if'not'
='
vector-ref'	<bf-move>'
+'set!'	<bf-read>'<bf-increment>'vector-set!'
char->integer'	read-char'
<bf-print>'
integer->char'
misc-error'!unknown brainfuck instruction  ~S'append�@�@ AHC�E(F<HdI""
�`7`7�`7

`7�	|`7�	%	EEE`������
6�,���D����������	

	
	
	


!�����������������������$���������

�

  g


�	 
��8*
��J<��pE(
?Mh
�Uh
�k
�
�	z(

�
�
�
�
��
P
/�
�
K�
�
�
�
�
�0
�
�
�	
@�l
�l
�4
���
 
��
 
BT� Tt�
t��

							

	 		*	9	FZ$,4 <(@0H8d8l8p8�
�
�
�
�
 �
�
�����������
^bf				kk		kk	kk		
kk$ ,(00< LP(T0` pt0�
 �
@�
H�
P�
@�
�
�
p		}	k�
�
	}	k�

8(PTX``�
8�
�
�
�
�
�
���
�
�
�
�
			
k			kkk		kkkk�
	�
			kkk	kkk�
�
	�
			kkk			kkkkZ�
Z				kkkkk(DH|�
�
(�
0�
8�
(�
�
�
�
�
�
 ����� ���������� �� ������������ ����� �(���������� �(�� ���
�
�
$,0
p
�
�

3��8�l

T
l
)��=8< )\ |�

%
.
.
.
Guile 3.0.8compile-schemecompile-bodycompile-instructionappend@@guile�
b
�





language/brainfuck/compile-scheme.scmice-9/psyntax.scmice-9/boot-9.scm	�
�D;�,

�a,,�,

�b,$�,

�b,��

�aJ
,wwe�=mJ,�
wf�,
�g,�\
,=	,=wi	e,=wi	;,+X
	<#�/e�,
�g,b/�Ъ�$

,z�Y;,	W
s���

l

l

�
��18T t ��compile-schemecompile-bodycompile-instructionappend@@guileclosureargcachevarproctmptape-sizecompile-schemecompile-bodycompile-instructionvalexpenvoptspairinstructionscompiledcurresultinskeyhashidxbdirincarg0arg1arg2.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