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

name : srfi-69.go
GOOF----LE-8-2.0��]W4h�R]gguile�	�	gdefine-module*�	�	�	gsrfi�	gsrfi-69�	�		gfilenameS�	
fsrfi/srfi-69.scm�	gimportsS�	gsrfi-1�	
�	
�	gsrfi-9�	�	�	gsrfi-13�	�	�	gice-9�	goptargs�	�	�	�	gexportsS�	gmake-hash-table�	ghash-table?�	galist->hash-table�	ghash-table-equivalence-function�	ghash-table-hash-function�	 ghash-table-ref�	!ghash-table-ref/default�	"ghash-table-set!�	#ghash-table-delete!�	$ghash-table-exists?�	%ghash-table-update!�	&ghash-table-update!/default�	'ghash-table-size�	(ghash-table-keys�	)ghash-table-values�	*ghash-table-walk�	+ghash-table-fold�	,ghash-table->alist�	-ghash-table-copy�	.ghash-table-merge!�	/gstring-ci-hash�	0ghash-by-identity�	1 !"#$%&'()*+,-./0�	2g
re-exportsS�	3gstring-hash�	43�	5greplacementsS�	6ghash�	76�	8gset-current-module�	98�	:8�	;gcond-expand-provide�	<gcurrent-module�	=�	>gmake-syntax-transformer�	?>�	@>�	Aghashx-invoke�	Bgmacro�	Cg$sc-dispatch�	DC�	EC�	Fg_�	Ggany�	HFG��	Ig
syntax->datum�	JI�	KI�	Lg
datum->syntax�	ML�	NL�	Og
ht-associator�	Pg
ht-real-table�	Qgsyntax-violation�	RQ�	SQ�	Tf-source expression failed to match any pattern�	Ugwith-hashx-values�	Vglet�	Wgfirst�	Xgsecond�	Ygthird�	Zgmost-positive-fixnum�	[gcaller-with-default-size�	\6�	]6�	^gstring-hash-ci�	_ghashq�	`gsrfi-69:hash-table�	ag"%make-srfi-69-hash-table-procedure�	bgmake-srfi-69-hash-table�	cFGGGGGG�	dg
syntax-object�	eglambda�	fgm-46961e518c-31�	ggtop�	hfg�	igribcage�	jgt-46961e518c-2b�	kgt-46961e518c-2c�	lgt-46961e518c-2d�	mgt-46961e518c-2e�	ngt-46961e518c-2f�	ogt-46961e518c-30�	pjklmno�	qhhhhhh�	rfl-46961e518c-36�	sfl-46961e518c-37�	tfl-46961e518c-38�	ufl-46961e518c-39�	vfl-46961e518c-3a�	wfl-46961e518c-3b�	xrstuvw�	yipqx�	zi�	{gx�	|{�	}h�	~fl-46961e518c-33�	~��i|}��gshift��g	proc-name��gargs������g������fl-1e8ba8b5a-2ba��fl-1e8ba8b5a-2bb������i�����gkey��gvalue��gname��gformals��gbody����������������fl-1e8ba8b5a-2ad��fl-1e8ba8b5a-2ae��fl-1e8ba8b5a-2af��fl-1e8ba8b5a-2b0��fl-1e8ba8b5a-2b1���������i�����gmake-procedure-name��������fl-1e8ba8b5a-29d�����i��������fl-1e8ba8b5a-29c�����i|����hyz��zzzz����
��ghygiene�����de����g
real-table���yz������d�����g
associator��d�����gsize��d�����gweakness��d�����gequivalence-function��d�����g
hash-function��d�������������gmake-struct��gm-46961e518c-29���g��gt-1e8ba8b5a-38d��gt-1e8ba8b5a-38c��gt-1e8ba8b5a-38b�������gm-1e8ba8b5a-38e���g�������fl-1e8ba8b5a-392��fl-1e8ba8b5a-393��fl-1e8ba8b5a-394�������i�����g	ctor-args�����fl-1e8ba8b5a-37a�����i�����gctor��gfield������fl-1e8ba8b5a-376��fl-1e8ba8b5a-377������i�����gform��g	type-name��gconstructor-spec��gfield-names��������������fl-1e8ba8b5a-36b��fl-1e8ba8b5a-36c��fl-1e8ba8b5a-36d��fl-1e8ba8b5a-36e��������i�����g
record-layout��gfunctional-setters��gsetters��gcopier��ggetters��gconstructor��ggetter-identifiers��gfield-identifiers����������������������fl-1e8ba8b5a-343��fl-1e8ba8b5a-341��fl-1e8ba8b5a-33f��fl-1e8ba8b5a-33d��fl-1e8ba8b5a-33b��fl-1e8ba8b5a-339��fl-1e8ba8b5a-337��fl-1e8ba8b5a-335������������i�����fl-1e8ba8b5a-334�����i|�����yz��z�zzz��z�����d�����d`����d
�������������	�������geach-any��F����Q��Q��fWrong number of arguments��gidentifier?������z��da��grecord-type-vtable���gpwpwpwpwpwpw�gdefault-record-printer�	�
��������gset-struct-vtable-name!�
��gvtable-offset-user���g%hash-table?-procedure�FG�gm-46961e518c-48�g�gt-46961e518c-47���fl-46961e518c-4d��i�fl-46961e518c-4a��i|�z�zzzz����
� de��!gobj�"gt-1e8ba8b5a-47e�#gt-1e8ba8b5a-478�$gt-1e8ba8b5a-479�%gt-1e8ba8b5a-47a�&gt-1e8ba8b5a-47d�'gt-1e8ba8b5a-47c�(gt-1e8ba8b5a-47b�)"#$%&'(�*gm-1e8ba8b5a-47f�+*g�,+++++++�-fl-1e8ba8b5a-483�.fl-1e8ba8b5a-484�/fl-1e8ba8b5a-485�0fl-1e8ba8b5a-486�1fl-1e8ba8b5a-487�2fl-1e8ba8b5a-488�3fl-1e8ba8b5a-489�4-./0123�5i),4�6g	copier-id�76�8fl-1e8ba8b5a-476�98�:i7�9�;g	ctor-name�<;�=fl-1e8ba8b5a-46e�>=�?i<�>�@��Afl-1e8ba8b5a-46c�BA�Ci@�B�Dglayout�ED�Ffl-1e8ba8b5a-46a�GF�HiE�G�Ig
immutable?�JI�Kfl-1e8ba8b5a-468�LK�MiJ�L�Ngfield-count�ON�Pfl-1e8ba8b5a-466�QP�RiO�Q�Sg
getter-ids�TS�Ufl-1e8ba8b5a-463�VU�WiT�V�Xg	field-ids�YX�Zfl-1e8ba8b5a-460�[Z�\iY�[�]gpredicate-name�^g
field-spec�_I���]^�`�������afl-1e8ba8b5a-453�bfl-1e8ba8b5a-454�cfl-1e8ba8b5a-455�dfl-1e8ba8b5a-456�efl-1e8ba8b5a-457�ffl-1e8ba8b5a-458�gabcdef�hi_`g�i�z�z5zzzz:z?zCzHzMzRzWz\h���jd!i��kj�lgand�mdli��ngstruct?�odni��poj�qgeq?�rdqi��sg
struct-vtable�tdsi��utj�v�z�wd`v��xruw�ympx�z ky�{�z�|d{��}gthrow-bad-struct�~}�}��g%ht-real-table-procedure��gfree-id��g
%%on-error��gm-46961e518c-54���g�����fl-46961e518c-56�����i|�����z��zzzz������d����������G��g%%type��gt-1e8ba8b5a-3a5��gt-1e8ba8b5a-3a6��gt-1e8ba8b5a-3a7��gt-1e8ba8b5a-3a8��gt-1e8ba8b5a-3a9��gt-1e8ba8b5a-3aa��gt-1e8ba8b5a-3ab�����������gm-1e8ba8b5a-3ac���g�����������fl-1e8ba8b5a-3b0��fl-1e8ba8b5a-3b1��fl-1e8ba8b5a-3b2��fl-1e8ba8b5a-3b3��fl-1e8ba8b5a-3b4��fl-1e8ba8b5a-3b5��fl-1e8ba8b5a-3b6�����������i�����ggetter��gindex������fl-1e8ba8b5a-3a3��fl-1e8ba8b5a-3a4������i������S6�������fl-1e8ba8b5a-39e��fl-1e8ba8b5a-39f��fl-1e8ba8b5a-3a0�������i������z��z�zzz�z�����d���������F��G��gck��gerr��gs����������fl-46961e518c-59��fl-46961e518c-5a������i�������z��zzzz����
��d�����gquote��d�������z���d`�����������g%%index��d���������F��G��fl-46961e518c-5e��fl-46961e518c-5f������i�������z��zzzz����
��d�����d������z���d
�����������g%%copier��d���������F��G��fl-46961e518c-63��fl-46961e518c-64������i�������z��zzzz����
��d�����d�����g%%srfi-69:hash-table-set-fields����z���d������������gt-46961e518c-53�����fl-46961e518c-68�����i�������z��zzzz����
��de������z��z�zzz�z�����d��������gif��d�����dq����ds����������z���d`���������g
struct-ref��d������z���d
���������d}����d�����dP���������������������z��d���g%ht-associator-procedure�gm-46961e518c-6f�g��fl-46961e518c-71�	�
i|	�z
�zzzz�����d���
��
G��z
�z�zzz�z����d�����FG��fl-46961e518c-74�fl-46961e518c-75��i��z
�zzzz����
�d���d����z
�d`����d��� ��!F G�"fl-46961e518c-79�#fl-46961e518c-7a�$"#�%i�$�&%z
�zzzz����
�'d�&��(d�&��)%z
�*d)��+(*�,+�-d���.�-�/F.G�0fl-46961e518c-7e�1fl-46961e518c-7f�201�3i�2�43z
�zzzz����
�5d�4��6d�4��7�3z
�8d�7��968�:9�;gt-46961e518c-6e�<;�=fl-46961e518c-83�>=�?i<>�@?z
�zzzz����
�Ade@��B�?z
�z�zzz�z����Cd�B��DC�Ed�B��FdqB��GdsB��HGC�I�?z
�Jd`I��KFHJ�Ld�B��M?z
�NdM��OLCN�Pd}B��Qd�B��RdOI��SQR�TPCS�UEKOT�VADU�W�z
�XdW��Yght-size�Zg%ht-size-procedure�[gm-46961e518c-8a�\[g�]\�^fl-46961e518c-8c�_^�`i|]_�a\z`�zzzz�����bd�a��c�b�dcG�e�z`�z�zzz�z����fd�e��g�f�hFdgG�i\\�jfl-46961e518c-8f�kfl-46961e518c-90�ljk�mi�il�n\mz`�zzzz����
�od�n��pd�n��q�mz`�rd`q��spr�ts�ud�e��v�u�wFdvG�xfl-46961e518c-94�yfl-46961e518c-95�zxy�{i�iz�|\{z`�zzzz����
�}d�|��~d�|��{z`��d	���~������d�e�������Fd�G��fl-46961e518c-99��fl-46961e518c-9a������i�i���\�z`�zzzz����
��d�����d�������z`��d������������gt-46961e518c-89�����fl-46961e518c-9e�����i�]���\�z`�zzzz����
��de������z`�z�zzz�z�����d��������d�����dq����ds����������z`��d`���������d������z`��d	���������d}����d�����dY�������������������������z`��dZ����ght-weakness��g%ht-weakness-procedure��gm-46961e518c-a5���g�����fl-46961e518c-a7�����i|�����z��zzzz������d����������G���z��z�zzz�z�����d���������F��G������fl-46961e518c-aa��fl-46961e518c-ab������i�������z��zzzz����
��d�����d�������z���d`�����������d���������F��G��fl-46961e518c-af��fl-46961e518c-b0������i�������z��zzzz����
��d�����d������z���d	�����������d���������F��G��fl-46961e518c-b4��fl-46961e518c-b5������i�������z��zzzz����
��d�����d�������z���d������������gt-46961e518c-a4�����fl-46961e518c-b9�����i�������z��zzzz����
��de������z��z�zzz�z�����d��������d�����dq����ds����������z���d`���������d������z���d	���������d}����d�����d��������������������z��d���g*%hash-table-equivalence-function-procedure�gm-46961e518c-c0�g��	fl-46961e518c-c2�
	�i|
�z�zzzz�����
d����
�G��z�z�zzz�z����d�����FG��fl-46961e518c-c5�fl-46961e518c-c6��i��z�zzzz����
�d���d����z�d`���� d���!� �"F!G�#fl-46961e518c-ca�$fl-46961e518c-cb�%#$�&i�%�'&z�zzzz����
�(d�'��)d�'��*&z�+d	*��,)+�-,�.d���/�.�0F/G�1fl-46961e518c-cf�2fl-46961e518c-d0�312�4i�3�54z�zzzz����
�6d�5��7d�5��8�4z�9d�8��:79�;:�<gt-46961e518c-bf�=<�>fl-46961e518c-d4�?>�@i=?�A@z�zzzz����
�BdeA��C�@z�z�zzz�z����Dd�C��ED�Fd�C��GdqC��HdsC��IHD�J�@z�Kd`J��LGIK�Md�C��N@z�Od	N��PMDO�Qd}C��Rd�C��SdJ��TRS�UQDT�VFLPU�WBEV�X�z�YdX��Zg#%hash-table-hash-function-procedure�[gm-46961e518c-db�\[g�]\�^fl-46961e518c-dd�_^�`i|]_�a\z`�zzzz�����bd�a��c�b�dcG�e�z`�z�zzz�z����fd�e��g�f�hFdgG�i\\�jfl-46961e518c-e0�kfl-46961e518c-e1�ljk�mi�il�n\mz`�zzzz����
�od�n��pd�n��q�mz`�rd`q��spr�ts�ud�e��v�u�wFdvG�xfl-46961e518c-e5�yfl-46961e518c-e6�zxy�{i�iz�|\{z`�zzzz����
�}d�|��~d�|��{z`��d	���~������d�e�������Fd�G��fl-46961e518c-ea��fl-46961e518c-eb������i�i���\�z`�zzzz����
��d�����d�������z`��d������������gt-46961e518c-da�����fl-46961e518c-ef�����i�]���\�z`�zzzz����
��de������z`�z�zzz�z�����d��������d�����dq����ds����������z`��d`���������d������z`��d	���������d}����d�����d�������������������������z`��dZ����geach��GG������G����G����G����g%%set-fields��gdummy��gcheck?��gexpr���������gm-46961e518c-f6���g���������fl-46961e518c-fb��fl-46961e518c-fc��fl-46961e518c-fd��fl-46961e518c-fe��fl-46961e518c-ff���������i��������fl-46961e518c-f8�����i|����gt-1e8ba8b5a-3c4��gt-1e8ba8b5a-3c6��gt-1e8ba8b5a-3c5�������gm-1e8ba8b5a-3c7���g�������fl-1e8ba8b5a-3cb��fl-1e8ba8b5a-3cc��fl-1e8ba8b5a-3cd�������i�����fl-1e8ba8b5a-3c1��fl-1e8ba8b5a-3c2��fl-1e8ba8b5a-3c3�������i�������z��z�zzz���
��d�������z���d`����dP����dO����dY����d�����d����d������������gmap��������glist��ght-size!��g%ht-size!-procedure��FGG��gm-46961e518c-10a���g��gt-46961e518c-108��gt-46961e518c-109����������fl-46961e518c-10f��fl-46961e518c-110������i��������fl-46961e518c-10c�����i|������z��zzzz����
��de����gt-1e8ba8b5a-3e6��gt-1e8ba8b5a-3e7������gm-1e8ba8b5a-3e8���g����fl-1e8ba8b5a-3ec�fl-1e8ba8b5a-3ed��i��gsetter����fl-1e8ba8b5a-3e0�fl-1e8ba8b5a-3e1�	fl-1e8ba8b5a-3e2�
	�i�
