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.117.7.5
User: edustar (269686) | Group: tty (888)
Safe Mode: OFF
Disable Function:
NONE

name : xref.go
GOOF----LE-8-2.0oM]�4h�	]gguile�	�	gdefine-module*�	�	�	gsystem�	gxref�	�		gfilenameS�	
fsystem/xref.scm�	gimportsS�	gbase�	
gpmatch�	
�	�	gcompile�	�	�	gvm�	gprogram�	�	�	gsrfi�	gsrfi-1�	�	�	�	gexportsS�	g*xref-ignored-modules*�	gprocedure-callees�	gprocedure-callers�	 gsource-closures�	!gsource-procedures�	" !�	#gset-current-module�	$#�	%#�	&gmemq�	'gprogram-objects�	(g
vector-length�	)gmake-vector�	*g	decompile�	+gprogram-objcode�	,gtoS�	-gassembly�	.gload-program�	/gfor-each�	0gtoplevel-set�	1gtoplevel-ref�	2gprogram?�	3gfold�	4gprogram-callee-rev-vars�	5g	variable?�	6gmodule-variable�	7gprogram-module�	8gthe-root-module�	9gnested-ref-module�	:gresolve-module�	;gmodule-public-interface�	<gprocedure-callee-rev-vars�	=g*callers-db*�	>gmake-hash-table�	?g*module-callees-db*�	@g*tainted-modules*�	Ag
value-history�	BA�	CB�	Dgmodule-name�	Egmember�	Fgon-module-modified�	Gg	hashq-ref�	Hgassoc�	Ig
hashq-set!�	Jg
add-caller�	Kg
assoc-remove!�	Lgforget-callers�	Mg	hash-set!�	Ngappend�	Oghash-ref�	Pgadd-callees�	Qgensure-callers-db�	Rguntaint-modules�	Sg
hash-for-each�	Tgmodule-observers�	Ugmodule-observe�	Vgmodule-for-each�	Wg
procedure?�	Xgfilter�	Ygvariable-bound?�	Zgmodule-submodules�	[gcurrent-module�	\gerror�	]f/expected a variable, symbol, or (modname . sym)�	^gprogram-sources�	_gprocedure-sources�	`g*closure-sources-db*�	ag*sources-db*�	bg*module-sources-db*�	cg*tainted-sources*�	dgon-source-modified�	eg
hashv-set!�	fg	hashv-ref�	gg
add-source�	hgdelq�	ig
hashv-remove!�	jg
forget-source�	kfunexpected source format�	lgadd-sources�	mgand=>�	ngvector->list�	og
hashq-remove!�	pgforget-sources�	qgensure-sources-db�	rguntaint-sources�	sgsort!�	tghash-map->list�	ugcons�	vg
lines->ranges�	wgreverse�	xglookup-source-procedures�	ygcanonicalizationS�	zy	��	{z�	|grelative�	}g %file-port-name-canonicalization�	~gcatch�	~��~��gopen-input-file��g
port-filename�C5h�A�]4	
"54%>"G&h�]45$C�C�gx
		gy		gfilenamefsystem/xref.scm�
	"	��		#	��		#	��		#	��			gnameg	cons-uniq�C'()*+,-./01h��]!"@�$7��&#�$��(L�CCCCC�$=��&'�$��(L�C"���"���"��|"��x�gx
	�gvx		Dgvy			Dgvx		,	@gvy		,	@gvx	S�gvy		S�gvx		l�gvy		l�	gfilenamefsystem/xref.scm�
	-	��		.	��	<	0	'��	F	.	��	|	/	'���	.	��	�C2345&6789:;h@�]�45$)4544554455�$g��	&K�$@���$)�	�4
O	>"G	"""""��$C4�5$�4
4�55"����$5�45$#�45$"�"����$R445		$	"	5	�	$4	5$"	�""��1�$���
	
�$�
�
��$x��
(f445	5$4
$45"5"�$45$"�""���CCCC�"��}
"��sC�gprog
	@g	cons-uniq	@gt		
@gn		9>gprogv		9>gasm		9>gvx		L�gvy		L�gvy		b�gvy			r�gi	�4gout	�4gobj	�'gt		8Kgv		O�gvx		�%gvy	
�%gvx	�#gvy	�#gvx	
�!gvy	�!gm	�gv	�gfilenamefsystem/xref.scm�
	!
��		%	��	
	$	��		'	��		(	��	 	(	$��	)	(	��	*	)	��	-	)	 ��	7	)	<��	9	)	��	9	'	
��	B	*	��	y	,	���	2	���	4	���	3	���	5	���	5	���	5	���	3	���	6	���	7	���	8	���	8	3���	8	���	7	���	6	���	9	���	3	���	:	���	:	���	;	��	;	��	<	��	#	��	#	��	#	��'	<	��*	?	%��.	>	��/	@	"��2	@	7��8	@	3��O	@	"��O	@	��T	C	��Z	C	&��[	#	��g	#	��r	#	���	C	���	>	���	F	#���	F	6���	F	F���	F	6���	F	#���	F	���	H	#���	I	(���	J	)���	K	-���	I	(���	F	���	N	���	O	���	#	��	#	��	#	��	N	��*	P	��4	P	��4	2	��6	2	 ��>	2	��?	Q		��N	@gnamegprogram-callee-rev-vars�C4R24h�]45$6C�gproc
		gfilenamefsystem/xref.scm�
	S
��		U	��	
	T	��		U	��		V		��		gnamegprocedure-callee-rev-vars�C<R<hHY]"0(C�$���"����"���45"���Qgprog
		Fgin		6gout			6gfilenamefsystem/xref.scm�
	X
��		Z	��		[	��		\	��		\	��		[	��		]	��		]	,��		]	��	!	]	��	)	]	��	,	^	��	6	^	��	6	Z	��	7	Z	��	>	Z	6��	F	Z	��		Fgnamegprocedure-callees�g
documentationf1Evaluates to a list of the given program callees.�CR=R4>i5?R@RCRDE@hH�]	4545$"45$"�$	� CC�gm
		Agname			Agfilenamefsystem/xref.scm�
	h
��		i	��			i	��		j	��		j	��		k	��	*	j	��	2	l	
��	6	j	��	;	m	 ��	=	m	��		Agnamegon-module-modified�CFRG=HEIhhE]45$=45$45$C���C�66=gcallee
		bgcaller		bgmod-name			bgall-callers			bgcallers			Pgfilenamefsystem/xref.scm�
	o
��		p	��		p	��		q	��		s	��		s	��	$	t	
��	%	u	��	1	u	��	:	v	1��	;	v	$��	<	v	��	K	x	 ��	N	x	��	P	w	��	]	r	(��	b	r	��		b	gnameg
add-caller�CJRI=KGh �]44556�gcallee
		gmod-name		gfilenamefsystem/xref.scm�
	z
��			|	
��		|	��		|	;��		|	��		|	
��		{	��			gnamegforget-callers�CLRM?NOh �]44556�gcallees
		gmod-name		gfilenamefsystem/xref.scm�
	~
��		�	
��	�	��	�	D��	�	��	�	
��			��			gnamegadd-callees�CPRQ//Lha]L6Ygcallee
		
gfilenamefsystem/xref.scm�
�	��	
�	��		
CO?Qh0�]4O45>"G6�gm
		)gfilenamefsystem/xref.scm�
�	��	�	��	
�	��	�	.��	�	��	�	��	)�	��		)gnameguntaint�C@h0�]4>"G4>"G Czgfilenamefsystem/xref.scm�
�
��	�	��	�	��	(�	��	*�	��		,
gnameguntaint-modules�CRR:SI&FTUDVGWIXY</Jha]LL6Ygcallee
		gfilenamefsystem/xref.scm�
�	��	�	��		CP
h�9]$�M$
4M5"$C45$RM$4M>"G"44554LO>"G	L6CC1gsym
	�gvar	�gx		�gt		"�gcallees		e�gfilenamefsystem/xref.scm�
�	��	�	
��		�	��	�	��	�	
��	�	��	�	��	"�	��	.�	��	8�	��	>�	��	?�	��	X�	��	]�	%��	e�	��	e�	��	h�	����	��	�	CG
h��]
"vM$4M>"G"4455$"4>"G454LO>"GL6M$4	M5$C"��q"��m�gname
	�gsub	�gname		V	vgfilenamefsystem/xref.scm�
�	��	�	��	
�	��	&�	��	+�	(��	3�	��	7�	��	<�	
��	P�	��	V�	��	Y�	��	|�	��	|�		����	����	��	�	CZh�]LLO456|gmod
		gfilenamefsystem/xref.scm�
�	��	�	��	�	��		gnamegvisit-submodules�C=>I&FTUDVGWIXY</Jha]LL6Ygcallee
		gfilenamefsystem/xref.scm�
�	��	�	��		CP
h�9]$�M$
4M5"$C45$RM$4M>"G"44554LO>"G	L6CC1gsym
	�gvar	�gx		�gt		"�gcallees		e�gfilenamefsystem/xref.scm�
�	��	�	
��		�	��	�	��	�	
��	�	��	�	��	"�	��	.�	��	8�	��	>�	��	?�	��	X�	��	]�	%��	e�	��	e�	��	h�	����	��	�	C
h��]!$45"HOQ$"�$4�5 4�5K456$aJ$4J>"G"4455$"4	>"G4
5O6C�gmod-name
	�gmod	�gvisited		�gvisit-submodules		"�gname	��gfilenamefsystem/xref.scm�
�
��	�	
��		�	��	�	��	/�	��	7�	��	;�	��	<�	��	E�	��	F�	��	O�	��	R�	��	U�	-��	X�	��	Z�	��	`�	��	f�	��	g�	����	����	(����	����	����	
����	����	����	��	�gnamegensure-callers-db�CQR56[:\]RG=
hxN]45$"I�$4455"2�$"��4455"	454>"G	6Fgvar
		wgvx	7	Ogvy		7	Ogv	\	wgfilenamefsystem/xref.scm�
�
��	�	��	
�	��	�	��	�	��	�	 ��	�	1��	&�	 ��	-�	��	<�	��	?�	&��	I�	��	T�	��	X�	��	\�	��	\�	��	_�	��	u�	��	w�	��		wgnamegprocedure-callers�g
documentationf�Returns an association list, keyed by module name, of known callers
of the given procedure. The latter can specified directly as a
variable, a symbol (which gets resolved in the current module) or a
pair of the form (module-name . variable-name), �CR2^h�]45$6C�gproc
		gfilenamefsystem/xref.scm�
�
��	�	��	
�	��	�	��	�		��		gnamegprocedure-sources�C_R`RaR4>i5bRcRDEchH�]	4545$"45$"�$	� CC�gm
		Agname			Agfilenamefsystem/xref.scm�
�
��	�	��		�	��	�	��	�	��	�	��	*�	��	2�	
��	6�	��	;�	 ��	=�	��		Agnamegon-source-modified�CdRO>MefhX=]45$""454>"G45�65gproc
		Ugfile		Ugline			Ugdb			Ugt			>gtable			;g
file-table		>	Ugfilenamefsystem/xref.scm�
�
��	�	��	�	��	�	%��	�	��	!�	��	>�	��	I�	��	P�	6��	R�	��	S�	��	U�	��
		U	gnameg
add-source�CgROhfeihHC]45$,4455�$
66C;gproc
		Agfile		Agline			Agdb			Ag
file-table			Agprocs		$	?gfilenamefsystem/xref.scm�
�
��	�	��	�	��	�	��	�	��	�	 ��	 �	;��	"�	 ��	$�	��	$�	��	)�	��	-�	
��	7�	��	?�	��		A	gnameg
forget-source�CjR_IOb>M/g\khX�]!�$F���$.���$��LL6666�gsource
		Wgvy		Ogvx			Ggvy			Ggvx		-	?gfilenamefsystem/xref.scm�
�	��		��	?	��	C	%��	G	��	K	%��	O	��	S	%��	W	��
		WCWl`h p]45$
