Uname: Linux web3.us.cloudlogin.co 5.10.226-xeon-hst #2 SMP Fri Sep 13 12:28:44 UTC 2024 x86_64
Software: Apache
PHP version: 8.1.31 [ PHP INFO ] PHP os: Linux
Server Ip: 162.210.96.117
Your Ip: 18.225.209.24
User: edustar (269686) | Group: tty (888)
Safe Mode: OFF
Disable Function:
NONE

name : xpath.go
GOOF----LE-8-2.0+]@4h�]gguile�	�	gdefine-module*�	�	�	gsxml�	gxpath�	�		gfilenameS�	
fsxml/xpath.scm�	gimportsS�	gice-9�	
gpretty-print�	
�	�	�	gexportsS�	gnodeset?�	gnode-typeof?�	gnode-eq?�	gnode-equal?�	gnode-pos�	gfilter�	g
take-until�	g
take-after�	g	map-union�	gnode-reverse�	g
node-trace�	gselect-kids�	g	node-self�	g	node-join�	 gnode-reduce�	!gnode-or�	"gnode-closure�	#gnode-parent�	$gsxpath�	% !"#$�	&gset-current-module�	'&�	(&�	)g*�	*gmemq�	+g@�	,g*PI*�	-+,�	.g*any*�	/g*text*�	0gstring?�	1glength�	2gerror�	3fyikes!�	4greverse�	5gappend�	6gcons�	7gdisplay�	8f
-->�	9f :�	:g
procedure?�	;g//�	<gequal?�	=geq?�	>gnumber?�	?fInvalid path step: �C5h�%�]4	
%54(>"Gh(�]	�$	���"$C�C�gx
		"gt		"gfilenamefsxml/xpath.scm�
	o
��		p	��			p	��		p	#��	
	p	��		p	��		p	��	!	p	.��			"gnamegnodeset?�CR)*-./0hP�]L�$�$4�5�CCL�$CL�$6�$L��CC�gnode
		Jgfilenamefsxml/xpath.scm�
�	��	�	��	�	��	�	��	�	"��	�	(��	�	"��	�	��	)�	��	:�	��	=�	��	A�	��	F�	#��	G�	��		JChm]OCegcrit
		
gfilenamefsxml/xpath.scm�
�
��		
gnamegnode-typeof?�CRh^]L�CVgnode
		gfilenamefsxml/xpath.scm�
�	��	�	��		Chj]OCbgother
		
gfilenamefsxml/xpath.scm�
�
��		
gnamegnode-eq?�CRh^]L�CVgnode
		gfilenamefsxml/xpath.scm�
�	��	�	��		Chm]OCegother
		
gfilenamefsxml/xpath.scm�
�
��		
gnamegnode-equal?�CR123hx5]	45$e(CL&�CL
�$4L�45�56L
�$"4>"G4L�5�6C-gnodeset
		tgt	D	egfilenamefsxml/xpath.scm�
�	��	�	��	
�	��	 �	��	#�	��	'�	��	,�	��	-�	��	2�	��	3�	&��	:�	��	<�	��	@�	��	C�	
��	D�	��	Q�	��	U�	��	Z�	��	f�	��	k�	��	m�	��	p�	��	r�	��	s�	��		tChf]OC^gn
		
gfilenamefsxml/xpath.scm�
�
��		
gnamegnode-pos�CR4hh9]"?(64L�5�$("��""���45$""���1glst
		dglst		Egres			Egpred-result			Egfilenamefsxml/xpath.scm�
�	��	�	��	�	��	�	
��	�	��	�	$��	�	��	�	
��	�	��	%�	��	+�	��	4�	��	7�	��	E�	��	E�	��	F�	��	P�	��	[�	+��	\�	=��	d�	��		dChh]OC`gpred?
		
gfilenamefsxml/xpath.scm�
�
��		
gnamegfilter�CRh@�]	(C4L�5"
�4L�5�C$("���C"����glst
		<gpred-result		<gfilenamefsxml/xpath.scm�
�	��	�	��	�	��	�	$��	�	��	�	
��	�	��	�	 ��	"�	&��	$�	 ��	%�	��	&�	��	2�	��	7�	��		<gnamegloop�Ch0�]	OLQ45$"6�glst
		,gloop		,gfilenamefsxml/xpath.scm�
�	��	�	��	�	��	�	��	*�	+��	,�	��		,Chl]OCdgpred?
		
gfilenamefsxml/xpath.scm�
�
��		
gnameg
take-until�CRh`
]"8(C4L�5"	�"���$("����C"���45$""���glst
		Zglst		>gpred-result			>gfilenamefsxml/xpath.scm�
�	��	�	��	�	��	�	��	�	$��	�	��	�	
��	 �	��	&�	��	&�	��	2�	��	9�	��	>�	��	?�	��	I�	��	T�	+��	Z�	��		ZChl]OCdgpred?
		
gfilenamefsxml/xpath.scm�
�
��		
gnameg
take-after�CR56h8�]
(C4�545$"4�56�gproc
		6glst		6gproc-res			6gfilenamefsxml/xpath.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	
��	 �		��	+�	��	2�	"��	4�	��	6�	��
		6	gnameg	map-union�CR4h �]45$6C�gnode-or-nodeset
		gfilenamefsxml/xpath.scm�
	��		