�^��
fl-1e8ba8b5a-3d7�fl-1e8ba8b5a-3d8�
�i��gfield-specs���fl-1e8ba8b5a-3d3�fl-1e8ba8b5a-3d4��i����z��zzz���d���gval�d���d���dq��ds��� ��z��!d` ��"!�#gstruct-set!�$d#��%�z��&d	%��'$&�(d}��)d���*d� ��+)*�,(+�-"',�.�-�/�z��0d�/��1gequal?�2geqv?�3ghashv�4gstring=?�5gstring-ci=?�6gguess-hash-function�7greverse!�8gkeyword?�9gwithout-keyword-args�:�;�<gmake-weak-key-hash-table�=gmake-weak-value-hash-table�>gkey-or-value�?gmake-doubly-weak-hash-table�@gerror�AfInvalid weak hash table type�Bg
guile-ht-ctor�Cgassoc�DC�EC�Fgassq�Ggassv�Hgequivalence-proc->associator�IgweakS�JI	��KJ�Lgfor-each�Mghashx-get-handle�Ng
hashx-set!�Ofht-value�Pght-unspecified�Qg	hashx-ref�RfKey not in table�Sghashx-create-handle!�Tg
hashx-remove!�Ug	hash-fold�Vg
alist-cons�C5h�]�]4	
1245754:>"G4;i4<i5=>"G4@ABEHKNOPh(�-13����C�g
hashx-proc
			'ght-var			'gargs				'gfilenamefsrfi/srfi-69.scm�
	a
��	
	d	��			'	
	Chd]	45L4?6\gargs
		gv			gfilenamefsrfi/srfi-69.scm�		a
��		CSTh(!]	45$O@6gy
		'gtmp		'gfilenamefsrfi/srfi-69.scm�
	a
��		'g
documentationfrInvoke HASHX-PROC, a `hashx-*' procedure taking a hash-function,
assoc-function, and the hash-table as first args.�g
macro-typegdefmacro�g
defmacro-argsgargsC5AR4@UBEHKNVWXOYPhH�-13454545��C�gbindings
			Fght-var			Fg