L6Chgobj
		gfilenamefsystem/xref.scm�
	��		��	
	��		��		C2m'nh��]45�$o445$""454>"G>"G4O>"G"	O4
5$445
5"$"6�gproc
	�gmod-name	�gdb		�gsources			�gt			Qgtable		1	Ngt	��gfilenamefsystem/xref.scm�
�
��	�	��		�	��	�	��	�	��	�	
��	�	��	�	��	-�	'��	1�	��	4�	��	Z�	
��	c�	
���		���		���
	���
	���
	���		���	���	��	�	gnamegadd-sources�ClROb/j\khX�]!�$F���$.���$��LL6666�gsource
		Wgvy		Ogvx			Ggvy			Ggvx		-	?gfilenamefsystem/xref.scm�
	��		��	?	��	C	%��	G	��	K	%��	O	��	S	%��	W	��
		WCGoWp`h p]45$
L6Chgobj
		gfilenamefsystem/xref.scm�
	��		��	
	��		��		C2m'nh�]]45$r4O45>"G4>"GO45$4	4
55"$"6CUgproc
	�gmod-name	�gdb		�g	mod-table		�gt		q�gfilenamefsystem/xref.scm�

��		��		��		��		
��	 	��	'	.��	)	��	.	
��	7	
��	T	��	^	��	_	��	b	��	l	��	q	��� 	���	
��	�	gnamegforget-sources�CpRq//pah_]L6Wgproc
		gfilenamefsystem/xref.scm�
$	��	$	��		CObShk]Ccgproc
		gsources		gfilenamefsystem/xref.scm�
(	$��			CqhH�]	4O45$
45">"G6�gm
		Agt		.gfilenamefsystem/xref.scm�
#	��	$	��	
&	��	%	��	(	��	+)	��	3$	��	A*	��			Agnameguntaint�Cch0�]4>"G4>"G Czgfilenamefsystem/xref.scm�
"
��	+	��	,	��	(-	��	*-	��		,
gnameguntaint-sources�CrR&dTUDVWlah(�]
$45$
L6CC�gsym
		'gvar		'gx			%gfilenamefsystem/xref.scm�
5	��	6	
��		6		��	7	��	7	
��	8	��	8	��	#9	��			'	ChH�]	4455$"4>"G45O6�gmod
		Bgname	3	Bgfilenamefsystem/xref.scm�
0	��	1	
��	1	&��	1	
��	1	��	2	��	-3	��	33	��	B4	��
		Bgnamegvisit-module�C>SGIh@�]4M5$C4M>"G4L>"GM6�gname
		>gsub		>gfilenamefsystem/xref.scm�
B		��	C	��	C	��	E	��	'F	��	>G	��		>	CZh0�]M$"45NLLLO456zgmod
		)gfilenamefsystem/xref.scm�
>	��	?	��	
@	��	@	��	!H		��	)A	��		)Ca`>:hpJ]HHOK$"$"�$4�5 4�5 J456$456CBgmod-name
		kgvisit-submodules		kgvisit-module				kgvisited		
	gfilenamefsystem/xref.scm�
/
��	
=	��	"J		��	5J	0��	9J	��	:K	$��	CK		��	DL	��	ML		��	PM	��	SM	+��	VM	��	XM		��	^J	��	aN	 ��	iN	��		kgnamegensure-sources-db�CqR>S/GIhH�]	4L5$&L��$	L�"L��$L�CCLLL�6�gproc
		Fgt		Fgfilenamefsystem/xref.scm�
U	��	W	��	V	
��	Y	��	Y	��	Y	��	"Z	��	+[	��	,[	��	0[	��	5\	��	D^	$��	F^	��		FChr]LO6jgline
		gprocs		gfilenamefsystem/xref.scm�
S	��	T	��			Cstuh}]�����Cugx
		gy		gfilenamefsystem/xref.scm�
b	��	b	��		b	%��	b	��			Ch8�]	454O>"G456�g
file-table
		1granges		1gfilenamefsystem/xref.scm�
P
��	Q	��	Q	��	
R	��	%a	��	1a	��		1gnameg
lines->ranges�CvROwvh��]45"O(6"
�"�������$"����$����"���"���"���$45""����g
canon-file
		{gline		{gdb			{g
file-table			{granges			`gprocs			`gfilenamefsystem/xref.scm�
d
��	e	��	e	��	f	��	h	��	i	��	$m	��	.m	��	.h	��	1j	��	6j	��	:h	��	?j	 ��	Bj	��	Ik	��	Lk	��	Pk	��	Xk	��	`f	��	ff	��	gf	$��	rf	?��	sg	��	{f	��		{	gnameglookup-source-procedures�CxR{|q}��hL]L6Dgfilenamefsystem/xref.scm�
r	��	r	%��		
ChX-13CPgargs
			gfilenamefsystem/xref.scm�
r	��			


C�x`hh+-/03#4>"GY4O5Z$45"	
6#gfile
		egline		egcanonicalization			egport		D	egfile		Y	egfilenamefsystem/xref.scm�
o
��	o	<��	p	��	5r	��	Dq	��	Ls	��	Ms	��	Yq	��	et	��
		e	
gcanonicalizationS	�gnamegsource-closures�C R{|q}��hL]L6Dgfilenamefsystem/xref.scm�
y	��	y	%��		
ChX-13CPgargs
			gfilenamefsystem/xref.scm�
y	��			


C�xahh--/03#4>"GY4O5Z$45"	
6%gfile
		egline		egcanonicalization			egport		D	egfile		Y	egfilenamefsystem/xref.scm�
v
��	v	>��	w	��	5y	��	Dx	��	Lz	��	Mz	��	Yx	��	e{	��
		e	
gcanonicalizationS	�gnamegsource-procedures�C!RC}gm
		,gfilenamefsystem/xref.scm�		
��	�	!
��
u	S
��,	X
��0	a
��1	c	��:	c
��;	e	��>	e
��@	g	��C	g
��
t	h
��@	o
��2	z
��%	~
��]�
��G�
�� 1�
�� ��
�� ��
��!�
��!�	��!�
��!
�	��!�
��"O�
��$�
��%��
��*�
��. 
��1
"
��6�/
��: P
��<kd
��>�o
��A�v
��%	A�
C6
© 2025 GrazzMean