File Manager

Editing File: /lib64/guile/2.0/ccache/scripts/punify.go

GOOF----LE-8-2.0�	������]�%�4�hs������]�g��guile�	��	g��define-module*�	��	��	g��scripts�	g��punify�	��		g��filenameS�	
f��scripts/punify.scm�	g��exportsS�	��	
g��set-current-module�	
��	
��	g��%include-in-guild-list�	f��1Strip comments and whitespace from a Scheme file.�	g��%summary�	g��string->list�	g��symbol->string�	g��char=?�	g��memq�	g��list->string�	g��display�	g��write�	f��(�	g��write-punily�	f��)�	f�� �	g��with-input-from-file�	g��eof-object?�	 g��read�	!g��current-input-port�	"g��
punify-one�	#g��for-each�	$g��main�C�5h�������]4	
5�4�>��"��G���RR�����h �����]!"��p��$��B44�554�:5$��4 5$��"��4�5"��"��$��4:>��"��G��6�6��$����(��"����4>��"��G��4	>��"��G��"��X(��
6�$��"���$��"��4>��"��G��4	>��"��G����"������"���"������������g��form
	�g��ls		K�g��t	P	v�g��first���g��ls	���g��last-was-list?	���g��	new-first	����g��filenamef��scripts/punify.scm�
	.
��			=	��	
	=		��		>	��		>	&��		>	��		>	��		?	��	!	?	��	%	?	��	)	?	��	*	@	��	6	?	��	<	A	��	A	A	#��	C	A	��	P	/	��	Y	C	��	p	D	��	v	E	��	v	/	��	y	/	��	}	/	����	/		����	0	����	0		����	1	����	1	����	1	����	2	����	3	����	4	
����	5	����	5	����	6	#����	6	����	8	����	7	'����	8	����	:	����	:	!����	:	����	;	��	<	��	7	'��	<	��	3	��	3	��	3	6��	3	���3	��g��nameg��write-punily��CR !�������hP�������]"��44�5$��C4�>��"��G��445�5�"���445�5�"�����������������g��form
		:�g��t	
	:��g��filenamef��scripts/punify.scm�
	I	��		K	��		L	��	
	L	
��		N	��	+	J	��	.	J	#��	4	J	��	:	O	��	:	K	��	;	J	��	>	J	#��	D	J	��	J	K	���		J
���C�������h���v���]�6������n�������g��file
		
��g��filenamef��scripts/punify.scm�
	G
��	
	H	���		
��g��nameg��
punify-one��C"R#"�������h���t���-��1��3��6�������l�������g��args
			��g��filenamef��scripts/punify.scm�
	Q
��		R	���

��g��nameg��punify��CRi$RC��������g��m
		(��g��filenamef��scripts/punify.scm�		(
��	,	+
��	.	,	��	1	,
��
	.
���	G
���	Q
���	T
���		�
���C6�

Back to Directory File Manager