body-forms				Fgfilenamefsrfi/srfi-69.scm�
	i
��		l	��		l	��		l	��		m	��	%	l	��	.	n	��	6	l	��				F	
	Chd]	45L4?6\gargs
		gv			gfilenamefsrfi/srfi-69.scm�		i
��		CSTh(]	45$O@6
gy
		'gtmp		'gfilenamefsrfi/srfi-69.scm�
	i
��		'g
documentationffBind BINDINGS to the hash-function, associator, and real-table of
HT-VAR, while evaluating BODY-FORMS.�g
macro-typegdefmacro�g
defmacro-argsgargsC5URZh o-.,3#L6ggobj
		gsize		gfilenamefsrfi/srfi-69.scm�
	z	��		{	��		Ch]OC�ghash-fn
		
gfilenamefsrfi/srfi-69.scm�
	w
��		
gnamegcaller-with-default-size�g
documentationfnAnswer a function that makes `most-positive-fixnum' the default
second argument to HASH-FN, a 2-arg procedure.�C[R4[i]56R^i/R4[i_i50R`h]�Cg
real-table
		g
associator		gsize			gweakness			gequivalence-function			g
hash-function			gfilenamefsrfi/srfi-69.scm�
�
��			gnameg"%make-srfi-69-hash-table-procedure�CaR4@bBEc�h�]C�gt-46961e518c-2b
		gt-46961e518c-2c		gt-46961e518c-2d			gt-46961e518c-2e			gt-46961e518c-2f			gt-46961e518c-30						C��b�hT]L6Lga
		gfilenamefsrfi/srfi-69.scm�	�
