ELF

�
@�
@8@
��




��
   pp
x@

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

�'T
�?4

)�	H

	T

@4

);	�?H

	T
@4

)-	>U	@;	@H

	T
@4

);	@H

	T
~?4

);	@H

	T
@4
);
@H

�
'
@


'
�@
T
@|���?
@qU@G
��'P
|���|	�

��|	��}	
��G	;�?T�?'

p'
���
G		
�p'P
|	�

�c|	�^}	
�[G	|���
`'p
|��
;
�?T�?'�
`'
����
G		
�`'P
;�?(@'|	�

�0|	�)}	
�&G	|��
�P'�
|��	T
�?`'�

P'
r���
G		
�
P'p
��&	�?&	�?;�?T	�?'�&	�?|	�w}	�tT�?|���>�?qU�?G
�'
@
T�?|���>�?pU�?G
�'
@
|�K}
�HG�:T�?|���>�?pU�?G
p`'P
|��.� T�?|���>?qUy?G
p�'P
|��G
Tu?|���>r?pUl?G
�'
@
��&&?�|���:T�>'
T	�>'TT?|��m>Q?pUK?G
��	p'
Z?|
��
[>M?pU
�>G


'
b?
TO?|�	T�>TR?4oUD?G
;M?'
a?

PTP?|�	Tq>TS?4oUE?G

'
@T
I?':
@�
�0
@'
u���G

'
@T
3?'$
@�
�+?'
@'
\���G

'
@T
?'
@�
���
'
?|
��
�=?pU
?G


'
?

T?|���=?pU?G
;
>
 '
?

Vn=�;
i=1
U
m=U
{=Vm=�;
h=1
U
l=U
l=Vp=j=Vq=�;
l=1
U
p=T
n=1
U
l=Vn=�Vs=�;
n=1
U
r=T
p=1
U
n=Vp=�;
k=1
U
o=T
m=1
U
k=Vo=�;
j=1
U
n=U
n=Vr=�Vy=�V~=�;
y=1
U
}=V=�;
z=1
U
~=V�=�V�=�;
�=1
U
�=V�=����V�=�;
�=1
U
�=V�=��V�=]���V�=�;
�=1
U
�=V�=�V�=�V�=�V�=�;
�=1
U
�=U
�=V�=�V�=�=V�=�V�=�=V�=�V�=�V�=�V�=�V�=�V�=�V�=�V�=
V�=
;
�=1
U
�=V�=����V>
;
�=1
U
>V>
V>

�'scripts'punify'filename'scripts/punify.scm'exports'declarative?'guile'define-module*'set-current-module'%include-in-guild-list'%summary'1Strip comments and whitespace from a Scheme file.'write-punily'
punify-one'main'list?'
('
 'wrong-type-arg'car'6Wrong type argument in position 1 (expecting pair): ~S'
)'symbol->string'string->list'char=?'memq'list->string'write'display'with-input-from-file'current-input-port'read'for-each���� �|������4�L�h������0��������4���������<�l��
�


**
���
����

`7`7�`7

`7�D
`71E
EE �������������

6�
�������������Ex�����|�����������������������

�

�
�



� 
��
*

<  pE�
9M�
�U�
�k
�
	z�

�
�
�
�
��
x
/�
�
E�
�
�
�
�
��
�
�
�
@��
�%�
�
l

�
�r
 
@� r  t�
	t����� �\	�

							

	 		7		@M	T	_	fk$,4 <(@0H8d8l8p8�
�
�
�
�
 �
�
������������������
oot{�
	
	�
	
		�
�
�

		
t{
		
	t{	
�
	


08<X�
�
8�
0�
�
���@�8������ ��@�������� ����� ���� � � �(������(������ ��	�	0�	(�	�	�	�	�
�
�
$,0
�
t�
�
{	(08@DL
t�
�
{	
	
o	
ok(08@D X(` x�
 �
(�
 �
�
� �(� ����
�
$,0
�

8@DL�

3��
��

� 
��8(T\L
3�	8>�	dD
�

%
.
.
.
Guile 3.0.8write-punilydisplay@guilepunify-oneread@guilepunify�
:
�





scripts/punify.scmice-9/boot-9.scm	�
�T;�,

�a,,�,

�b,$�,

�b,��

�a J
J
,&JZh�zZ��;!;<x
,,Zi7x$=y(:x"=,,Zi({"zzY$=y(:x=,ii({�$zI,,{J
,'i,-'w;!<:$= �;
�}J �,
�};,Z,K
<�-%<$�Y,j.%d$Y,j[%d$Y,j/
1Z�

�

�
 
�
�8 TtL
'�82�d\	�write-punilydisplay@guilepunify-oneread@guilepunifyclosureargcachevarproctmp%include-in-guild-list%summarywrite-punilymodulepunify-onepunifymainvalformcachedboxprimfirstnew-firstlslast-was-list?targ0arg1filemodnameargs.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