��	
	��		��		)��		gnamegnode-reverse�CR789
hP�]4>"G4L>"G4>"G4>"GC�gnode-or-nodeset
		Mgfilenamefsxml/xpath.scm�
	��		��		
��		��		��	'	��	+	
��	0	��	9	��
		MChl]OCdgtitle
		
gfilenamefsxml/xpath.scm�

��		
gnameg
node-trace�CRh8�](C�$!��$4L5�64L56C�gnode
		5gfilenamefsxml/xpath.scm�
3	��	4	��	6	��	4	��	7	��	7	��	4	��	8	��	$8	��	&8	��	)9	��	39	��	46	��		5Chr]OCjg
test-pred?
		
gfilenamefsxml/xpath.scm�
2
��		
gnamegselect-kids�CRiRhH�]"5(C45$4�5"4�5�"���L"����gnodeset
		Ggnodeset		;g	selectors			;gfilenamefsxml/xpath.scm�
I	��	J	��	K	��	M	��	M	��	N	��	 N	��	$N	��	)O	��	,O	��	0O	��	3P	��	;L	
��	;J	��		GChq-13OCig	selectors
			gfilenamefsxml/xpath.scm�
H
��			


gnameg	node-join�CRh0�]"(C4�5�"���L"����gnodeset
		.gnodeset		"g
converters			"gfilenamefsxml/xpath.scm�
]	��	^	��	_	��	`	��	`	��	`	��	`	+��	"`	
��	"^	��
		.Cht-13OClg
converters
			gfilenamefsxml/xpath.scm�
\
��			


gnamegnode-reduce�C R5hH]"5(C44�5$"5�"���L"���gnode-or-nodeset
		Fgresult		;g
converters			;gt			.gfilenamefsxml/xpath.scm�
p	��	q	��	r	��	s	��	s	#��	s	$��	s	#��	s	��	+s	F��	0s	��	3t	��	;s	
��	;q	��	<q	��	Fq	��		FChp-13OChg
converters
			gfilenamefsxml/xpath.scm�
o
��			


gnamegnode-or�C!R)5hH]"5(C444555444L555"���"���gnode
		Fgparent		;gresult			;gfilenamefsxml/xpath.scm�
�	��	�	��	�	��	�	��	�	��	�	��	�	,��	�	��	�	��	 �	��	!�	��	&�	��	'�	��	1�	��	3�	��	;�	
��	;�	��	>�	%��	F�	��		FChs]OCkg
test-pred?
		
gfilenamefsxml/xpath.scm�
�
��		
gnamegnode-closure�C"R#! )+"hx�]	45$
4L564444554	4
55544	4554	4
55554454
55L6~gnode
		rgpred	Y	rgfilenamefsxml/xpath.scm�
�	��	�	��	
�	��	�	#��	�	��	�	��	�	��	!�	��	$�	��	(�	*��	*�	��	,�	��	-�	��	0�	��	8�	��	:�	��	;�	��	>�	��	A�	��	E�	,��	G�	��	I�	��	J�	��	M�	��	U�	��	W�	��	Y�	��	Y�	��	\�	��	_�	��	f�	��	n�	��	r�	
��"		rChp]OChgrootnode
		
gfilenamefsxml/xpath.scm�
�
��		
gnamegnode-parent�C#R$:;56".<=>2?h��](C45$
4564�5$4�5�"����&4445$"444	
5555�"�����$444	�555�"��^��$���&444
��?55�"��.��&444��?55�"��"T(
�"���4�5$44�55�"���444�555�"������$444	��555"4L��5��"��u�6�gnodeset
	�gpath	�gnodeset	Tg
reducing-path	Tgfilenamefsxml/xpath.scm�
�	��	�	��	�	��	�	��	�	��	#�	��	$�	��	)�	��	+�	��	/�	��	0�	��	3�	
��	7�	��	:�	!��	B�	��	D�	��	G�	��	K�	��	L�	��	M�	��	W�	��	b�	��	c�		��	f�	��	j�	%��	l�	��	n�		��	r�	��	t�	��	w�	��	�	����	����	����	����	����	
����	����	(����	����	
����	����	����	����	����	����	����	#����	+����	����	����	
����	����	-����	����	
����	����	����	����	#����	(����	����	����	
����	����	*����	����	
����	����	����	���	���	���	.���	 ���	
���	���	
���	�� �	��!�	��&�	��(�	��,�	��/�	��7�	
��8�	��9�	��<�	��A�	$��C�	��E�	��I�	��L�	��T�	
��T�	��W�	"��Y�	��]�	��^�	��_�	��b�	'��g�	5��j�	'��l�	��p�	��u�	��|�	'���	����	#����	����	
����	#����	��r	�	gnamegloop�Chr]	OQL6jgnodeset
		gloop	
	gfilenamefsxml/xpath.scm�
�	��	
�	��		Chg]OC_gpath
		
gfilenamefsxml/xpath.scm�
�
��		
gnamegsxpath�C$RC�gm
		,gfilenamefsxml/xpath.scm�		d
��	o
����
����
����
��)�
��	k�
���
���
��_�
��0
���
��u2
��|A
��lH
��\
��o
��6�
����
��%��
��	%�
C6
© 2025 GrazzMean