��		CFhD]L6<gfilenamefsrfi/srfi-69.scm�	�
��		
Ch]C		
CSThp�]45$@45$O@45$4O?$@	
6	
6}gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsrfi/srfi-69.scm�
�
��		nC5bR
`�4`>"G	�ai�`R`hx]�$��CCpgobj
		gfilenamefsrfi/srfi-69.scm�
�
��		gnameg%hash-table?-procedure�CR4@BEzh7]C/gt-46961e518c-47
		
		
C���hT]L6Lga
		gfilenamefsrfi/srfi-69.scm�	�
��		CFhD]L6<gfilenamefsrfi/srfi-69.scm�	�
��		
C|h]C		
CSThp�]45$@45$O@45$4O?$@	
6	
6}gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsrfi/srfi-69.scm�
�
��		nC5R`Phx]�&
�C6pgs
		gfilenamefsrfi/srfi-69.scm�
�
��		gnameg%ht-real-table-procedure�C�R4@PBE���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					Ch7]C/gt-46961e518c-53
		
		
C��P�hT]L6Lga
		gfilenamefsrfi/srfi-69.scm�	�
��		CFhD]L6<gfilenamefsrfi/srfi-69.scm�	�
��		
Ch]C		
CSTh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsrfi/srfi-69.scm�
�
��	�C5PR`Ohx]�&�C6pgs
		gfilenamefsrfi/srfi-69.scm�
