Your IP : 52.14.31.251

Current Path : /proc/thread-self/root/proc/self/root/proc/self/root/lib64/guile/2.0/ccache/scripts/
Upload File :
Current File : //proc/thread-self/root/proc/self/root/proc/self/root/lib64/guile/2.0/ccache/scripts/read-rfc822.go

GOOF----LE-8-2.0�]L4h�]gguile�	�	gdefine-module*�	�	�	gscripts�	gread-rfc822�	�		gfilenameS�	
fscripts/read-rfc822.scm�	gimportsS�	gice-9�	
gregex�	
�	�	grdelim�	�	�	�	gexportsS�	gread-rfc822-silently�	�	g	autoloadsS�	gsrfi�	gsrfi-13�	�	gstring-join�	�	�	gset-current-module�	�	 �	!g%include-in-guild-list�	"fValidate an RFC822-style file.�	#g%summary�	$gmake-regexp�	%f^From �	&gfrom-line-rx�	'f^([^:]+):[ 	]*�	(gheader-name-rx�	)f^[ 	]+�	*gheader-cont-rx�	+goption�	,geof-object?�	-greverse�	.g	read-line�	/gregexp-exec�	0gfor-each�	1gunread-char�	2gstring->list�	3g
drain-message�	4gmatch:suffix�	5gstring->symbol�	6gmatch:substring�	7g	substring�	8g	match:end�	9f �	:gstring-null?�	;gfrom�	<g
body-lines�	=gheaders�	>gbody�	?f
�	@gsuffix�	Agerror�	Bfbad component:�	Cg
parse-message�	Dgformat�	EfFrom ~A
�	Ff~A: ~A
�	Gf
~A�	Hgdisplay-rfc822�	Ig	open-file�	Jg	OPEN_READ�	Kgmain�C5h8
]4	
5	4 >"G!R"#R4$i%5&R4$i'5(R4$i)5*R+R,-.+/&01hb]L6Zgc
		
gfilenamefscripts/read-rfc822.scm�
	A	��	
	B	��		
C2
h�C]"p45$6"45�"���$=45$,4O
44	55�>"G6"���"���45"���;gport
	�gline		vgacc			vgfilenamefscripts/read-rfc822.scm�
	<
��		=	��		>	��		>	��		?	��		G	��	'	G	"��	/	G	��	/	>	��	6	@	��	B	@	��	C	A	��	O	D	��	R	D	$��	Z	D	��	[	C	��	`	A	��	n	E	��	v	=	��	w	=	��	~	=	*���	=	��	�gnameg
drain-message�C3R+4/&.-/(56789
hX�])45�45445544455��	5�M�NCygreversed-hlines
		Qghlines			Qgfirst			Qgm			Qgname		(	Qgdata		C	Qgfilenamefscripts/read-rfc822.scm�
	P	��		Q	'��			Q	��		R	&��		Q	��		S	"��		Q	��		T	%��		T	5��	(	T	%��	(	Q	��	+	U	%��	.	V	,��	3	V	=��	;	V	,��	>	W	,��	?	V	&��	A	X	&��	C	U	%��	C	Q	��	J	Y	(��	O	Y	��		Qgnamegadd-header!�C:3*-;<=>?@AB
hX�]	�$LC�$MC�$MC�$M$C4M5NMC	6�g	component
		Tgt	1	Lgfilenamefscripts/read-rfc822.scm�
	g	��		h	��	1	l	��	=	m	&��	C	m	>��	E	m	C��	G	m	&��	I	m	��	P	o	��	T	o	��		TCh�4]A$444555"HHHOQ"�45$)$4>"G"45K"m4	5$4545�"���$4>"G"45"��r45"��_4
J5KOC,gport
	�gfrom	 �g
body-lines		#�gbody		&�gheaders		)�gadd-header!		3�gline		<�gcurrent-header		<�gt		y�	gfilenamefscripts/read-rfc822.scm�
	I
��		J	��			K	��		K	"��		L	/��		K	"��		K	��	 	J	��	)	O	��	)	J	��	<	[	��	=	\	
��	G	\	��	M	]	
��	N	]	!��	d	^	��	l	^	
��	q	_	
��	y	\	���	a	���	b	���	b	���	a	���	d	
���	d	!���	e	���	e	$���	e	
���	[	���	[	���	[	���	f	���	f	��"	�gnameg
parse-message�CCRCh�]6}gport
		gfilenamefscripts/read-rfc822.scm�
	q
��		r	��		gnamegread-rfc822-silently�CR;DE0DFh]��6wgheader
		gfilenamefscripts/read-rfc822.scm�
	v	��		w	��	
	w	$��	
	w	1��		w	��		C=G>	hX]	45$4>"G"445>"G456gparse
		Tgt			-gfilenamefscripts/read-rfc822.scm�
	t
��		u		��		u	��			u		��			u	��		u	)��		u	4��		u	)��	.	v	��	3	x	��	7	x	��	9	x	��	>	v	��	K	y	
��	L	y	��	P	y	��	R	y	��	T	y	��		Tgnamegdisplay-rfc822�CHRIJHh8�-1344�554>"GC�gargs
			1gparse		/gfilenamefscripts/read-rfc822.scm�
	{
��	
	|	��	
	|	%��		|	0��		|	%��		|	��		|	��		}	��				1


gnamegread-rfc822�CRiKRC�gm
		0gfilenamefscripts/read-rfc822.scm�		-
��	4	3
��	6	4	��	9	4
��	:	6	��	@	6	$��	B	6	��	E	6
��	F	7	��	L	7	$��	N	7	��	Q	7
��	R	8	��	X	8	$��	Z	8	��	]	8
��	a	:
���	<
��	G	I
��	�	q
��	t
��
+	{
��
2�
��	
4
C6
?>