�
��		gnameg%ht-associator-procedure�CR4@OBEh:]��C2gerr
		gs					C!',h:]��C2gerr
		gs					C/5:h:]��C2gerr
		gs					CVh7]C/gt-46961e518c-6e
		
		
C��O�hT]L6Lga
		gfilenamefsrfi/srfi-69.scm�	�
��		CFhD]L6<gfilenamefsrfi/srfi-69.scm�	�
��		
CXh]C		
CSTh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsrfi/srfi-69.scm�
�
��	�C5OR`Yh r]�&	�C6jgs
		gfilenamefsrfi/srfi-69.scm�
�
��		gnameg%ht-size-procedure�CZR4@YBEhoth:]��C2gerr
		gs					Cw}�h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C�h7]C/gt-46961e518c-89
		
		
C��Y�hT]L6Lga
		gfilenamefsrfi/srfi-69.scm�	�
��		CFhD]L6<gfilenamefsrfi/srfi-69.scm�	�
��		
C�h]C		
CSTh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsrfi/srfi-69.scm�
�
��	�C5YR`�h v]�&	�C6ngs
		gfilenamefsrfi/srfi-69.scm�
�
��		gnameg%ht-weakness-procedure�C�R4@�BE���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					Ch7]C/gt-46961e518c-a4
		
		
C����hT]L6Lga
		gfilenamefsrfi/srfi-69.scm�	�
��		CFhD]L6<gfilenamefsrfi/srfi-69.scm�	�
��		
Ch]C		
CSTh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsrfi/srfi-69.scm�
�
��	�C5�R`h �]�&	�C6�gs
		gfilenamefsrfi/srfi-69.scm�
�
��		gnameg*%hash-table-equivalence-function-procedure�CR4@BEh:]��C2gerr
		gs					C"(-h:]��C2gerr
		gs					C06;h:]��C2gerr
		gs					CWh7]C/gt-46961e518c-bf
		
		
C���hT]L6Lga
		gfilenamefsrfi/srfi-69.scm�	�
��		CFhD]L6<gfilenamefsrfi/srfi-69.scm�	�
��		
CYh]C		
CSTh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsrfi/srfi-69.scm�
�
��	�C5R`h �]�&	�C6{gs
		gfilenamefsrfi/srfi-69.scm�
�
��		gnameg#%hash-table-hash-function-procedure�CZR4@BEhoth:]��C2gerr
		gs					Cw}�h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C�h7]C/gt-46961e518c-da
		
		
C���hT]L6Lga
		gfilenamefsrfi/srfi-69.scm�	�
��		CFhD]L6<gfilenamefsrfi/srfi-69.scm�	�
��		
C�h]C		
CSTh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsrfi/srfi-69.scm�
�
��	�C5R4@�BE������h v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						CSTh(�]	45$@6�gx
		"gtmp		"gfilenamefsrfi/srfi-69.scm�
�
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5�R`�h �]�&	�C6|gs
		gval		gfilenamefsrfi/srfi-69.scm�
�
��			gnameg%ht-size!-procedure�C�R4@�BE�.hV]CNgt-46961e518c-108
		gt-46961e518c-109					C����hT]L6Lga
		gfilenamefsrfi/srfi-69.scm�	�
��		CFhD]L6<gfilenamefsrfi/srfi-69.scm�	�
��		
C0h]C		
CSThp�]45$@45$O@45$4O?$@	
6	
6}gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsrfi/srfi-69.scm�
�
��		nC5�R1]q_23435/h@]&C&C&C&C	&
CC�g
equal-proc
		<gfilenamefsrfi/srfi-69.scm�
�
��	
�	��		<gnamegguess-hash-function�g
documentationflGuess a hash function for EQUAL-PROC, falling back on `hash', as
specified in SRFI-69 for `make-hash-table'.�C6R78WhP�]"?(64455$��"���45��"���"����g	rest-list
		Pgacc		Eg	rest-list			Egfilenamefsrfi/srfi-69.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	"�	��	'�	��	0�	��	1�	��	:�	��	=�	1��	E�	��	E�	��	F�	��	P�	��		Pgnamegwithout-keyword-args�g
documentationfMAnswer REST-LIST with all keywords removed along with items that
follow them.�C9R;�<�=>?@A
h@�]�$C�$C�$C�$C	6�gweakness
		9gfilenamefsrfi/srfi-69.scm�
�
��	
�	��	5�	��	9�	
��		9gnameg
guile-ht-ctor�g
documentationf7Answer the Guile HT constructor for the given WEAKNESS.�CBR14EqF2GChs]L6kgitem
		galist		gfilenamefsrfi/srfi-69.scm�
�	��	�	��			C	h@]&"�$C&C&COCg
equal-proc
		9gfilenamefsrfi/srfi-69.scm�
�
��	
�		��	�	
��	�	
��	�	��		9gnamegequivalence-proc->associator�g
documentationf^Answer an `assoc'-like procedure that compares the argument key to
alist keys with EQUAL-PROC.�CHRK16B9H`hh�-/023##	45#44545?45
�C�g
equal-proc
		gg	hash-proc		ggweak			gg
guile-opts			gg
real-table		R	gg
associator		R	ggfilenamefsrfi/srfi-69.scm�
�
��	)�	��	;�	��	<�	
��	C�	��	K�	��	L�	��	R�	��			g
		gweakS	�gnamegmake-hash-table�g
documentationf�Answer a new hash table using EQUAL-PROC as the comparison
function, and HASH-PROC as the hash function.  See the reference
manual for specifics, of which there are many.�CR`YOPLMNh0�]	4LLL�5$CM�NLLL��6�gpair
		/ghandle		/gfilenamefsrfi/srfi-69.scm�
�	��	�	 ��	�	=��	�	 ��	�	��	�	��	�	&��	�	��	*�	'��	-�	2��	/�	��		/C�h��-134?�&		�"	45H�&		�"	45�&�"	45�&
�"	454	O>"GJ�&	�"4
>"GC�galist
		�gmht-args		�gresult		�gsize		-�g	hash-proc		~�g
associator		~�g
real-table		~�gval	��gfilenamefsrfi/srfi-69.scm�
�
��	
�	��	�	��	�	��	-�	��	~�	����	����	��			�
gnamegalist->hash-table�g
documentationf4Convert ALIST to a hash table created with MHT-ARGS.�CRO�PRQ`OPPW@Rh��-134�&		�"	45�&�"	45�&
�"	455&�$	456	
6C�ght
		�gkey		�gdefault-thunk-lst			�gresult		a�gfilenamefsrfi/srfi-69.scm�
�
��	
�	��	a�	��	k�	��	n�	��	r�	��	s�	
��	{�	��	�	����	��		�	
	gnameghash-table-ref�g
documentationf�Lookup KEY in HT and answer the value, invoke DEFAULT-THUNK if KEY
isn't present, or signal an error if DEFAULT-THUNK isn't provided.�C RQ`OPh`]�&		�"	45�&�"	45�&
�"	456ght
		Ygkey		Ygdefault			Ygfilenamefsrfi/srfi-69.scm�
�
��	Y�	��		Y	gnameghash-table-ref/default�g
documentationfLLookup KEY in HT and answer the value.  Answer DEFAULT if KEY isn't
present.�C!RS`OPPY�
h�@]4�&		�"	45�&�"	45�&
�"	455�&N�&		�"	45��&	�"4	>"G"�C8ght
	�gkey	�g	new-value		�ghandle		Z�gval	��gfilenamefsrfi/srfi-69.scm�
�
��	�	��	Z�	��	a�	��	e�	��	h�	����	����	����	��
	�	gnameghash-table-set!�g
documentationfSet KEY to NEW-VALUE in HT.�C"R`OPMY�T
h�G]"�&		�"	45�&�"	45�&
�"	4545$f�&		�"	45��&	�"4>"G4	>"G"C?ght
	�gkey	�gh		Q�ga		Q�greal-ht		Q�gval	��gfilenamefsrfi/srfi-69.scm�
�
��	Q�	��	X�	��	h�	��	k�	����	����	
����	
��		�	gnameghash-table-delete!�g
documentationfRemove KEY's association in HT.�C#RM`OPh`�]4�&		�"	45�&�"	45�&
�"	455$CC�ght
		`gkey		`gfilenamefsrfi/srfi-69.scm�
�
��		��	\	��		`	gnameghash-table-exists?�g
documentationf"Return whether KEY is a key in HT.�C$R`OPMN@RY�h�-13	�&		�"	45�&�"	45�&
�"	4545$4�5�"�4�$44�55"4	5>"G�&		�"	4
5��&	�"4>"GC�ght
		gkey		gmodifier			gdefault-thunk-lst			g	hash-proc		Xg
associator		Xg
real-table		Xghandle		kgval	�	gfilenamefsrfi/srfi-69.scm�

��	X
	��	_	��	k	��	s	��	v
	��	{
	(��	}
	��	~
	
���	
���	���	���	���	'���	(���	'���	���	���	$���	���	
���	���	���	
��			
	gnameghash-table-update!�g
documentationf�Modify HT's value at KEY by passing its value to MODIFIER and
setting it to the result thereof.  Invoke DEFAULT-THUNK for the old
value if KEY isn't in HT, or signal an error if DEFAULT-THUNK is not
provided.�C%R%hD]LC<gfilenamefsrfi/srfi-69.scm�
	&��		
Ch^]O6Vght
		gkey		gmodifier			gdefault			gfilenamefsrfi/srfi-69.scm�

��		��			gnameghash-table-update!/default�g
documentationf�Modify HT's value at KEY by passing its old value, or DEFAULT if it
doesn't have one, to MODIFIER, and setting it to the result thereof.�C&R`�+h}]�Cugk
		gv		gans			gfilenamefsrfi/srfi-69.scm�
!	��	!	,��			CYhH-]�&		�"	45$	
6�&	�C6%ght
		Agfilenamefsrfi/srfi-69.scm�

��	 	��	! 	��	*!	��	-"	��		Agnameghash-table-size�g
documentationf�Return the number of associations in HT.  This is guaranteed O(1)
for tables where #:weak was #f or not specified at creation time.�C'R+h}]�Cugk
		gv		glst			gfilenamefsrfi/srfi-69.scm�
&	��	&	(��			Ch�]6�ght
		gfilenamefsrfi/srfi-69.scm�
$
��		&	6��	&	��		gnameghash-table-keys�g
documentationf Return a list of the keys in HT.�C(R+h}]�Cugk
		gv		glst			gfilenamefsrfi/srfi-69.scm�
*	��	*	(��			Ch�]6�ght
		gfilenamefsrfi/srfi-69.scm�
(
��		*	6��	*	��		gnameghash-table-values�g
documentationf"Return a list of the values in HT.�C)R+h�]4L>GC�gk
		gv		gunspec			gvals			gfilenamefsrfi/srfi-69.scm�
.	��	/	5��	/	��			Ch�]O6�ght
		gproc		gfilenamefsrfi/srfi-69.scm�
,
��	.	��			gnameghash-table-walk�g
documentationf3Call PROC with each key and value as two arguments.�C*RU`Ph(Z]�&
�"	456Rght
		$gf		$gknil			$gfilenamefsrfi/srfi-69.scm�
3
��	7	��	$7	��		$	gnameghash-table-fold�g
documentationf�Invoke (F KEY VAL PREV) for each KEY and VAL in HT, where PREV is
the result of the previous invocation, using KNIL as the first PREV.
Answer the final F result.�C+R+Vh�]6�ght
		gfilenamefsrfi/srfi-69.scm�
9
��		;	!��	;	��		gnameghash-table->alist�g
documentationfReturn an alist for HT.�C,R`OP'�BUNh}]LLL6ugk
		gv		gign			gfilenamefsrfi/srfi-69.scm�
B	��	B	#��			Ch��]9�&		�"	45�&�"	45�&
�"	4545�&		�"	4544554	
O>"G�&		�"	45�C�ght
	�gh	Q�ga		Q�greal-ht		Q�gsize		^�gweak		{�gnew-real-ht	��gequivalence-function	��gfilenamefsrfi/srfi-69.scm�
=
��	Q?	��	X@	��	^@	��	c@	-��	{@	��	~A	��	A	���A	���@	���B	���F	���D	��	�gnameghash-table-copy�g
documentationfAnswer a copy of HT.�C-R+"h}]L6ugk
		gv		gign			gfilenamefsrfi/srfi-69.scm�
L	��	L	��			Ch ]4O>"GC�ght
		gother-ht		gfilenamefsrfi/srfi-69.scm�
H
��	K	��			gnameghash-table-merge!�g
documentationf`Add all key/value pairs from OTHER-HT to HT, overriding HT's
mappings where present.  Return HT.�C.RC�gm
		4grtd
��gfilenamefsrfi/srfi-69.scm�		D
��	5	Z
��	:	Z	��	B	Z	&��	G	Z
���	w
���	}	
��	}
��	
���	���
��	S�
��3��
��5��
��78�
��9Q�
��;��
��?��
��?��	+��?��	��?��
��A��
��C��
��E��
��G��
��II�
��M�
��Oi
��Q�
��S$
��Tw(
��V/,
��W�3
��X�9
��[�=
��]�H
��%	]�
C6
© 2025 GrazzMean