Current File : /home/mmdealscpanel/yummmdeals.com/system.zip
PK*[=��M�Mxref.gonu�[���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�
C6PK*[�br>*?*?vm/trap-state.gonu�[���GOOF----LE-8-2.0?]�4hp]gguile�	�	gdefine-module*�	�	�	gsystem�	gvm�	g
trap-state�		�	
gfilenameS�	fsystem/vm/trap-state.scm�	gimportsS�	
gbase�	gsyntax�	
�	�	gsrfi�	gsrfi-1�	�	gselectS�	gfold�	�	�	�	�	gtraps�	�	�	gtrace�	�	�	 gframe�	! �	"!�	#gprogram�	$#�	%$�	&"%�	'gexportsS�	(g	add-trap!�	)g
list-traps�	*g
trap-enabled?�	+g	trap-name�	,genable-trap!�	-g
disable-trap!�	.gdelete-trap!�	/gwith-default-trap-handler�	0ginstall-trap-handler!�	1gadd-trap-at-procedure-call!�	2gadd-trace-at-procedure-call!�	3gadd-trap-at-source-location!�	4g#add-ephemeral-trap-at-frame-finish!�	5gadd-ephemeral-stepping-trap!�	6()*+,-./012345�	7gset-current-module�	87�	97�	:g
make-fluid�	;g%default-trap-handler�	<gwarn�	=fTrap with no handler installed�	>gdefault-trap-handler�	?gmake-record-type�	@f<trap-wrapper>�	Agindex�	Bgenabled?�	Cgtrap�	Dgname�	EABCD�	Fg<trap-wrapper>�	Ggmake-trap-wrapper�	Hgrecord-predicate�	Ig
trap-wrapper?�	Jgmake-procedure-with-setter�	Kgrecord-accessor�	Lgrecord-modifier�	Mgtrap-wrapper-index�	Ngtrap-wrapper-enabled?�	Ogtrap-wrapper-trap�	Pgtrap-wrapper-name�	Qf<trap-state>�	Rghandler�	Sgnext-idx�	Tgnext-ephemeral-idx�	Ugwrappers�	VRSTU�	Wg<trap-state>�	Xgmake-trap-state�	Ygtrap-state?�	Zgtrap-state-handler�	[gtrap-state-next-idx�	\gtrap-state-next-ephemeral-idx�	]gtrap-state-wrappers�	^gtrap-wrapper<?�	_gerror�	`fTrap already enabled�	agsetter�	ba�	ca�	dgenable-trap-wrapper!�	efTrap already disabled�	fgdisable-trap-wrapper!�	ggappend�	hgadd-trap-wrapper!�	igdelq�	jgremove-trap-wrapper!�	kgtrap-state->trace-level�	lf)no wrapper found with index in trap-state�	mgwrapper-at-index�	ngnext-index!�	ognext-ephemeral-index!�	pghandler-for-index�	qgephemeral-handler-for-index�	rgmake-weak-key-hash-table�	sg
*trap-states*�	tg	hashq-ref�	ug
hashq-set!�	vgtrap-state-for-vm�	wgthe-vm�	xgthe-trap-state�	ygset-vm-trace-level!�	zgmap�	{gand=>�	|gtrap-at-procedure-call�	}gformat�	~fBreakpoint at ~a�	gtrace-calls-to-procedure��gprefixS��f	Trap ~a: ��fTracepoint at ~a��gtrap-at-source-location��fBreakpoint at ~a:~a��gtrap-frame-finish��fReturn from ~a��f~a:~a:~a��gsource:file��funknown file��gsource:line-for-user��g
source:column��funknown source location��g
source-string��ginto?S���	���ginstruction?S���	�������gframe-next-source��gtrap-matching-instructions��g
frame-address��fStep to different instruction��f#Step to different instruction in ~a��fStep into ~a��fStep out of ~a�C5hX0�]4	
&'6549>"G4:i5;R;<=h(�][$
66�gframe
		#gidx		#g	trap-name			#gdefault-handler			#gfilenamefsystem/vm/trap-state.scm�
	1
��		2	��	
	3	��		4	��		5	��	#	5	��		#	gnamegdefault-trap-handler�C>R4?i@E5FRFh�-13�C�gindex
			genabled?			gtrap				gname				gdefrec-3703f9048699c1-8				gfilenamefsystem/vm/trap-state.scm�
	7
��				
	gnamegmake-trap-wrapper�CGR4HiFi5IR4Ji4KiFiA54LiFiA55MR4Ji4KiFiB54LiFiB55NR4Ji4KiFiC54LiFiC55OR4Ji4KiFiD54LiFiD55PR4?iQV5WR>Wh�9-13HJ("J�J�KJ(
"J�J�KJ(	�"J�J�KJ("J�J�K�C1gdefrec-3703f9048699c1-14
	
�g_x		(g_x	6	Bg_x	Q	]g_x	k	wghandler	w�gnext-idx		w�gnext-ephemeral-idx		w�gwrappers		w�	gfilenamefsystem/vm/trap-state.scm�
	=
��	d	A	��		�


gnamegmake-trap-state�CXR4HiWi5YR4Ji4KiWiR54LiWiR55ZR4Ji4KiWiS54LiWiS55[R4Ji4KiWiT54LiWiT55\R4Ji4KiWiU54LiWiU55]RMh�]4545�C�gt1
		gt2		gfilenamefsystem/vm/trap-state.scm�
	C
��		D	��	
	D	��		D	��			gnamegtrap-wrapper<?�C^RN_`MOchP�]	45$
4564544545>"G456�gwrapper
		Kgtrap	!	Kgfilenamefsystem/vm/trap-state.scm�
	J
��		K	��	
	K	��		L	
��		L	$��		L	��		M	��	!	M	��	$	N	��	.	N	*��	7	N	��	K	O	��
		Kgnamegenable-trap-wrapper!�CdRNOc_eMhP�]	45$14544545>"G456456�gwrapper
		Kgtrap		>gfilenamefsystem/vm/trap-state.scm�
	Q
��		R	��	
	R	��		T	��		T	��		U	��	!	U	*��	*	U	��	>	V	��	B	S	
��	C	S	%��	K	S	��
		Kgnamegdisable-trap-wrapper!�CfRc]gMh0�]4454455>"G6�g
trap-state
		0gwrapper		0gfilenamefsystem/vm/trap-state.scm�
	X
��		Y	��	
	Z	��		Z	��		Z	1��		Z	��	"	Y	��	0	[	��			0	gnamegadd-trap-wrapper!�ChRc]ih �]4544556�g
trap-state
		gwrapper		gfilenamefsystem/vm/trap-state.scm�
	]
��		_	��		_	��		_	��		^	��			gnamegremove-trap-wrapper!�CjRNh�]45$�CC�gwrapper
		glevel		gfilenamefsystem/vm/trap-state.scm�
	b	��		c	��	
	c	
��		d	��			C]h�]
456�g
trap-state
		gfilenamefsystem/vm/trap-state.scm�
	a
��		g	��		b	��		gnamegtrap-state->trace-level�CkR<lM]hP']
"8(4>"GC4�5�$�C�"���45"���g
trap-state
		Kgidx		Kgwrappers			>gfilenamefsystem/vm/trap-state.scm�
	i
��		j	��		k	��	
	m	��		m	��		m	��	#	o	��	(	o	 ��	*	o	��	-	o	��	1	k	��	4	p	��	8	r	
��	>	r	��	>	j	��	?	j	��	K	j	��		K	gnamegwrapper-at-index�CmR[ch(�]	45445�>"GC�g
trap-state
		(gidx			(gfilenamefsystem/vm/trap-state.scm�
	t
��		u	
��			u	��		v	��		v	+��		v	��		(gnamegnext-index!�CnR\ch(�]	45445�>"GC�g
trap-state
		(gidx			(gfilenamefsystem/vm/trap-state.scm�
	y
��		z	
��			z	��		{	��		{	5��		{	��		(gnamegnext-ephemeral-index!�CoRmZMPh8�]4LL54L5$45456C�gframe
		2gwrapper		2ghandler			2gfilenamefsystem/vm/trap-state.scm�
		��	�	��	�	��	�	��	�	��	!�	��	(�	��	0�	
��			2Ch�]OC�g
trap-state
		gidx		gfilenamefsystem/vm/trap-state.scm�
	~
��			gnameghandler-for-index�CpRmNfjhP�]	4LL5$;45$4>"G"4L>"GL6C�gframe
		Pgwrapper		Pgfilenamefsystem/vm/trap-state.scm�
�	��	�	��	�	��	�	��	�	��	�	��	�	��	5�	��	N�	��
		PCh�]OC�g
trap-state
		gidx		ghandler			gfilenamefsystem/vm/trap-state.scm�
�
��			gnamegephemeral-handler-for-index�CqR4ri5sRtsXuvh@�]	45$C454>"G6�gvm
		9gt		9gts		9gfilenamefsystem/vm/trap-state.scm�
�
��	�	��	�	��	�	��	�	��	�	��	9�	��		9gnamegtrap-state-for-vm�CvRvwhx]456pgfilenamefsystem/vm/trap-state.scm�
�
��	�	��	�	��		
gnamegthe-trap-state�CxRx;ywkh p]L$454L56Chgfilenamefsystem/vm/trap-state.scm�
�	��	�	��	�	!��	�	*��	�	��		
Cywhg]L$
45
6C_gfilenamefsystem/vm/trap-state.scm�
�	��	�	��	�	!��	�	��		
Cywkh p]L$454L56Chgfilenamefsystem/vm/trap-state.scm�
�	��	�	��	�	!��	�	*��	�	��		
Cywhg]L$
45
6C_gfilenamefsystem/vm/trap-state.scm�
�	��	�	��	�	!��	�	��		
Chp�-.,3#45YOO4O>"GV4>X4O>"G"ZCZF�ghandler
		ngthunk		ng
trap-state			ngfilenamefsystem/vm/trap-state.scm�
�
��	�	;��	0�	��		n	gnamegwith-default-trap-handler�C/RxzM]h(�-.,3#45456�g
trap-state
		&gfilenamefsystem/vm/trap-state.scm�
�
��	�	,��	�	��	&�	��		&
gnameg
list-traps�C)Rx{mPh(�-.,3#45456�gidx
		(g
trap-state		(gfilenamefsystem/vm/trap-state.scm�
�
��	�	/��	�		��	(�	��		(gnameg	trap-name�C+Rx{mNh(�-.,3#45456�gidx
		(g
trap-state		(gfilenamefsystem/vm/trap-state.scm�
�
��	�	3��	�		��	(�	��		(gnameg
trap-enabled?�C*Rx{mdh(�-.,3#45456�gidx
		(g
trap-state		(gfilenamefsystem/vm/trap-state.scm�
�
��	�	2��	�		��	(�	��		(gnamegenable-trap!�C,Rx{mfh(�-.,3#45456�gidx
		(g
trap-state		(gfilenamefsystem/vm/trap-state.scm�
�
��	�	3��	�		��	(�	��		(gnameg
disable-trap!�C-Rx{mNfjh0�]45$4>"G"L6~gwrapper
		+gfilenamefsystem/vm/trap-state.scm�
�		��	�	��	
�	��	�	��	+�	��		+Ch0�-.,3#4545O6�gidx
		-g
trap-state		-gfilenamefsystem/vm/trap-state.scm�
�
��	�	2��	�		��	-�	��		-gnamegdelete-trap!�C.RxcZh(�-.,3#45456�ghandler
		&g
trap-state		&gfilenamefsystem/vm/trap-state.scm�
�
��	�	?��	&�	��		&gnameginstall-trap-handler!�C0Rxn|phG}~	hP6-.,3#4545445544556.gproc
		Ng
trap-state		Ngidx		 	Ngtrap		2	Ngfilenamefsystem/vm/trap-state.scm�
�
��	�	B��	�	��	 �	��	#�	��	(�	��	2�	��	2�	��	9�	��	A�	��	F�	��	J�	��	L�	��	N�	��		Ngnamegadd-trap-at-procedure-call!�C1Rxn�}�hG�
hXI-.,3#4545445544	556Agproc
		Qg
trap-state		Qgidx		 	Qgtrap		5	Qgfilenamefsystem/vm/trap-state.scm�
�
��	�	>��	�	��	 �	��	#�	��	*�	��	/�	$��	3�	��	5�	��	5�	��	<�	��	D�	��	I�	��	M�	��	O�	��	Q�	��		Qgnamegadd-trace-at-procedure-call!�C2Rxn�phG}�	hXO-.,3#4545445544556Ggfile
		Rg	user-line		Rg
trap-state			Rgidx		 	Rgtrap		4	Rgfilenamefsystem/vm/trap-state.scm�
�
��	�	>��	�	��	 �	��	#�	��	*�	(��	4�	��	4�	��	;�	��	C�	��	H�	��	N�	��	P�	��	R�	��		R	gnamegadd-trap-at-source-location!�C3Rxo�q.hi]LL6agframe
		
gfilenamefsystem/vm/trap-state.scm�
�	��	
�	 ��		
ChG}�
h`U-.,3#4545445O544	556Mgframe
		Yghandler		Yg
trap-state			Ygidx		 	Ygtrap		=	Ygfilenamefsystem/vm/trap-state.scm�
�
��	�	:��	�	��	 �	��	#�	��	(�	��	=�	��	=�	��	D�	��	L	��	Q	��	U	��	W�	��	Y�	��		Y	gnameg#add-ephemeral-trap-at-frame-finish!�C4R}������h@�]	$/45$"45456C�gsource
		:gt		'gfilenamefsystem/vm/trap-state.scm�

��		��	
	��		 ��		��	$	5��	(	��	/	,��	7	��	9	��		:gnameg
source-string�C�R�x�o�h\]CTgf
		gfilenamefsystem/vm/trap-state.scm�
	��		C�hw]45L��Cogf
		gfilenamefsystem/vm/trap-state.scm�
	��		.��		&��	
	!��		C��h�]45L�$L6Cxgf
		gfilenamefsystem/vm/trap-state.scm�
	
��		��		��		��		��		CqhG�}����h��-/03	#45##45454$"O$"45	O4
554$$
"
45"($4455"445556�gframe
	�ghandler	�g
trap-state		�ginto?		�ginstruction?		�gsource		9�gidx		B�g	predicate		Z�gfp		o	}gtrap	��
gfilenamefsystem/vm/trap-state.scm�
	
��		3��	3	��	9	��	<	��	B	��	E	��	M	��	Z	��	b	��	i	��	o	���	���	���	���	���!	���"	
���#	���$	���$	���$	���%	
���&	���&	���&	(���&	���'	���'	���'	*���'	���	���	��"	�	ginto?S	�ginstruction?S	�gnamegadd-ephemeral-stepping-trap!�C5RxnhGh8�-.,3#4545456�gtrap
		4gname		4g
trap-state			4gidx		 	4gfilenamefsystem/vm/trap-state.scm�
)
��	)	5��	*	��	 *	��	'-	��	4+	��		4	gnameg	add-trap!�C(RC�gm
		,gfilenamefsystem/vm/trap-state.scm�		
��	-	/	��	6	/
��g	1
��u	7
��-	=
��y	C
���	J
��	.	Q
��
I	X
��<	]
���	a
��B	i
��6	t
��0	y
���	~
����
����	����
��(�
����
����
��r�
��Y�
��E�
��4�
��%�
����
�� ��
��"y�
��$<�
��&
�
��(p�
��)�
��/"	
��0P)
��%	0R
C6PK*[ȣ<��vm/frame.gonu�[���GOOF----LE-8-2.0m]E4h�]gguile�	�	gdefine-module*�	�	�	gsystem�	gvm�	gframe�		�	
gfilenameS�	fsystem/vm/frame.scm�	gimportsS�	
gbase�	gpmatch�	
�	�	gprogram�	�	�	ginstruction�	�	�	gobjcode�	�	�	�	gexportsS�	gframe-bindings�	gframe-lookup-binding�	gframe-binding-ref�	gframe-binding-set!�	 gframe-next-source�	!gframe-call-representation�	"gframe-environment�	#gframe-object-binding�	$gframe-object-name�	%gframe-return-values�	& !"#$%
�	'gset-current-module�	('�	)'�	*gframe-procedure�	+gprogram?�	,gprogram-bindings-for-ip�	-gframe-instruction-pointer�	.gbinding:name�	/gframe-local-set!�	0g
binding:index�	1gerror�	2fvariable not bound in frame�	3gframe-local-ref�	4gframe-arguments�	5gprogram-source�	6gprogram-sources-pre-retire�	7gcatch�	87�	97�	:gprocedure-name�	;gprogram-arguments-alist�	<gframe-num-locals�	=g???�	>gassq-ref�	?grequired�	@goptional�	Agkeyword�	Bgrest�	Cgmap�	Dgiota�C5hh�]4	
&54)>"G*+,-h(�]	4545$
456C�gframe
		%gp			%gfilenamefsystem/vm/frame.scm�
	!
��		"	��			"	��		#	��		#	��		$	#��	#	$	��	$	%	��			%gnamegframe-bindings�CR.h8]
"#(C4�5&�C�"���45"����gframe
		6gvar		6gbindings			)gfilenamefsystem/vm/frame.scm�
	'
��		(	��		)	��		+	��		+	��		+	��		)	��		,	��	#	.	��	)	.	��	)	(	��	*	(	��	6	(	��		6	gnamegframe-lookup-binding�CR/012h8�]445$"4556�gframe
		4gvar		4gval			4gt			.gfilenamefsystem/vm/frame.scm�
	0
��		2	��	
	3	��		3	��	!	4	��	%	4	 ��	+	4	��	0	2	��	4	1	��
		4	gnamegframe-binding-set!�CR3012h8�]
445$"4556�gframe
		2gvar		2gt			.gfilenamefsystem/vm/frame.scm�
	7
��		9	��	
	:	��		:	��	!	;	��	%	;	��	+	;	��	0	9	��	2	8	��
		2	gnamegframe-binding-ref�CR!h�]45�C}gframe
		gfilenamefsystem/vm/frame.scm�
	A
��		B	��	
	B	��		gnamegframe-arguments�C4R*+5-6h0�]	4545$45456C�gframe
		,gproc			,gfilenamefsystem/vm/frame.scm�
	J
��		K	��			K	��		L	��		L	��		N	��	"	O	��	*	M	��	+	P	��
		,gnamegframe-next-source�C R*9:hN]L6Fgfilenamefsystem/vm/frame.scm�
	e		��		e	��		
Ch[-13CSgargs
			gfilenamefsystem/vm/frame.scm�
	e		��			


C+;-30<=h8]�$^�4L5$4L455"4L5�$
4L5"4L��5�C�$^�4L5$4L455"4L5�$
4L5"4L��5�C�$#��4L��54L��5��C$74L5$
L4564L5�$L6CC	greq
	5gopt	5gkey		5grest		5gi		5gsym			Tgt			Qgsym		q�gt		|�gt	3
gfilenamefsystem/vm/frame.scm�
	t	��		z	��			y	��		{	#��		{	��		m	��		l	��	 	n	��	%	n	6��	-	n	��	4	o	��	;	o	��	?	l	��	@	p	��	N	s	��	U	|	��	Z	|	��	c	|	1��	e	|	��	f	{	��	j	}	��	n	y	��	q	~	#��	q	~	��	t	m	��	|	l	���	n	���	n	6���	n	���	o	���	o	���	l	���	p	���	s	���		���		���		1���		���	~	����	���	y	����	����	����	.����	����	����	#����	2����	����	���	y	���	m	��	l	��	n	6��	n	��	o	��$	o	��(	l	��0	p	��2	s	��4�	��>	5	gnameglp�C>?@ABC3h`]L6Xgi
		
gfilenamefsystem/vm/frame.scm�
�	��	
�	��		
CD<hE]!454O5$"45$4455"$�OQ44	
5$"4	5$"4	5$"4	
5$"
5"4O44555�C=gframe
	�gp		�gt			-gt		K�glp		\�gt		o�gt	��gt	��gt	��	gfilenamefsystem/vm/frame.scm�
	b
��		c	��			c	��		e		��		e	��	.	g	��	8	g	��	9	h	��	>	h	'��	F	h	��	K	f	��	\	t	��	g	t	��	m	t	2��	o	t	��	o	t	��	~	t	=���	u	���	u	2���	u	���	u	���	u	=���	v	���	v	2���	v	���	v	���	v	<���	w	���	w	3���	w	���	w	���	t	����	����	����	����	����	���	d	��'	�gnamegframe-call-representation�C!RC.hx]454L5�Cpgbinding
		gfilenamefsystem/vm/frame.scm�
�	��	�	��	
�	&��	�		��		Ch�]O456�gframe
		gfilenamefsystem/vm/frame.scm�
�
��	�	��	�	��		gnamegframe-environment�C"RhH#]
"2("
4�5�$
�$�CC�"���45"���gframe
		Egobj		Egbs			8gfilenamefsystem/vm/frame.scm�
�
��	�	��	�	��	
�	��	�	��	�	8��	�	��	�	��	"�	��	%�	��	)�	��	,�	��	2�	"��	8�	��	9�	��	E�	��		E	gnamegframe-object-binding�C#R#.h �]
45$6C�gframe
		gobj		gt			gfilenamefsystem/vm/frame.scm�
�
��	�		��	�	��			gnamegframe-object-name�C$R<3C3hr]LLL���6jgi
		gfilenamefsystem/vm/frame.scm�
�		��	�	%��	�	"��	�	��		CDh0�]454�5O456�gframe
		-glen			-gnvalues			-gfilenamefsystem/vm/frame.scm�
�
��	�	��		�	��	�	��	�	)��	�	��	�	��	%�		��	-�	��
		-gnamegframe-return-values�C%RC�gm
		,gfilenamefsystem/vm/frame.scm�		
��-	!
��|	'
���	0
���	7
���	A
���	J
���	b
��5�
����
����
��b�
��
	d
C6PK*[�WMMvm/instruction.gonu�[���GOOF----LE-8-2.05]4h)]gguile�	�	gdefine-module*�	�	�	gsystem�	gvm�	ginstruction�		�	
gfilenameS�	fsystem/vm/instruction.scm�	gexportsS�	
ginstruction-list�	ginstruction?�	ginstruction-length�	ginstruction-pops�	ginstruction-pushes�	ginstruction->opcode�	gopcode->instruction�	
�	gset-current-module�	�	�	gload-extension�	g
string-append�	f	libguile-�	geffective-version�	fscm_init_instructions�C5h@�]4	
54>"Gi4i4i556�gm
		(gfilenamefsystem/vm/instruction.scm�		
��	-		��	3		��	4		+��	<		��	>		��	@	
��		@
C6PK*[Zk�W����vm/coverage.gonu�[���GOOF----LE-8-2.0�]X4h�?]gguile�	�	gdefine-module*�	�	�	gsystem�	gvm�	gcoverage�		�	
gfilenameS�	fsystem/vm/coverage.scm�	gimportsS�	
�	
�	gframe�	�	�	gprogram�	�	�	gsrfi�	gsrfi-1�	�	�	gsrfi-9�	�	�	gsrfi-11�	�	�	gsrfi-26�	 �	! �	"!�	#gexportsS�	$gwith-code-coverage�	%gcoverage-data?�	&ginstrumented-source-files�	'ginstrumented/executed-lines�	(gline-execution-counts�	)gprocedure-execution-count�	*gcoverage-data->lcov�	+$%&'()*�	,gset-current-module�	-,�	.,�	/ghashq�	0gprogram-objcode�	1g
hashq-proc�	2gfind�	3g	assq-proc�	4gframe-procedure�	5gframe-instruction-pointer�	6ghashx-create-handle!�	7ghashv-create-handle!�	8gmake-hash-table�	9gvm-trace-level�	:gvm-next-hook�	;gset-vm-trace-level!�	<g	add-hook!�	=gremove-hook!�	>gcall-with-vm�	?gmake-coverage-data�	@g<coverage-data>�	Ag%%make-coverage-data-procedure�	Bgmake-syntax-transformer�	CB�	DB�	Eg%make-coverage-data�	Fgmacro�	Gg$sc-dispatch�	HG�	IG�	Jg_�	Kgany�	LJKKKK�	Mg
syntax-object�	Nglambda�	Ogm-8d25f648290-30�	Pgtop�	QOP�	Rgribcage�	Sgt-8d25f648290-2c�	Tgt-8d25f648290-2d�	Ugt-8d25f648290-2e�	Vgt-8d25f648290-2f�	WSTUV�	XQQQQ�	Yfl-8d25f648290-35�	Zfl-8d25f648290-36�	[fl-8d25f648290-37�	\fl-8d25f648290-38�	]YZ[\�	^RWX]�	_R�	`gx�	a`�	bQ�	cfl-8d25f648290-32�	dc�	eRabd�	fgshift�	gg	proc-name�	hgargs�	igh�	jP�	kjj�	lfl-1e8ba8b5a-2ba�	mfl-1e8ba8b5a-2bb�	nlm�	oRikn�	pgkey�	qgvalue�	rgname�	sgformals�	tgbody�	upqrst�	vjjjjj�	wfl-1e8ba8b5a-2ad�	xfl-1e8ba8b5a-2ae�	yfl-1e8ba8b5a-2af�	zfl-1e8ba8b5a-2b0�	{fl-1e8ba8b5a-2b1�	|wxyz{�	}Ruv|�	~gmake-procedure-name�	~��j��fl-1e8ba8b5a-29d�����R����j��fl-1e8ba8b5a-29c�����Ra����Q^_ef____o}��
��ghygiene�����MN����gprocedure->ip-counts��j^_e�����M�����gprocedure->sources��M�����gfile->procedures��M�����gfile->line-counts��M�����������gmake-struct��gm-8d25f648290-2a���P��gt-1e8ba8b5a-38d��gt-1e8ba8b5a-38c��gt-1e8ba8b5a-38b�������gm-1e8ba8b5a-38e���P�������fl-1e8ba8b5a-392��fl-1e8ba8b5a-393��fl-1e8ba8b5a-394�������R�����g	ctor-args�����fl-1e8ba8b5a-37a�����R�����gctor��gfield������fl-1e8ba8b5a-376��fl-1e8ba8b5a-377������R�k���gform��g	type-name��gconstructor-spec��gfield-names��������jjjj��fl-1e8ba8b5a-36b��fl-1e8ba8b5a-36c��fl-1e8ba8b5a-36d��fl-1e8ba8b5a-36e��������R�����g
record-layout��gfunctional-setters��gsetters��gcopier��ggetters��gconstructor��ggetter-identifiers��gfield-identifiers������������jjjjjjjj��fl-1e8ba8b5a-343��fl-1e8ba8b5a-341��fl-1e8ba8b5a-33f��fl-1e8ba8b5a-33d��fl-1e8ba8b5a-33b��fl-1e8ba8b5a-339��fl-1e8ba8b5a-337��fl-1e8ba8b5a-335������������R�����fl-1e8ba8b5a-334�����Ra�����^_ef_�___��_�����M�����M@����M
������������������geach-any��Jی��gsyntax-violation��������fWrong number of arguments��gidentifier?��������j_e��MA����������f-source expression failed to match any pattern��grecord-type-vtable��������gpwpwpwpw��gdefault-record-printer��������������gset-struct-vtable-name!��������gvtable-offset-user��������g%coverage-data?-procedure��JK��gm-8d25f648290-43���P��gt-8d25f648290-42��������fl-8d25f648290-48����R����fl-8d25f648290-45��Ra���_f____o}��
�MN��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�P��fl-1e8ba8b5a-483�fl-1e8ba8b5a-484�fl-1e8ba8b5a-485�fl-1e8ba8b5a-486�fl-1e8ba8b5a-487�fl-1e8ba8b5a-488�fl-1e8ba8b5a-489��R�g	copier-id��fl-1e8ba8b5a-476��R�� g	ctor-name�! �"fl-1e8ba8b5a-46e�#"�$R!�#�%��&fl-1e8ba8b5a-46c�'&�(R%�'�)glayout�*)�+fl-1e8ba8b5a-46a�,+�-R*�,�.g
immutable?�/.�0fl-1e8ba8b5a-468�10�2R/�1�3gfield-count�43�5fl-1e8ba8b5a-466�65�7R4�6�8g
getter-ids�98�:fl-1e8ba8b5a-463�;:�<R9�;�=g	field-ids�>=�?fl-1e8ba8b5a-460�@?�AR>�@�Bgpredicate-name�Cg
field-spec�D.���BC�Ejjjjjj�Ffl-1e8ba8b5a-453�Gfl-1e8ba8b5a-454�Hfl-1e8ba8b5a-455�Ifl-1e8ba8b5a-456�Jfl-1e8ba8b5a-457�Kfl-1e8ba8b5a-458�LFGHIJK�MRDEL�N�_f______$_(_-_2_7_<_AM���OMN��PO�Qgand�RMQN��Sgstruct?�TMSN��UTO�Vgeq?�WMVN��Xg
struct-vtable�YMXN��ZYO�[j_�\M@[��]WZ\�^RU]�_P^�`j_�aM�`��bgthrow-bad-struct�cb�db�egdata-procedure->ip-counts�fg$%data-procedure->ip-counts-procedure�ggfree-id�hg
%%on-error�igm-8d25f648290-4f�jiP�kj�lfl-8d25f648290-51�ml�nRakm�oj_nf____o}���pMho��qgp�rqK�sg%%type�tgt-1e8ba8b5a-3a5�ugt-1e8ba8b5a-3a6�vgt-1e8ba8b5a-3a7�wgt-1e8ba8b5a-3a8�xgt-1e8ba8b5a-3a9�ygt-1e8ba8b5a-3aa�zgt-1e8ba8b5a-3ab�{tuvwxyz�|gm-1e8ba8b5a-3ac�}|P�~}}}}}}}�fl-1e8ba8b5a-3b0��fl-1e8ba8b5a-3b1��fl-1e8ba8b5a-3b2��fl-1e8ba8b5a-3b3��fl-1e8ba8b5a-3b4��fl-1e8ba8b5a-3b5��fl-1e8ba8b5a-3b6����������R{~���ggetter��gindex������fl-1e8ba8b5a-3a3��fl-1e8ba8b5a-3a4������R�k����8��jjj��fl-1e8ba8b5a-39e��fl-1e8ba8b5a-39f��fl-1e8ba8b5a-3a0�������R������_nf_�___�_�����Ms����g���Jr�K��gck��gerr��gs������jj��fl-8d25f648290-54��fl-8d25f648290-55������R�����j�_nf____o}��
��M�����gquote��M�����j�_n��M@�����������g%%index��M�����g���Jr�K��fl-8d25f648290-59��fl-8d25f648290-5a������R�����j�_nf____o}��
��M�����M������_n��M
�����������g%%copier��M�����g���Jr�K��fl-8d25f648290-5e��fl-8d25f648290-5f������R�����j�_nf____o}��
��M�����M�����g%%<coverage-data>-set-fields��j�_n��M������������gt-8d25f648290-4e�����fl-8d25f648290-63�����R�k���j�_nf____o}��
��MN������_nf_�___�_�����M��������gif��M�����MV����MX��������j�_n��M@���������g
struct-ref��M������_n��M
���������Mb����M�����Me������������������������j_n��Mf����gdata-procedure->sources��g"%data-procedure->sources-procedure��gm-8d25f648290-6a���P�����fl-8d25f648290-6c�����Ra�����_�f____o}����Mh����g����K���_�f_�___�_�����Ms����g���J��K������fl-8d25f648290-6f��fl-8d25f648290-70������R�������_�f____o}��
�M����M����j�_��M@����M����g�J�K�	fl-8d25f648290-74�
fl-8d25f648290-75�	
�R���
�_�f____o}��
�M�
��M�
��_��M����M����g�J�K�fl-8d25f648290-79�fl-8d25f648290-7a��R����_�f____o}��
�M���M���j_��M��� �! �"gt-8d25f648290-69�#"�$fl-8d25f648290-7e�%$�&R#�%�'�&_�f____o}��
�(MN'��)�&_�f_�___�_����*M�)��+*�,M�)��-MV)��.MX)��/.*�0j&_��1M@0��2-/1�3M�)��4&_��5M4��63*5�7Mb)��8M�)��9M�0��:89�;7*:�<,26;�=(+<�>j_��?M�>��@gdata-file->procedures�Ag %data-file->procedures-procedure�Bgm-8d25f648290-85�CBP�DC�Efl-8d25f648290-87�FE�GRaDF�HC_Gf____o}���IMhH��JgI�KJK�L�_Gf_�___�_����MMsL��NgM�OJKNK�PCC�Qfl-8d25f648290-8a�Rfl-8d25f648290-8b�SQR�TR�PS�UCT_Gf____o}��
�VM�U��WM�U��XjT_G�YM@X��ZWY�[Z�\M�L��]g\�^JK]K�_fl-8d25f648290-8f�`fl-8d25f648290-90�a_`�bR�Pa�cCb_Gf____o}��
�dM�c��eM�c��fb_G�gM	f��heg�ih�jM�L��kgj�lJKkK�mfl-8d25f648290-94�nfl-8d25f648290-95�omn�pR�Po�qCp_Gf____o}��
�rM�q��sM�q��tjp_G�uM�t��vsu�wv�xgt-8d25f648290-84�yx�zfl-8d25f648290-99�{z�|RyD{�}C|_Gf____o}��
�~MN}���|_Gf_�___�_�����M�������M����MV���MX�������j|_G��M@���������M����|_G��M	���������Mb���M����M@�������������������~����j_G��MA����gdata-file->line-counts��g!%data-file->line-counts-procedure��gm-8d25f648290-a0���P�����fl-8d25f648290-a2�����Ra�����_�f____o}����Mh����g����K���_�f_�___�_�����Ms����g���J��K������fl-8d25f648290-a5��fl-8d25f648290-a6������R�������_�f____o}��
��M�����M�����j�_���M@�����������M�����g���J��K��fl-8d25f648290-aa��fl-8d25f648290-ab������R�������_�f____o}��
��M�����M������_���M	�����������M�����g���J��K��fl-8d25f648290-af��fl-8d25f648290-b0������R�������_�f____o}��
��M�����M�����j�_���M������������gt-8d25f648290-9f�����fl-8d25f648290-b4�����R�������_�f____o}��
��MN������_�f_�___�_�����M��������M�����MV����MX��������j�_���M@���������M������_���M	���������Mb����M�����M�������������������������j_���M�����geach��KK������K�K�K��g%%set-fields��gdummy��gcheck?��gexpr���������gm-8d25f648290-bb���P���������fl-8d25f648290-c0��fl-8d25f648290-c1��fl-8d25f648290-c2��fl-8d25f648290-c3��fl-8d25f648290-c4��������R������fl-8d25f648290-bd��Ra�gt-1e8ba8b5a-3c4�gt-1e8ba8b5a-3c6�gt-1e8ba8b5a-3c5��	gm-1e8ba8b5a-3c7�
	P�


�fl-1e8ba8b5a-3cb�
fl-1e8ba8b5a-3cc�fl-1e8ba8b5a-3cd�
�R�fl-1e8ba8b5a-3c1�fl-1e8ba8b5a-3c2�fl-1e8ba8b5a-3c3��R����_f____��
�M���j_�M@��Me��M���M@��M����gmap� �!�"glist�#g
hash-for-each�$gprogram-sources*�%gsource:file�&gfor-each�'gsource:line�(ghash-create-handle!�)gmax�*g
append-map�+gclosed-over-procedures�,gclosest-source-line�-g	hashq-ref�.gsource:addr�/gmodule-procedures�0gloaded-modules�1gand=>�2g	hashx-ref�3g	hashv-ref�4gprogram?�5gprogram-sources�6g
hashq-set!�7ghash-ref�8gfile-procedures�9g	hash-fold�:

��;g
alist-cons�<gmodule-submodules�=gresolve-module�>g
procedure?�?gmodule-obarray�@gmemq�Agfold�Bgappend�Cgvector->list�Dgprogram-objects�E�Fgprogram-free-variables�Ggformat�HfTN:~%�Igsearch-path�Jg
%load-path�Kgstring?�LfSF:~A~%�Mgsource:line-for-user�Ngprocedure-name�Of
anonymous-l~a�Pf
FN:~A,~A~%�QfFNDA:~A,~A~%�Rf
DA:~A,~A~%�SfLH: ~A~%�TfLF: ~A~%�Ufend_of_record~%�Vgcurrent-error-port�Wf"skipping unknown source file: ~a~%�C5hpR�]4	
"#+54.>"G/0h�]456�gproc
		gn		gfilenamefsystem/vm/coverage.scm�
	0
��		2		��		2	��			gnameg
hashq-proc�C1R020h|]L4�5�Ctgpair
		gfilenamefsystem/vm/coverage.scm�
	:	
��		;	��	
	;	'��		;	��	
	;	��		Ch�]
45O6�gproc
		galist		gcode				gfilenamefsystem/vm/coverage.scm�
	4
��		9	��			9	��		:	��			gnameg	assq-proc�C3R4561378h`h])45454M5"/H�KJ$4J
5���C45�"���"���`gframe
		[gproc			[gip			[g
proc-entry		"	[g	ip-counts		)	Wgip-entry		@	Kgfilenamefsystem/vm/coverage.scm�
	G	��		I	��			I	��		J	��		I	��		K	��	"	I	��	(	M	��	.	N	��	6	O	��	7	P	��	@	P	��	G	Q	$��	H	Q	!��	I	Q	��	N	S	#��	S	S	��	W	T	��	W	M	��		[gnamegcollect!�C89:;<h i]4LL�>"GLL6agfilenamefsystem/vm/coverage.scm�
	]	��		^	��	
	^	4��		^	��		_	��		
C;=h Y]4LL>"GLL6Qgfilenamefsystem/vm/coverage.scm�
	b	��		c	��		d	��		
C>?	h�*]2HOQ4�5K4545OOQQ4>"GV4>X4>"G"G4J5E"gvm
	�gthunk	�gprocedure->ip-counts		�gcollect!		
�glevel		*�ghook		*�gpre		D�gpost		D�gargs	��	gfilenamefsystem/vm/coverage.scm�
	>
��		E	��		Z	%��	$	[	%��	*	Z	��	9	\	��	p	a	��	~	\	���	Y	���	f	���	f	��	�	gnamegwith-code-coverage�g
documentationf�Run THUNK, a zero-argument procedure, using VM; instrument VM to collect code
coverage data.  Return code coverage data and the values returned by THUNK.�C$R@h�]�C�gprocedure->ip-counts
		gprocedure->sources		gfile->procedures			gfile->line-counts			gfilenamefsystem/vm/coverage.scm�
	m
��			gnameg%%make-coverage-data-procedure�CAR4DEFIL�h�]C�gt-8d25f648290-2c
		gt-8d25f648290-2d		gt-8d25f648290-2e			gt-8d25f648290-2f						C��E�hY]L6Qga
		gfilenamefsystem/vm/coverage.scm�		m
��		CJ�hI]L6Agfilenamefsystem/vm/coverage.scm�		m
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/vm/coverage.scm�
	m
��		nC5ER���@�4�@>"G	��Ai�@R@h�]�$��CCxgobj
		gfilenamefsystem/vm/coverage.scm�
	m
��		gnameg%coverage-data?-procedure�C�R4D%FI�_h8]C0gt-8d25f648290-42
		
		
C��%�hY]L6Qga
		gfilenamefsystem/vm/coverage.scm�		m
��		CJ�hI]L6Agfilenamefsystem/vm/coverage.scm�		m
��		
Cah]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/vm/coverage.scm�
	m
��		nC5%R@deh�]�&
�C6�gs
		gfilenamefsystem/vm/coverage.scm�
	m
��		gnameg$%data-procedure->ip-counts-procedure�CfR4DeFI���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h8]C0gt-8d25f648290-4e
		
		
C��e�hY]L6Qga
		gfilenamefsystem/vm/coverage.scm�		m
��		CJ�hI]L6Agfilenamefsystem/vm/coverage.scm�		m
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/vm/coverage.scm�
	m
��	�C5eR@d�h�]�&�C6gs
		gfilenamefsystem/vm/coverage.scm�
	m
��		gnameg"%data-procedure->sources-procedure�C�R4D�FI�h:]��C2gerr
		gs					Ch:]��C2gerr
		gs					C!h:]��C2gerr
		gs					C�=h8]C0gt-8d25f648290-69
		
		
C����hY]L6Qga
		gfilenamefsystem/vm/coverage.scm�		m
��		CJ�hI]L6Agfilenamefsystem/vm/coverage.scm�		m
��		
C?h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/vm/coverage.scm�
	m
��	�C5�R@d@h �]�&	�C6}gs
		gfilenamefsystem/vm/coverage.scm�
	m
��		gnameg %data-file->procedures-procedure�CAR4D@FIOV[h:]��C2gerr
		gs					C^dih:]��C2gerr
		gs					Clrwh:]��C2gerr
		gs					C��h8]C0gt-8d25f648290-84
		
		
C��@�hY]L6Qga
		gfilenamefsystem/vm/coverage.scm�		m
��		CJ�hI]L6Agfilenamefsystem/vm/coverage.scm�		m
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/vm/coverage.scm�
	m
��	�C5@R@d�h �]�&	�C6~gs
		gfilenamefsystem/vm/coverage.scm�
	m
��		gnameg!%data-file->line-counts-procedure�C�R4D�FI���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h8]C0gt-8d25f648290-9f
		
		
C����hY]L6Qga
		gfilenamefsystem/vm/coverage.scm�		m
��		CJ�hI]L6Agfilenamefsystem/vm/coverage.scm�		m
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/vm/coverage.scm�
	m
��	�C5�R4D�FI�!"h v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/vm/coverage.scm�
	m
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5�R8@#$%&%'(87)hXK]!45454L5�$"4�5�4�
54�
5�CCgsource
		Qgfile		Qgline			Qg
file-entry			Qg
line-entry		A	Qgfilenamefsystem/vm/coverage.scm�
�	��	�	-��	
�	-��	�	!��	�	��	�	��	#�	��	'�	��	.�	!��	6�	��	7�	��	<�	0��	A�	��	A�	��	F�	��	K�	$��	N�	��	O�	
��		QC*$hj]L6bgt-8d25f648290-118
		
gfilenamefsystem/vm/coverage.scm�
�	+��		
C+#,(87)hP@]4L54LL5�$"4�5�4�
54�5�C8gip
		Kgcount		Kgline			Kg
file-entry			Kg
line-entry		:	Kgfilenamefsystem/vm/coverage.scm�
�	��	�	-��	�	!��	�	��	�	��	�	��	 �	��	'�	!��	/�	��	0�	��	5�	0��	:�	��	:�	��	?�	��	D�	$��	H�	��	I�	
��		K	C
hh"]4L5�$4�5"$;4LO4LO455>"G	LO6Cgproc
		fg	ip-counts		fgsources			fgfile		!	fgfilenamefsystem/vm/coverage.scm�
�	��	�	%��	�	��	�	*��	�	%��	�	*��	�	7��	�	*��	!�	��	)�	��	*�	��	4�	��	>�	+��	F�	��	K�	��	d�	��		f	C&-&$%&,(87)hP,]4L54LL5�$"4�5�4�
54�
5�C$gip
		Jgline		Jg
file-entry			Jg
line-entry		:	Jgfilenamefsystem/vm/coverage.scm�
�	)��	�	7��	�	+��	�	��	�	��	�	��	 �	��	'�	!��	/�	��	0�	��	5�	0��	:�	��	:�	��	?�	��	D�	$��	G�	��	H�	
��		JC.hH�]4L5�$4�5"$LO456C�gproc
		Cgsources		Cgfile		!	Cgfilenamefsystem/vm/coverage.scm�
�	��	�	1��	�	!��	�	6��	�	1��	�	6��	�	C��	�	6��	!�	!��	)�	#��	7�	)��	A�	(��
		CC+h(�]4L5$CLLO456ygproc
		%gfilenamefsystem/vm/coverage.scm�
�	��	�	��	�	��	�	��	%�	��		%C*/0
hxw]!4�54	d54	d5�4O>"G4O44	55>"GCogprocedure->ip-counts
		rgprocedure->sources	
	rgfile->procedures			rgfile->line-counts			rgdata		+	rgfilenamefsystem/vm/coverage.scm�
�
��	�	��	
�	��	
�	��	�	��	�	��	�	��	+�	��	+�	��	.�	��	I�	��	W�	��	\�	,��	b�	��	g�	��		rgnamegmake-coverage-data�C?R$1213@de.3h�]	4L�5
6�g	ip-counts
		gentry-ip	
	gfilenamefsystem/vm/coverage.scm�
�	��	�	"��	�	/��	
�	"��	
�	��	�	��		C
hH]
45�$04�&
�"	455	O6Cgdata
		Fgproc		Fgsources			Fgfilenamefsystem/vm/coverage.scm�
�
��	�	��	�	��	�		��	�	��	�	��	 �	��	;�	��	D�		��
		F	gnamegprocedure-execution-count�g
documentationfReturn the number of times PROC's code was executed, according to DATA, or #f
if PROC was not executed.  When PROC is a closure, the number of times its code
was executed is returned, not the number of times this code associated with this
particular closure was executed.�C)R-@d�45@%(6h��]*4�&�"	455$C45$�45�&�"	45�&		�"	45�$84�54	54
>"G���CCC�gdata
	�gproc	�gt		#�gsources		u�gp->s		u�gf->p		u�gfile	��gentry	��gfilenamefsystem/vm/coverage.scm�
�
��	�	��	�	��	#�	��	#�	��	/�	��	9�	��	:�	��	C�	��	]�	��	u�	��	~�	����	
����	����	,����	����	����	����	>����	����	����	����	.����	#����	��	�	gnamegprogram-sources*�C$R7@d@h(�]�&		�"	456�gdata
		$gfile		$gfilenamefsystem/vm/coverage.scm�
�
��	�	��	"�	.��	$�	��		$	gnamegfile-procedures�C8R17@d�9h(�]���
�$�"�C�gline
		"gcount		"g
instr+exec			"ginstr			"gexec			"gfilenamefsystem/vm/coverage.scm�
�	��	�	'��	�	'��	�	��	�	"��	�	&��	�	"��	�	&��	!�	��
		"	C:hv]6ngline-counts
		gfilenamefsystem/vm/coverage.scm�
�	��	�	��	�	
��		Ch8p]
H44�&		�"	4555KJ�J�Dhgdata
		8gfile		8g
instr+exec			8gfilenamefsystem/vm/coverage.scm�
�
��	�	��		�	��	�	��	*�	��	.�	��	3�	
��	6�	��	8�	��
		8	gnameginstrumented/executed-lines�g
documentationfdReturn the number of instrumented and the number of executed source lines in
FILE according to DATA.�C'R17@d�9;hv]6ngline-counts
		gfilenamefsystem/vm/coverage.scm�
�		��	�	!��	�	��		Ch0<]4�&		�"	45564gdata
		*gfile		*gfilenamefsystem/vm/coverage.scm�
�
��	�		��	
�	��	&�		��	*�	��		*	gnamegline-execution-counts�g
documentationfrReturn a list of line number/execution count pairs for FILE, or #f if FILE
is not among the files covered by DATA.�C(R9h�]�C�gfile
		gcounts		gfiles			gfilenamefsystem/vm/coverage.scm�
	
��		��			C@d�h(+]�&		�"	456#gdata
		$gfilenamefsystem/vm/coverage.scm�
�
��		
��	
	
��	$	��		$gnameginstrumented-source-files�g
documentationfxReturn the list of `instrumented' source files, i.e., source files whose code
was loaded at the time DATA was collected.�C&R89-6<h8�]4M5$C4M>"GL45�6�gname
		7gmodule		7gresult			7gfilenamefsystem/vm/coverage.scm�
	��		��		��		��	*	��	5	��	7	��		7	Ch�]LLO6�gmodules
		gresult		gfilenamefsystem/vm/coverage.scm�
	��		��			gnamegloop�C<=h0�]H45KOQ44556�gseen
		-gloop		-gfilenamefsystem/vm/coverage.scm�

��	
	��		��		��	"	)��	%	9��	(	)��	*	��	+	��	-	��		-
gnamegloaded-modules�C0R9>h(�]$45$�CCC�gbinding
		%gvar		%gresult			%gvalue			"gfilenamefsystem/vm/coverage.scm�
	
��		��			��		 ��		��	 	��	 	��	!	��			%	C?h�]456�gmodule
		gfilenamefsystem/vm/coverage.scm�

��	$	
��	%	
��		��		gnamegmodule-procedures�C/R.'hXc]"1(C�45�$C�45"����$4�5""���[gsources
		Ugip		Ugsources			7gline			7gsource			7gfilenamefsystem/vm/coverage.scm�
'
��	+	��	-	��	/	��	/	��	0	��	0	��	"0	
��	(2	��	)2	"��	72	��	7+	��	<,	��	@,	��	A,	+��	F,	8��	H,	+��	U+	��		U	gnamegclosest-source-line�C,R4@ABCDEF	hX]
45$F45$CL�4445$"54556Cgproc
		Vgresult		Vgt		3	Fgfilenamefsystem/vm/coverage.scm�
6	��	8	
��	
8	��	8	"��	8	��	&9	��	':	��	*:	��	-:	(��	3:	$��	C:	?��	H:	��	I;	��	Q:	��	S9	��		V	gnamegloop�C4ABCDEF	hX]OQ45$64445$"54556Cgproc
		Rgloop	
	Rgt		0	Cgfilenamefsystem/vm/coverage.scm�
4
��	
6	��	8	
��	8	��	#7	��	$:	��	':	��	*:	(��	0:	$��	@:	?��	E:	��	F;	��	N:	��	P9	��	Q7	��		Rgnamegclosed-over-procedures�C+RGH&8IJKGL&4$MNGOP1)GQhp]LL6hgcount
		gfilenamefsystem/vm/coverage.scm�
S	��	T	(��	T	��		Ch�{]45$p4L5�$\4�545$"
454L>"G4	L5
LO6CCsgproc
		gsources		}gline		'	{gt		0	Kgname		K	{gfilenamefsystem/vm/coverage.scm�
I	��	K		��	
K	��	L	��	L		��	M	��	M	��	 N	��	%N	3��	'N	��	'N	��	*O	!��	0O	��	?P	!��	DP	,��	HP	!��	KN	��	NQ	��	TQ	��	]Q	��	hR	��	{R	��		gnameg
dump-function�CGRh �]��L�6�g
line+count
		gline		gcount			gfilenamefsystem/vm/coverage.scm�
_	 ��	`	/��	a	/��	`	"��	b	1��	c	,��	b	$��		C('STUVWh��]!4L54545$�4L>"G4LLO>"G4	LO4
L5>"G4L>G4L>"G4L
>"GL6456�gfile
	�gprocs	�gpath		�ginstr	��gexec	��gfilenamefsystem/vm/coverage.scm�
X	��	Y	��	Z	��	Y	��	[	��	#[	��	$]	��	*]	#��	1]	��	:^	��	U_	��	_d	 ��	l_	��	uf	$���e	���g	���g	%���g	���h	���h	%���h	���i	#���i	���k	���l	���k	��	�C&h0�]4>"GO456�gdata
		*gport		*gfilenamefsystem/vm/coverage.scm�
C
��	W	��		W	��	W	��	"n	��	*X	��		*	gnamegcoverage-data->lcov�g
documentationfTraverse code coverage information DATA, as obtained with
`with-code-coverage', and write coverage information in the LCOV format to PORT.
The report will include all the modules loaded at the time coverage data was
gathered, even if their code was not executed.�C*RC�gm
		,grtd
t�gfilenamefsystem/vm/coverage.scm�		
���	0
��Y	4
��]	>
��	v	m
��1B�
��4��
��7t�
��8a�
��;��
��>�
��@6�
��C
��D�
��F�'
��I�4
��RjC
��	Rl
C6PK*[i�v�@@vm/trace.gonu�[���GOOF----LE-8-2.0(]h4h�]gguile�	�	gdefine-module*�	�	�	gsystem�	gvm�	gtrace�		�	
gfilenameS�	fsystem/vm/trace.scm�	gimportsS�	
gbase�	gsyntax�	
�	�	�	�	gframe�	�	�	gprogram�	�	�	gobjcode�	�	�	gtraps�	�	�	grnrs�	 gbytevectors�	! �	"!�	#ginstruction�	$#�	%$�	&gice-9�	'gformat�	(&'�	)(�	*"%)	�	+gexportsS�	,gtrace-calls-in-procedure�	-gtrace-calls-to-procedure�	.gtrace-instructions-in-procedure�	/gcall-with-trace�	0,-./�	1gset-current-module�	21�	31�	4g*objcode-header-len*�	5g
string-append�	6g
string-length�	7f�	8gbuild-prefix�	9f|  �	:f~d> �	;gcurrent-error-port�	<f~a~v:@y
�	=gframe-call-representation�	>gprint-application�	?gframe-num-locals�	@gframe-local-ref�	Af~d< �	Bf~ano values
�	Cf~a~d values:~{ ~a~}
�	Dgmap�	Ef~v:@y�	Fgframe-return-values�	Ggprint-return�	HgwidthS�	IH��	JgvmS�	KJ	��	LgprefixS�	ML	��	Ng
max-indentS�	ON	��	PIKMO�	Qgthe-vm�	Rftrace: �	Sgtrap-calls-to-procedure�	Tgtrap-calls-in-dynamic-extent�	UN	��	VIKU�	Wg#trap-instructions-in-dynamic-extent�	Xgframe-instruction-pointer�	Ygprogram-objcode�	Zgframe-procedure�	[gobjcode->bytecode�	\f~8d: ~a
�	]gopcode->instruction�	^gcalls?S�	_^��	`g
instructions?S�	a`	��	bH	��	cJ	��	dN	��	e_abcd�	fgset-vm-trace-level!�	ggvm-trace-level�C5h@�]4	
*+0543>"G	4R56'7h`x]"M�$64545��$45�"���456
"���pgprefix
		^gdepth		^ginfix			^gnumeric-format			^g
max-indent			^gindent			Sgn			Sgfilenamefsystem/vm/trace.scm�
	&
��		'	��		)	��		(	��		*	��		+	��		+	#��	&	+		��	)	+	��	-	(	��	.	,	
��	9	,	'��	A	,	��	H	.	#��	S	.	��	S	'	��	U	'	��	^	'	��		^	gnamegbuild-prefix�C8R89:';<=h0%]
4545456gframe
		)gdepth		)gwidth			)gprefix			)g
max-indent			)gprefix			)gfilenamefsystem/vm/trace.scm�
	0
��		1	��		1	+��	
	1	1��		1	��		1	��		2	��		2	!��	!	5	��	)	2	��		)	gnamegprint-application�C>R?@89A';B<CD'Ehh]L6`gval
		
gfilenamefsystem/vm/trace.scm�
	H	��		I	!��	
	I	��		
CFh��]454�545
�$
456�$45	4	�5645
4O4
556�gframe
	�gdepth	�gwidth		�gprefix		�g
max-indent		�glen			�gnvalues		�gprefix		&�gfilenamefsystem/vm/trace.scm�
	7
��		8	��			8	��		9	��		9	)��		9	��		8	��		:	��	 	:	,��	"	:	2��	&	:	��	&	8	��	0	;	��	3	=	��	9	=	$��	=	=	��	E	;	��	H	?	��	N	?	$��	S	B	��	\	B	&��	^	B	��	`	?	��	c	F	��	i	F	$��	n	H	��	x	J	���	H	���	F	��	�	gnamegprint-return�CGRPQRS>h�]LLL6�gframe
		gdepth		gfilenamefsystem/vm/trace.scm�
	O	��		P	��			gnameg
apply-handler�CGh�]LLL6�gframe
		gdepth		gfilenamefsystem/vm/trace.scm�
	Q	��		R	��			gnamegreturn-handler�CJhh'-/03#	P#45##	(�OO6gproc
		agwidth		agvm			agprefix			ag
max-indent			agfilenamefsystem/vm/trace.scm�
	L
��	$	L	=��	2	M	+��	?	N	/��	a	S	��		a
gwidthS�gvmS	�gprefixS	�g
max-indentS	�gnamegtrace-calls-to-procedure�C-RPQRT>h�]LLL6�gframe
		gdepth		gfilenamefsystem/vm/trace.scm�
	Y	��		Z	��			gnameg
apply-handler�CGh�]LLL6�gframe
		gdepth		gfilenamefsystem/vm/trace.scm�
	[	��		\	��			gnamegreturn-handler�CJhh'-/03#	P#45##	(�OO6gproc
		agwidth		agvm			agprefix			ag
max-indent			agfilenamefsystem/vm/trace.scm�
	V
��	$	V	=��	2	W	+��	?	X	/��	a	]	��		a
gwidthS�gvmS	�gprefixS	�g
max-indentS	�gnamegtrace-calls-in-procedure�C,RVQWXYZ[4'\]	h8]45445545��456	gframe
		8gip			8gobjcode			8gopcode		&	8gfilenamefsystem/vm/trace.scm�
	b	��		c	��			c	��		d	��		d	%��		d	��		c	��		e	&��	%	f	&��	&	e	��	&	c	��	-	g	��	0	g	 ��	8	g	��		8gnameg
trace-next�CJhH-/03#	P#45#	(�6�gproc
		Cgwidth		Cgvm			Cg
max-indent			Cgfilenamefsystem/vm/trace.scm�
	`
��	$	`	D��	5	a	6��	C	i	��		C
gwidthS�gvmS	�g
max-indentS	�gnamegtrace-instructions-in-procedure�C.ReQ,JHN.fghP�]L$4LLLL5N"L$4LLLL5N"L4L5�6�gfilenamefsystem/vm/trace.scm�
	t	��		u	��			w	��		v	��	'	y	��	(	{	��	<	z	��	E	}	$��	L	}	 ��	N	}	��		N
CfghX�]4L4L5�>"GM$4M>"G"M$4M>"G"NNC�gfilenamefsystem/vm/trace.scm�
		��	�	��	�	$��	�	 ��	�	��	"�	��	#�	��	<�	��	=�	��	S�	��	V�	��		X
C,JHN.fghP�]L$4LLLL5N"L$4LLLL5N"L4L5�6�gfilenamefsystem/vm/trace.scm�
	t	��		u	��			w	��		v	��	'	y	��	(	{	��	<	z	��	E	}	$��	L	}	 ��	N	}	��		N
CfghX�]4L4L5�>"GM$4M>"G"M$4M>"G"NNC�gfilenamefsystem/vm/trace.scm�
		��	�	��	�	$��	�	 ��	�	��	"�	��	#�	��	<�	��	=�	��	S�	��	V�	��		X
CfghX�]4L4L5�>"GM$4M>"G"M$4M>"G"NNC�gfilenamefsystem/vm/trace.scm�
		��	�	��	�	$��	�	 ��	�	��	"�	��	#�	��	<�	��	=�	��	S�	��	V�	��		X
Ch��-/03###	P#45#	(�HHOO4O>"GV4>X4O>"GCX4O>"GF~gthunk
	�gcalls?	�g
instructions?		�gwidth		�gvm		�g
max-indent		�g	call-trap		K�g	inst-trap		K�gfilenamefsystem/vm/trace.scm�
	o
��	6	p	)��	G	p	?��	K	q	��	p	s	��	�
gcalls?S�g
instructions?S	�gwidthS	�gvmS	�g
max-indentS	�gnamegcall-with-trace�C/RC�gm
		,gfilenamefsystem/vm/trace.scm�		
��	1	$
��#	&
���	0
���	7
��	�	L
���	V
���	`
��9	o
��
	;
C6PK*[7*9Q99
vm/objcode.gonu�[���GOOF----LE-8-2.0!]4h]gguile�	�	gdefine-module*�	�	�	gsystem�	gvm�	gobjcode�		�	
gfilenameS�	fsystem/vm/objcode.scm�	gexportsS�	
gobjcode?�	gobjcode-meta�	gbytecode->objcode�	gobjcode->bytecode�	gload-objcode�	g
write-objcode�	g	word-size�	g
byte-order�	
�	gset-current-module�	�	�	gload-extension�	g
string-append�	f	libguile-�	geffective-version�	fscm_init_objcodes�C5h@�]4	
54>"Gi4i4i556gm
		(gfilenamefsystem/vm/objcode.scm�		
��	-		��	3		��	4		+��	<		��	>		��	@	
��		@
C6PK*[j~Y��=�=
vm/program.gonu�[���GOOF----LE-8-2.0�=]�4hI
]gguile�	�	gdefine-module*�	�	�	gsystem�	gvm�	gprogram�		�	
gfilenameS�	fsystem/vm/program.scm�	gimportsS�	
gbase�	gpmatch�	
�	�	ginstruction�	�	�	gobjcode�	�	�	grnrs�	gbytevectors�	�	�	gsrfi�	gsrfi-1�	�	�	gsrfi-26�	 �	! �	"!�	#gexportsS�	$gmake-program�	%gmake-binding�	&gbinding:name�	'gbinding:boxed?�	(g
binding:index�	)g
binding:start�	*gbinding:end�	+gsource:addr�	,gsource:line�	-g
source:column�	.gsource:file�	/gsource:line-for-user�	0gprogram-sources�	1gprogram-sources-pre-retire�	2gprogram-source�	3gprogram-bindings�	4gprogram-bindings-by-index�	5gprogram-bindings-for-ip�	6gprogram-arities�	7g
program-arity�	8garity:start�	9g	arity:end�	:g
arity:nreq�	;g
arity:nopt�	<garity:rest?�	=garity:kw�	>garity:allow-other-keys?�	?gprogram-arguments-alist�	@gprogram-lambda-list�	Agprogram-meta�	Bgprogram-objcode�	Cgprogram?�	Dgprogram-objects�	Egprogram-module�	Fgprogram-base�	Ggprogram-free-variables�	Hgprogram-num-free-variables�	Igprogram-free-variable-ref�	Jgprogram-free-variable-set!�	K$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJ'�	Lgset-current-module�	ML�	NL�	Ogload-extension�	Pg
string-append�	Qf	libguile-�	Rgeffective-version�	Sfscm_init_programs�	Tglist-ref�	Ug*bytecode-header-len*�	Vgopcode->instruction�	Wgload-program�	Xginstruction-length�	Ygbytecode-instruction-length�	Zgobjcode->bytecode�	[greverse�	\gerror�	]f
unexpected�	^gmap�	_gcdr�	`gsort!�	agassv-ref�	bgappend!�	cgcollapse-locals�	df	bad arity�	egrequired�	fgoptional�	ggkeyword�	hgallow-other-keys?�	igrest�	jgextents�	kgarglist->arguments-alist�	lgstring->symbol�	mf_�	nglength�	ogarity->arguments-alist�	pgand=>�	qgarguments-alist->lambda-list�	rgassq-ref�	sgkeyword->symbol�	tgcar�	ugappend�	vu�	wu�	xgoptionalS�	ygkeyS�	zgunfold�	{g1+�	|gformat�	}f#<procedure ~a~a>�	~gprocedure-name�	f~a at ~a:~a:~a��gnumber->string��gobject-address��f<current input>��f<unknown port>��f��f ��gstring-join��gobject->string��f | ��g
write-program�C5hH1�]4	
"#K54N>"G4Oi4PiQ4Ri55S>"Gh�]C�gname
		gboxed?		gindex			gstart			gend			gfilenamefsystem/vm/program.scm�
	5
��		6	��			gnamegmake-binding�C%RThx]
6pgb
			gfilenamefsystem/vm/program.scm�
	7
��			7	��			gnamegbinding:name�C&RThz]6rgb
			gfilenamefsystem/vm/program.scm�
	8
��			8	��			gnamegbinding:boxed?�C'RThy]	6qgb
		
gfilenamefsystem/vm/program.scm�
	9
��	
	9	��		
gnameg
binding:index�C(RThy]	6qgb
		
gfilenamefsystem/vm/program.scm�
	:
��	
	:	��		
gnameg
binding:start�C)RThw]	6ogb
		
gfilenamefsystem/vm/program.scm�
	;
��	
	;	��		
gnamegbinding:end�C*Rh|]�Ctgsource
		gfilenamefsystem/vm/program.scm�
	=
��		>	��		gnamegsource:addr�C+Rh|]��Ctgsource
		gfilenamefsystem/vm/program.scm�
	?
��		@	��		gnamegsource:file�C.Rh|]���Ctgsource
		gfilenamefsystem/vm/program.scm�
	A
��		B	��		gnamegsource:line�C,Rh~]���Cvgsource
		gfilenamefsystem/vm/program.scm�
	C
��		D	��		gnameg
source:column�C-R,h�]45�C�gsource
		gfilenamefsystem/vm/program.scm�
	I
��		J	��	
	J	��		gnamegsource:line-for-user�C/R	URUVWXhh�]�4�5&��	���"645
�$"��	�	��	��	���"45�C�gbytecode
		hgip		hgidx			hginst			hgfilenamefsystem/vm/program.scm�
	Q
��		R	��		R	��	
	S	��		S	$��		S	��		R	��		V	��		U	��	"	W	1��	#	W	
��	*	X	1��	+	X	
��	,	W	
��	1	Y	
��	9	Y	
��	=	U	��	B	\	.��	C	\	��	F	\	
��	M	]	.��	N	]	��	Q	]	
��	R	\	
��	Y	^	)��	Z	^	
��	[	\	
��	`	a	
��	g	U	��		h	gnamegbytecode-instruction-length�CYRZB[Y\]0h��]I4455"n(6��$P��"6	�$		4	5�	"������	"���	"���645
"���gproc
	�gbv	�gin		�gout		�gip		�gv		#�gvx		2	|gvy		2	|gip		:	pgnext			:	p
gfilenamefsystem/vm/program.scm�
	m
��		n	��		n	��		n	��		n	��		o	��		r	��	 	t	��	#	v	��	#	v	��	:	x	��	?	z	��	C	z	
��	H	{	#��	Q	{	��	Y	{	��	\	|	��	a	}	��	p	|	��	p	x	����	����	���	o	���	o	���	p	���	o	��	�gnamegprogram-sources-pre-retire�C1R^_`h�]���C{gx
		
gy		
gfilenamefsystem/vm/program.scm�
�	��	�	)��	�	1��		�	&��		
	Ca(bh��]!"n(456�4455$$4>"G�"���45��"���"���~glocs
		gret		tglocs			tgb			tgt		.	tgfilenamefsystem/vm/program.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	!�	��	&�	��	.�	��	.�	
��	7�	��	@�	#��	E�	��	R�	��	Z�	��	[�	��	f�	)��	i�	��	l�	��	t�	��	t�	��	u�	��	�	��		gnamegcollapse-locals�CcR3ch �]	45$6C�gprog
		gt			gfilenamefsystem/vm/program.scm�
�
��	�		��		�	��	�	��		gnamegprogram-bindings-by-index�C4R[)*4h��]"m(6�"I("F"	�"���4�5�$4�5�$
��""���"����"���"���45"����gprog
	�gip	�gin			sgout			sgbinds			bgfilenamefsystem/vm/program.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	,�	!��	2�	��	2�	��	3�	��	8�	(��	:�	��	=�	��	A�	��	D�	��	I�	&��	K�	��	L�	��	S�	��	V�	��	b�	��	e�	��	k�	��	s�	��	s�	��	t�	��	{�	6����	��	�	gnamegprogram-bindings-for-ip�C5R\dh8�]�$$���$��C66�ga
		5gvx		-gvy			-gfilenamefsystem/vm/program.scm�
�
��	�	��	)�	3��	-�	,��	1�	3��	5�	,��		5gnamegarity:start�C8R\dh8�]	�$ ���$��C66�ga
		1gvy		)gfilenamefsystem/vm/program.scm�
�
��	�	��	%�	1��	)�	*��	-�	1��	1�	*��		1gnameg	arity:end�C9Rh8�]�$,���$���$��C
C
C
C�ga
		7gvy		5gvy			3gfilenamefsystem/vm/program.scm�
�
��	�	��		7gnameg
arity:nreq�C:RhP�]�$>���$,���$���$��C
C
C
C
C�ga
		Igvy		Ggvy			Egvy		,	Cgfilenamefsystem/vm/program.scm�
�
��	�	��		Ignameg
arity:nopt�C;Rh`�]!�$P���$>���$,���$���$��CCCCCC�ga
		[gvy		Ygvy			Wgvy		,	Ugvy		<	Sgfilenamefsystem/vm/program.scm�
�
��	�	��		[gnamegarity:rest?�C<Rh�]A�$����$o���$]���$K���$9���$'���$��(CCCCCCCCC�ga
	�gvy	�gvy		�gvy		,�gvy		<�gvy		L�gvx		_�gvy		_�gvy		m	~	gfilenamefsystem/vm/program.scm�
�
��	�	��	}�	:��	�gnamegarity:kw�C=Rh�
]A�$����$o���$]���$K���$9���$'���$��(CCCCCCCCCga
	�gvy	�gvy		�gvy		,�gvy		<�gvy		L�gvx		_�gvy		_�gvx		m	~	gfilenamefsystem/vm/program.scm�
�
��	�	��	�gnamegarity:allow-other-keys?�C>R689hhl]45$U"I(C$7"	�"���4�5�$4�5�$�C"���"����C"���Cdgprog
		hgip		hgarities				hgarities			^gfilenamefsystem/vm/program.scm�
�
��	�	��		�	��	�	��	�		��	�	��	*�	��	0�	��	0�	��	1�	��	6�	'��	8�	��	;�	��	?�	��	B�	��	G�	)��	I�	��	J�	��	N�	��	Q�	��	]�	��	^�		��		h	gnameg
program-arity�C7Refghijh�8]Q�$x���$e���$R���$?���$,��
	����	�
�CCCCCC0garglist
	�gvx	�gvy		�gvx		 	gvy		 	gvx		1	}gvy		1	}gvx		B	{gvy		B	{gvx			S	ygvy	
	S	ygfilenamefsystem/vm/program.scm�
�
��	�	��	Y�	��	�gnamegarglist->arguments-alist�CkRlmhk]6cgi
		gfilenamefsystem/vm/program.scm�
�	"��	�	>��	�	.��		C^(&ht]4545�Clgx
		gfilenamefsystem/vm/program.scm�
�	��	�	��	
�	1��	�	��		C58ah �]	4L5$CL6zgi
		gt		gfilenamefsystem/vm/program.scm�
�	��	�	��	�	��	�	��		Cn=e[fgh>i:;<h@ -.,3#H444555OK"�
�$*�4J
5�	
�
	"���
�$*�4J
5�	
�
	"���$24J
4455�5
�
	"��d	4
5�4
5�45�
45�	�C454545

	"��gprog
	:garity	:gmake-placeholder		:gvar-by-index		:grbinds		.	<gnreq		Bgreq		Bgnopt		Bgopt		Bgrest?		Bgrest			Bgn	
	Bgfilenamefsystem/vm/program.scm�
�
��	�	��	�	��	$�	0��	,�	��	.�	��	.�	��	B�	��	F�	��	J�	��	M�	
��	N�	��	W�	��	b�	��	t�	��	x�	��	|�	����	
����	����	����	����	����	����	
����	 ����	(����	 ����	����	
����	
����	����	����	����	����	����	����	����	����	���	���	���	���	*���	���	*�� �	��:�	��0	:	gnamegarity->arguments-alist�CoR7oh0,-.,3#45$6C$gprog
		0gip		0garity			0gfilenamefsystem/vm/program.scm�
�
��	�	��	�	��	&�	��	.�		��		0gnamegprogram-arguments-alist�g
documentationfPReturns the signature of the given procedure in the form of an association list.�C?Rp?qh(-.,3#456�gprog
		$gip		$gfilenamefsystem/vm/program.scm�
�
��	�		��	$�	��		$gnamegprogram-lambda-list�g
documentationfMReturns the signature of the given procedure in the form of an argument list.�C@Rref^stgiwxyh�`]!45$"45$"4445$"5545$"	4	�$	
�"4	�$	�"556Xgarguments-alist
	�gt		gt	&	8gt	K	]gt	j	|greq	|�gopt		|�gkey		|�grest		|�	gfilenamefsystem/vm/program.scm�
�
��	�	��		�	+��	�	��	�	
��	�	6��	�	��	$�	+��	&�	��	&�	
��	5�	6��	9�	
��	>�	��	C�	��	I�	9��	K�	��	K�	��	Z�	C��	_�	��	a�	
��	b�	��	h�	,��	j�	��	j�	��	y�	3��	|�	����	���	���	���	���	.����	���	���	���	���	)����	��&	�gnamegarguments-alist->lambda-list�CqRHzhb]L�CZgi
		gfilenamefsystem/vm/program.scm�
	��		��		CIhh]L6`gt-46b52c6efc-47d
		
gfilenamefsystem/vm/program.scm�
	��		
C{h �]	45OO
6�gprog
		 gcount			 gfilenamefsystem/vm/program.scm�

��		��			��	 	��		 gnamegprogram-free-variables�g
documentationf*Return the list of free variables of PROG.�CGR|}~p2|��.��/-
hP�]	44L5	545$"$"454	56�gs
		Kgt		;gfilenamefsystem/vm/program.scm�
	��		"��		��		/��		��		#��		��	0	#��	2	)��	8	;��	<	��	C	8��	K	��		KC��6�P��^�qoh}]44L556uga
		gfilenamefsystem/vm/program.scm�
	'��		*��		+��		*��		)��		C�h��]
45$"344
5O5$"445	54	5$�"$
"44
4O5556�gprog
	�gport	�gt			Sgt		1	Pgarities		Z�gfilenamefsystem/vm/program.scm�

��	
	��			��		
��		��	!	��	1	��	1	
��	@	��	C	��	M	��	T	��	Z	
��	b	��	e	"��	j	��	n	��	p	��	u	��	y	��	z	��	}	"��� 	"���	���	���
	��	�	gnameg
write-program�C�RC�gm
		,gfilenamefsystem/vm/program.scm�		
��	-	2
��	2	2	��	8	2	��	9	2	+��	A	2	��	C	3	��	H	2
��9	5
���	7
��u	8
��	9
���	:
��R	;
���	=
��	?
��	A
���	C
��`	I
��e	M
��	�	Q
��$	m
����
����
��6�
��?�
��5�
���
���
��C�
����
����
����
��c�
��$��
��&?�
��'��
��*��
��,�
��1F
��)	1H
C6PK*[��p�t�tvm/traps.gonu�[���GOOF----LE-8-2.0�t]�4hU]gguile�	�	gdefine-module*�	�	�	gsystem�	gvm�	gtraps�		�	
gfilenameS�	fsystem/vm/traps.scm�	gimportsS�	
gbase�	gpmatch�	
�	�	�	�	gframe�	�	�	gprogram�	�	�	gobjcode�	�	�	ginstruction�	�	�	gxref�	 �	! �	"grnrs�	#gbytevectors�	$"#�	%$�	&!%�	'gexportsS�	(gtrap-at-procedure-call�	)gtrap-in-procedure�	*gtrap-instructions-in-procedure�	+gtrap-at-procedure-ip-in-range�	,gtrap-at-source-location�	-gtrap-frame-finish�	.gtrap-in-dynamic-extent�	/gtrap-calls-in-dynamic-extent�	0g#trap-instructions-in-dynamic-extent�	1gtrap-calls-to-procedure�	2gtrap-matching-instructions�	3()*+,-./012�	4gset-current-module�	54�	64�	7gmake-syntax-transformer�	87�	97�	:g	arg-check�	;gmacro�	<g$sc-dispatch�	=<�	><�	?gany�	@????�	Ag
syntax-object�	Bgif�	Cgtop�	DC�	Egribcage�	Fgdummy�	Ggarg�	Hg
predicate?�	Igmessage�	JFGHI�	Kg
m-1f68148ae-0�	LKC�	MLDDD�	Nf
l-1f68148ae-5�	Of
l-1f68148ae-6�	Pf
l-1f68148ae-7�	Qf
l-1f68148ae-8�	RNOPQ�	SEJMR�	TE�	Ugx�	VU�	WL�	Xf
l-1f68148ae-2�	YX�	ZEVWY�	[DSTZ�	\ghygiene�	]\�	^AB[]�	_gnot�	`A_[]�	agerror�	bAa[]�	cfbad argument ~a: ~a�	dAc[]�	egquote�	fAe[]�	g???�	hFGH�	iLDD�	jf
l-1f68148ae-e�	kf
l-1f68148ae-f�	lfl-1f68148ae-10�	mjkl�	nEhim�	oDnTZ�	pABo]�	qA_o]�	rAao]�	sfbad argument ~a: expected ~a�	tAso]�	uAeo]�	vgsyntax-violation�	wv�	xv�	yf-source expression failed to match any pattern�	zftrap already enabled�	{ftrap already disabled�	|gnew-disabled-trap�	}gnew-enabled-trap�	~g	procedure�	gframe-procedure��gprogram?��gprogram-objcode��g
frame-matcher��gvmS���	���gclosure?S���	���g
our-frame?S���	��������gthe-vm��g
procedure?��gproc��ghandler��g	add-hook!��g
vm-apply-hook��gremove-hook!��g
current-frameS���	����	����	����	���������g
enter-handler��gexit-handler��gwarn��falready in proc��gframe-previous��gvm-push-continuation-hook��gvm-pop-continuation-hook��gvm-abort-continuation-hook��gvm-restore-continuation-hook��gnext-handler��gvm-next-hook��gnumber?��ginteger?��gexact?��gnon-negative-integer?��gpositive-integer?��gand-map��grange?��gor-map��g	in-range?��grange��g
frame-address��gframe-instruction-pointer��gobjcode->bytecode��gprogram-last-ip��f
unexpected��gfor-each��g	assv-set!��gassv-ref��gsort!��gprogram-sources-pre-retire��gprogram-sources-by-line��fno instructions found at��f:��f; using line��finstead��fno instructions found for��gsource->ip-range��gsource-closures��gsource-procedures��gsource-closures-or-procedures������gstring?��gfile��g	user-line��gmap��fNo procedures found at ~a:~a.���	������gframe?��greturn-handler��g
abort-handler��f.return-or-abort traps may only be enabled once���	����	����	����	���������g
apply-handler���	����	����	���������glength��gdelq�����g
frame-pred�C5hc]4	
&'3546>"G49:;>@^`bdfh(k]Ccgdummy
		$garg		$g
predicate?			$gmessage			$		$	Cgpqrtuh0V]CNgdummy
		)garg		)g
predicate?			)		)	Cxyh@�]45$@45$@6�gx
		9gtmp		9gtmp		"	9gfilenamefsystem/vm/traps.scm�
	N	��		9g
macro-typegsyntax-rules�gpatternsgargg
predicate?gmessagegargg
predicate?C5:Raza{hP�-.,3#M$"4>"G4L>"GNLC�gframe
		Igfilenamefsystem/vm/traps.scm�
	c	��		d	��	 	d	��	$	d	��	)	d	��	2	e	��	D	f	��		I
gnamegdisable-trap�ChX�-.,3#M$4>"G"4L>"GNLLLOC�gframe
		Rgfilenamefsystem/vm/traps.scm�
	]	��		^	��		^	��	 	^	��	%	^	��	2	_	��	F	`	��		R
gnamegenable-trap�Ch �]HOQC�gvm
		genable		gdisable			genabled?			genable-trap			gfilenamefsystem/vm/traps.scm�
	V
��		W	��			gnamegnew-disabled-trap�C|R|h�]456�gvm
		gframe		genable			gdisable			gfilenamefsystem/vm/traps.scm�
	k
��		l	��		l	��			gnamegnew-enabled-trap�C}R~��h8�]	45L&C45$454L5�CC�gframe
		2g
frame-proc			2gfilenamefsystem/vm/traps.scm�
	s	��		t	��			t	
��		u	��		u	��		v	��	 	v	��	!	w	��	(	x	��	/	w	��		2Chj]45L�Cbgframe
		
gfilenamefsystem/vm/traps.scm�
	y	��		z	��		z	
��		
Ch0�]
�$45"$OCOC�gproc
		.gmatch-objcode?		.gproc			.gfilenamefsystem/vm/traps.scm�
	n
��		o	��			o	��	
	p	��		o	��		r	��		.	gnameg
frame-matcher�C�R����as���h�]4L5$L6C�gframe
		gfilenamefsystem/vm/traps.scm�
�	��	�	
��	
�	��	�	
��		gnameg
apply-hook�C}��hm]4L5L6egframe
		gfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��		C��hm]4L5L6egframe
		gfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��		Ch�M-/03#45##4545$"4>"G45$"4	>"G
OQO
O6Egproc
	�ghandler	�gvm		�gclosure?		�g
our-frame?		�g
apply-hook	��gfilenamefsystem/vm/traps.scm�
	~
��		~	8��	0�	-��	;�	��	`�	����	��	�	
gvmS	�gclosure?S	�g
our-frame?S	�gnamegtrap-at-procedure-call�C(R����as������hX�]M$4L>"GN"4L5$%M$64L>"GNCC�gframe
		Sgfilenamefsystem/vm/traps.scm�
�	��	�	��		�	��	�	��	"�	
��	,�	��	2�	��	6�	��	:�	
��	;�	��	O�	��		Sgnameg
apply-hook�Ch(�]M$4L>"GNCC�gframe
		!gfilenamefsystem/vm/traps.scm�
�	��	�	��		�	��	�	��		!gnamegpush-cont-hook�C���hh]	M$4L>"GN"4L455$.45M$64L>"GNCC�gframe
		agframe	8	_gfilenamefsystem/vm/traps.scm�
�	��	�	��		�	��	�	��	"�	
��	%�	��	-�	
��	1�	��	2�	��	8�	
��	@�	��	D�	��	H�	
��	I�	��	]�	��		agnameg
pop-cont-hook�C��hX�]M$4L>"GN"4L5$%M$64L>"GNCC�gframe
		Sgfilenamefsystem/vm/traps.scm�
�	��	�	��		�	��	�	��	"�	
��	,�	��	2�	��	6�	��	:�	
��	;�	��	O�	��		Sgnameg
abort-hook�C��hX�]M$4L>"GN"4L5$%M$64L>"GNCC�gframe
		Sgfilenamefsystem/vm/traps.scm�
�	��	�	��		�	��	�	��	"�	
��	,�	��	2�	��	6�	��	:�	
��	;�	��	O�	��		Sgnamegrestore-hook�C}��������	h�4]44L5L>"G44L5L>"G44L5L>"G44L5L>"G44L5L>"G$24L5$%M$64L>"GNCCC,gframe
	�gfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��	�	��	�	��	�	��	,�	��	5�	��	8�	��	E�	��	N�	��	Q�	��	^�	��	g�	��	j�	��	w�	����	����	����	����	����	����	
����	����	��	�C������h��]M$4L>"GN"44L5L>"G44L5L>"G44L5L>"G44L5L>"G4L5L6�gframe
	�gfilenamefsystem/vm/traps.scm�
�	��	�	��		�	��	�	��	"�	��	%�	��	2�	��	;�	��	>�	��	K�	��	T�	��	W�	��	d�	��	m�	��	p�	��	}�	����	����	��	�ChX9-/03
##45##4545$"4>"G45$"4	>"G45$"4
>"GHOO	
O
OOQQ	Q
QQ
	O	
	O61gproc
	Qg
enter-handler	Qgexit-handler		Qg
current-frame		Qgvm		Qgclosure?		Qg
our-frame?		Qgin-proc?	�Qg
apply-hook	�Qgpush-cont-hook		�Qg
pop-cont-hook	
�Qg
abort-hook	�Qgrestore-hook	�Q
gfilenamefsystem/vm/traps.scm�
�
��	#�	4��	9�	(��	D�	��	i�	����	����	��Q�	��		Q	
g
current-frameS	�gvmS	�gclosure?S	�g
our-frame?S	�gnamegtrap-in-procedure�C)R����as����h�]4L5$L6C�gframe
		gfilenamefsystem/vm/traps.scm�
�	��	�	
��	
�	��	�	
��		gnameg	next-hook�C)��h8�]44L5L>"G$4L5$L6CC�gframe
		6gfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��	�	��	!�	��	"�	
��	,�	��	2�	
��			6gnamegenter�C��h(�]4L>"G4L5L6gframe
		!gfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��	!�	��		!gnamegexit�C���h��-/03##45##4545$"4>"G45$"4	>"G45$"4
>"GOQ
OO6	�gproc
	�gnext-handler	�gexit-handler		�g
current-frame		�gvm		�gclosure?		�g
our-frame?		�g	next-hook	��gfilenamefsystem/vm/traps.scm�
�
��	#�	A��	9�	*��	D�	��	i�	����	����	��	�	
g
current-frameS	�gvmS	�gclosure?S	�g
our-frame?S	�gnamegtrap-instructions-in-procedure�C*R���h0�]45$ 45$45$
��CCCC�gx
		/gfilenamefsystem/vm/traps.scm�
�
��	�	��	
�	��	�	��	�	��	�	 ��	#�	��	&�	0��	(�	+��
		/gnamegnon-negative-integer?�C�R���h0�]45$45$45$
�CCCC�gx
		.gfilenamefsystem/vm/traps.scm�

��		��	
	��		��		��		 ��	#	��	&	+��			.gnamegpositive-integer?�C�R��h �]�$4�5$�6CC�gx
		 gfilenamefsystem/vm/traps.scm�
	��		��			��	
	��		.��		��		��		.��		��
		 Ch�]�$6C|gx
		gfilenamefsystem/vm/traps.scm�

��		��			��		��		gnamegrange?�C�R�h�]�L�$L��CC�gbounds
		gfilenamefsystem/vm/traps.scm�
	
��	
	��	
	��	
	��		��		��		Ch�]O6�grange
		gi		gfilenamefsystem/vm/traps.scm�

��		��			gnameg	in-range?�C�R����as������h@�]	","NC�$��$	�"���"���"���M"����gfp
		:gframes		2gfilenamefsystem/vm/traps.scm�
	��		��	!	��		��		��		��		#��		 ��	!	��	$ 	��	* 	��	2	��
		:gnamegcull-frames!�C���hpk]!45454L>"G4L5M�$
M��"$$CM�NC$
M�NL6Ccgframe
		ogfp		ogip			og
now-in-range?		A	og
was-in-range?		A	ogfilenamefsystem/vm/traps.scm�
#	��	$	��	
%	��	$	��	&	��	''	��	2(	"��	6(	��	9(	6��	<(	3��	A'	��	K)	
��	Q+	��	V,	��	X,	��	`)	
��	e.	��	g.	��	m/	��		ognamegnext-handler�C*�h(�]M�$M�45�$M�NCCC�gframe
		#gfilenamefsystem/vm/traps.scm�
1	��	2	��		2	��	3	��	
3	!��	3	��	2	
��	4	��	4	
��
		#gnamegexit-handler�C���h��-/03
##45##4545$"4>"G4	5$"4
>"G45$"4>"GH
OO	QQ		O6	�gproc
	�grange	�ghandler		�g
current-frame		�gvm		�gclosure?		�g
our-frame?		�gfp-stack	��gcull-frames!	��gnext-handler		��
gfilenamefsystem/vm/traps.scm�

��	#	@��	9	)��	D	��	i	���	���	���	���6	��
	�	
g
current-frameS	�gvmS	�gclosure?S	�g
our-frame?S	�gnamegtrap-at-procedure-ip-in-range�C+R��h�]4455
�C�gprog
		gfilenamefsystem/vm/traps.scm�
=
��	>	��	>	0��	>	��	>	��		gnamegprogram-last-ip�C�Ra�����h0�]	4M��4M�5$"�5NC�gpair
		0gt		)gfilenamefsystem/vm/traps.scm�
T	��	V	��	
V	$��	
W	$��	X	(��	X	8��	X	(��	X	$��	&Y	(��	*W	��	,V	��	.U	
��
		0C�h�]���Cygx
		
gy		
gfilenamefsystem/vm/traps.scm�
[	��	[	(��	[	0��		[	%��		
	C�	h �]R"�$����$����$����$g�	��$L	��$0��

�$
�
��"45
"
45���"	"45"45"45"��-H4O>"G4J>"GJC45"����gproc
	gfile	gsources		gout		gv		�gvx		"�gvy		"�gvx		3�gvy		3�gvx			A�gv	
	^�gvx		j	xgalist	�
gfilenamefsystem/vm/traps.scm�
@
��	A	��		C	��	
C	��	D	��	E	��	E	��	LG	��	PG	��	UI	*��	VI	#��	ZI	��	]J	+��	^J	#��	uL	&��	}M	+���M	2���M	+���N	2���N	#���H	���H	���Q	���Q	���Q	���Q	���Q	���Q	���Q	���D	���R	���R	���S	
���[	
��A	��
A	��B	��A	��'		gnamegprogram-sources-by-line�C�R������h@�]�L�$�C�L�$#4LL�>"G�CC�gline-and-ranges
		?gfilenamefsystem/vm/traps.scm�
_	��	a	��	a	��	`	��	b	��	c	��	c	��	`	��	d	��	d	��	#d	8��	'e	��	*e	'��	,e	=��	1d	��	<f	��		?C����h@�]4O455$C4>"GC�gproc
		>gfile		>gline			>gt			>gfilenamefsystem/vm/traps.scm�
^
��	_	��	h	��	_	��	_	��	%j	��	)j	��	-j	/��	4j	��	=k	��		>	gnamegsource->ip-range�C�R��h(�]
45�$D45D�gfile
		%gline		%gclosures			%gfilenamefsystem/vm/traps.scm�
m
��	n	��	n	��	o	��	o	��	p	��	q	��	%q	��			%	gnamegsource-closures-or-procedures�C�R���as���������}��+���h(�]	4LL�5LLLL6	�gproc
		&grange		&gfilenamefsystem/vm/traps.scm�
�	��	�	!��	�	=��	�	!��	�	��	&�	��		&Ca�h0�]4LLLLLLOL5NM(
LL6C�gframe
		.gfilenamefsystem/vm/traps.scm�
�		��	�	��	�	��	"�	��	&�	��	,�	��		.C�hc]L6[gtrap
		gfilenamefsystem/vm/traps.scm�
�	��	�	$��		Ch m]4OM>"GNCegframe
		 gfilenamefsystem/vm/traps.scm�
�		��	�	��	�	��		 Ch��-/03##4545$"4>"G45$"4	
>"G45$"4
>"GH4�>GOO6�gfile
	�g	user-line	�ghandler		�g
current-frame		�gvm		�gtraps	��gprocs	��g	closures?	��gfilenamefsystem/vm/traps.scm�
w
��	#x	:��	*y	��	Oz	��	t{	���|	���~	���~	7���~	���}	����	��	�	
g
current-frameS	�gvmS	�gnamegtrap-at-source-location�C,R���as�������h(�]M$45M&	NL6CC�gframe
		"gfilenamefsystem/vm/traps.scm�
�	��	�	��		�	��	�	
��	�	��	�	��		"gnameg
pop-cont-hook�C�h(�]M$45M�$	NL6CC�gframe
		#gfilenamefsystem/vm/traps.scm�
�	��	�	��		�	��	�	��	�	
��	�	��	�	��		#gnameg
abort-hook�C}a�����h`�]M$"4>"G44L5L>"G44L5L>"G4L5L6�gframe
		]gfilenamefsystem/vm/traps.scm�
�	��	�	��	
�	��	�	��	�	��	�	��	"�	��	/�	��	8�	��	;�	��	H�	��	S�	��	]�	��		]C����hH�]N44L5L>"G44L5L>"G4L5L6�gframe
		Dgfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��		�	��	�	��	�	��	"�	��	/�	��	:�	��	D�	��		DCh�_-/03#4545$"4>"G45$"4	
>"G45$"4
>"G45H
OOQQOO6Wgframe
	�greturn-handler	�g
abort-handler		�gvm		�gfp	��g
pop-cont-hook	��g
abort-hook	��gfilenamefsystem/vm/traps.scm�
�
��	�	&��	!�	��	F�	��	k�	����	����	����	��		�	
gvmS	�gnamegtrap-frame-finish�C-R����as�����h �]4M>"GNL6�gframe
		gfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��	�	��		gnameg
abort-hook�C-h �]4M>"GNL6�gframe
		gfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��	�	��		gnamegreturn-hook�C�hH�]M$"4L5$,4L>"G4LLOLL5NCC�gframe
		Fgfilenamefsystem/vm/traps.scm�
�	��	�	
��	�	��	�	��	�	��	+�	��	B�	��		Fgnameg
apply-hook�C}��hm]4L5L6egframe
		gfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��		C��hH�]M$+4M>"GN4L>"G"N4L5L6�gframe
		Cgfilenamefsystem/vm/traps.scm�
�	��	�	��		�	��	�	��	�	��	6�	��	9�	��	C�	��			CCh(-/03##45##4545$"4>"G45$"4	>"G45$"4
>"G45$"4>"GHO	
O
Q		Q

O
O6gproc
	$g
enter-handler	$greturn-handler		$g
abort-handler		$g
current-frame		$gvm		$gclosure?		$g
our-frame?		$g	exit-trap	�$g
abort-hook		�$g
apply-hook	
�$gfilenamefsystem/vm/traps.scm�
�
��	#�	9��	9�	-��	D�	��	i�	����	����	����	��$�	��
	$	
g
current-frameS	�gvmS	�gclosure?S	�g
our-frame?S	�gnamegtrap-in-dynamic-extent�C.R����as����h�]M�NC|gframe
			gfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��			gnameg
trace-push�Ch �]4LM>"GM�NC�gframe
		gfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��	�	��		gnameg	trace-pop�Ch|]LM6tgframe
		
gfilenamefsystem/vm/traps.scm�
�	��	
�	��		
gnamegtrace-apply�C.����hH�]44L5L>"G44L5L>"G4L5L6�gframe
		Agfilenamefsystem/vm/traps.scm�
�	��	�	��	�	��	�	��	�	��	�	��	,�	��	7�	��	A�	��
		Agnamegenter�C����hH�]44L5L>"G44L5L>"G4L5L6�gframe
		Agfilenamefsystem/vm/traps.scm�
	��	�	��	�	��	�	��	�	��	�	��	,�	��	7	��	A	��
		Agnamegreturn�C����hH�]44L5L>"G44L5L>"G4L5L6�gframe
		Agfilenamefsystem/vm/traps.scm�
	��	�	��	�	��	�	��	�	��	�	��	,�	��	7	��	A	��
		Agnamegabort�C���h 
-/03##45##4545$"4>"G45$"4	>"G45$"4
>"G
HOO	
O
QQ	Q

	O
	O
	O6
gproc
	g
apply-handler	greturn-handler		g
current-frame		gvm		gclosure?		g
our-frame?		g*call-depth*	�g
trace-push	�g	trace-pop		�gtrace-apply	
�gfilenamefsystem/vm/traps.scm�
�
��	#�	?��	9�	(��	D�	��	i�	����	����	��	��			
g
current-frameS	�gvmS	�gclosure?S	�g
our-frame?S	�gnamegtrap-calls-in-dynamic-extent�C/R����as���h{]L6sgframe
		gfilenamefsystem/vm/traps.scm�
	��		��		gnameg
trace-next�C.��h]4L5L6wgframe
		gfilenamefsystem/vm/traps.scm�
	��		��		��		gnamegenter�C��h�]4L5L6xgframe
		gfilenamefsystem/vm/traps.scm�
	��		��		��		gnamegreturn�C��h]4L5L6wgframe
		gfilenamefsystem/vm/traps.scm�
"	��		��		��		gnamegabort�C���h��-/03##45##4545$"4>"G45$"4	>"G
OQO
OO6
�gproc
	�gnext-handler	�g
current-frame		�gvm		�gclosure?		�g
our-frame?		�g
trace-next	��gfilenamefsystem/vm/traps.scm�

��	#	F��	9	/��	D	��	i	���%	��	�	
g
current-frameS	�gvmS	�gclosure?S	�g
our-frame?S	�gnameg#trap-instructions-in-dynamic-extent�C0R���as������-�h0�]4M>"G4MM5NNLL6�gframe
		*gfilenamefsystem/vm/traps.scm�
?	��	:	��	<	��	;	��	"=	��	*A	��		*gnamegreturn-hook�C�h(�]4M>"G4MM5NNC�gframe
		$gfilenamefsystem/vm/traps.scm�
D	��	:	��	<	��	;	��	"=	��		$gnameg
abort-hook�C�h`�]4M54L>"G45&CH4LLOLOL5KJM�NC�gframe
		\gdepth			\gfinish-trap		.	\gfilenamefsystem/vm/traps.scm�
2	��	3	��		3	��	5	��	 7	��	+7	��	.8	��	1H	��	SG	��	XJ	��	ZI	��		\gnameg
apply-hook�C�hf]L6^gdisable
		gfilenamefsystem/vm/traps.scm�
_	��	_	$��		Ch n-.,3#L4L56fgframe
		 gfilenamefsystem/vm/traps.scm�
[	��	\	)��	 \	
��		 
ChH�-.,3#4OM>"GN4L5LOC�gframe
		Dgtrap	8	Dgfilenamefsystem/vm/traps.scm�
^	��	_	��	/a	#��	1a	��	2b	&��	8b	��		D
Ch�]LLOC|gtrap
		gfilenamefsystem/vm/traps.scm�
Y	��		gnamegwith-pending-finish-disablers�C(�h��-/03#4545$"4>"G45$"4>"G45$"4	>"GH
OOQQ4
56�gproc
	�g
apply-handler	�greturn-handler		�gvm		�gpending-finish-traps	��g
apply-hook	��gwith-pending-finish-disablers	��gfilenamefsystem/vm/traps.scm�
+
��	,	,��	!-	��	F.	��	k/	���0	���0	���e	���d	��
	�	
gvmS	�gnamegtrap-calls-to-procedure�C1R���as���h�]4L5$L6C�gframe
		gfilenamefsystem/vm/traps.scm�
n	��	o	
��	
o	��	p	
��		gnameg	next-hook�C}��hm]4L5L6egframe
		gfilenamefsystem/vm/traps.scm�
t	��	u	��	u	��		C��hm]4L5L6egframe
		gfilenamefsystem/vm/traps.scm�
v	��	w	��	w	��		C
h��-/03#4545$"4>"G45$"4>"G	OQ
OO6�g
frame-pred
	�ghandler	�gvm		�g	next-hook		s�gfilenamefsystem/vm/traps.scm�
i
��	j	/��	!k	��	Fl	���r	��	�	
gvmS	�gnamegtrap-matching-instructions�C2RCgm
		,gfilenamefsystem/vm/traps.scm�		8
���	V
���	k
��	[	n
��
P	~
����
����
��!�
��!�
��#
��$�
��,
��,�=
��2z@
��5^
��6=m
��;�w
��B*�
��I��
��R(�
��W-
��_�+
��ci
��	c
C6PK*[�V/$$vm/vm.gonu�[���GOOF----LE-8-2.0]'4h�]gguile�	�	gdefine-module*�	�	�	gsystem�	gvm�	�		gfilenameS�	
fsystem/vm/vm.scm�	gexportsS�	gvm?�	
gmake-vm�	gthe-vm�	gcall-with-vm�	gvm:ip�	gvm:sp�	gvm:fp�	gvm-trace-level�	gset-vm-trace-level!�	g	vm-engine�	gset-vm-engine!�	gset-default-vm-engine!�	gvm-push-continuation-hook�	gvm-pop-continuation-hook�	g
vm-apply-hook�	gvm-next-hook�	gvm-abort-continuation-hook�	gvm-restore-continuation-hook�	
�	gset-current-module�	 �	!�	"gload-extension�	#g
string-append�	$f	libguile-�	%geffective-version�	&fscm_init_vm�C5h@�]4	
54!>"G"i4#i$4%i55&6zgm
		(gfilenamefsystem/vm/vm.scm�		
��	-	 	��	3	 	��	4	 	+��	<	 	��	>	!	��	@	 
��		@
C6PK*[,��#�&�&
vm/inspect.gonu�[���GOOF----LE-8-2.0�&]t4h�]gguile�	�	gdefine-module*�	�	�	gsystem�	gvm�	ginspect�		�	
gfilenameS�	fsystem/vm/inspect.scm�	gimportsS�	
gbase�	gpmatch�	
�	�	gsyntax�	
�	�	�	�	gframe�	�	�	glanguage�	gassembly�	gdisassemble�	�	gselectS�	g%disassemble�	��	 �	! �	"gice-9�	#grdelim�	$"#�	%$�	&gpretty-print�	'"&�	('�	)gformat�	*")�	+*�	,gprogram�	-,�	.-�	/!%(+.	�	0gexportsS�	1�	2gset-current-module�	32�	42�	5gmake-hash-table�	6g
hash-for-each�	7g
hashq-set!�	8g	hashq-ref�	9g
reverse-hashq�	:gcatch�	;gwrong-number-of-args�	<gkeyword-argument-error�	=gcatch-bad-arguments�	>geof-object?�	?gchar=?�	@g	read-char�	Agrepl-reader�	Bgchar-whitespace?�	Cgunread-char�	Dgread�	Egreverse�	Fg	read-args�	Ggmake-module�	Hgthrow�	Igquit�	Jgset-procedure-property!�	Kgname�	Lgmodule-define!�	Mgmodule-add!�	Ngq�	Ogmodule-local-variable�	Pgcontinue�	Qgcont�	Rgc�	Sgprint�	Tgp�	Ugwrite�	Vgw�	Wgdisplay�	Xgd�	YfError disassembling object: ~a
�	Zgx�	[gmodule-obarray�	\gprocedure-name�	]f~a~{ ~:@(~a~)~}~?~%~a~&~%�	^gprogram-lambda-list�	_f"~#[~:;~40t(aliases: ~@{~a~^, ~})~]�	`gdelq�	agprocedure-documentation�	bfInvalid command ~s.~%�	cf#Try `help' for a list of commands~%�	dgsort�	eghash-map->list�	fgstring<?�	ggsymbol->string�	hfAvailable commands:~%~%�	igfor-each�	jghelp�	kgh�	lg?�	mgapply�	ngcurrent-error-port�	of)Invalid arguments to ~a. Try `help ~a'.~%�	pgnewline�	qf$~&Unknown command: ~a. Try `help'.~%�	rgsave-module-excursion�	sf~20@y inspect> �C5hy]4	
/01544>"G5678h�]L4L5�6�gk
		gv		gfilenamefsystem/vm/inspect.scm�
	%	��		&	!��		&	2��		&	!��		&	��		&	��			Ch(�]	454O>"GC�gh
		%gret		%gfilenamefsystem/vm/inspect.scm�
	"
��		#	
��		#	��	
	$	��		%gnameg
reverse-hashq�C9R:;:<hs-13L6kgk
			
gargs			
gfilenamefsystem/vm/inspect.scm�
	/	��	
	0	
��			

ChX]LLO6Pgfilenamefsystem/vm/inspect.scm�
	,	��		-	
��		-	��		
Chs-13L6kgk
			
gargs			
gfilenamefsystem/vm/inspect.scm�
	1	��	
	2	��			

Ch�]OO6�gthunk
		gbad-args-thunk		gfilenamefsystem/vm/inspect.scm�
	*
��		+		��		+	��			gnamegcatch-bad-arguments�C=R>?@ABCDE	h@�]!"�45$C4
5$45"���45$45"���4>"G4545""�45$64
5$645$45"���4>"G45�45"��v45"����gprompt
	@gchr	�greader		&	4greader		G	Ugreader		o	}gtok		}�greader	��gout�*gchr	�*greader	��greader	�gtok	*greader	"greader,:gfilenamefsystem/vm/inspect.scm�
	4
��		9	��		;	��		:	��		;	��		<	��	$	:	��	&	8	��	)	6	��	:	<	��	;	=	��	E	:	��	G	8	��	J	6	��	[	=	��	\	?	��	o	@	��	r	6	��	}	@	���	A	���	8	���	6	���	A	���	B	���	D	���	C	���	D	���	E	���	C	���	E	���	F	���	C	���	8	���	6	���	F	���	H	���	I	��	6	��	I	��	J	��	8	��	6	��*	J	��,	8	��/	6	��@	K	��/	@gnameg	read-args�CFRGHIh�]6�gfilenamefsystem/vm/inspect.scm�
	a	��		c	
��		c	��		
gnamegc�g
documentationfQuit the inspector.�CJKILMNOPQR&h�]L6�gfilenamefsystem/vm/inspect.scm�
	e	��		g	��		
gnamegc�g
documentationf.Print the current object using `pretty-print'.�CSTh�]ML6�gfilenamefsystem/vm/inspect.scm�
	i	��		k	��		
gnamegc�g
documentationf'Print the current object using `write'.�CUVh�]ML6�gfilenamefsystem/vm/inspect.scm�
	m	��		o	��		
gnamegc�g
documentationf)Print the current object using `display'.�CWX:hP]L6Hgfilenamefsystem/vm/inspect.scm�
	t	��		u	
��		
C)Yhm-136egargs
			gfilenamefsystem/vm/inspect.scm�
	v	��		w	��		w	
��			


Ch�]LO6�gfilenamefsystem/vm/inspect.scm�
	q	��		s	��		
gnamegc�g
documentationfGDisassemble the current object, which should be objcode or a procedure.�CZ9[O\)]^_`8a
hH ]4L5454544L554	56gcmd
		Dgv		Dgp			Dgcanonical-name			Dgfilenamefsystem/vm/inspect.scm�
	|	��		}	��		}	
��		~	��		}	
��			!��		}	
��	 �	��	#�	#��	+�	��	,�	��	1�	)��	;�	��	<�	��	D�	��		Dgnameghelp-cmd�C)bcO\]^_`8ade\hz]6rgk
			gv			gfilenamefsystem/vm/inspect.scm�
�	��	�	+��		�	��				Cfgh�]45456{gx
		gy		gfilenamefsystem/vm/inspect.scm�
�	��	�	$��	�	$��	�	��			Chih�i-.,3#44L55OLQ$~"4>"G6�$S4L5$B4L545	4
544
55456"���"���44554>"G6agcmd
	�grhash	!�ghelp-cmd		,�gv		v�gp		{�gcanonical-name	��gnames	��gfilenamefsystem/vm/inspect.scm�
	y	��		{	��		{	"��	!	{	��	!	{	��	9�	��	>�	��	C�	��	J�	��	W�	��	Y�	��	Y�	
��	\�	��	`�	
��	a�	��	m�	��	n	}	��	v	}	
��	{	~	��	{	}	
��	~		!���	}	
����	����	#����	����	����	)����	����	����	����	����	����	����	
����	����	����	����	��'	�
gnamegc�g
documentationfShow this help message.�Cjkl:mO=h[]LL@Sgfilenamefsystem/vm/inspect.scm�
�	��	�	��		�	��			
C)no\h v]454L54L56ngfilenamefsystem/vm/inspect.scm�
�	��	�	��	�	��	�	��	�	0��	�	��		
C>pHI)nqh�2-13�$
4L5"$OO645$4>"G64	4
5>"GC*gcmd
			{gargs			{gt			{gproc		)	?gfilenamefsystem/vm/inspect.scm�
�	��	�	
��	�	��	�	
��	�	��	)�	��	)�	
��	?�	��	@�	��	J�	��	K�	��	^�	��	`�	��	a�	��	d�	��	j�	��	q�	��			{
gnameghandle�Cr2F)shk]L6cgfilenamefsystem/vm/inspect.scm�
	^	��		_	��		_	��		
gnamegprompt�Ch []4L>"GLO6Sgfilenamefsystem/vm/inspect.scm�
�	��	�	��	�	��		
Ch8]")4LO4LLO5>"G"���"���wgfilenamefsystem/vm/inspect.scm�
�	��	�	��	�	
��	�	��	#�	
��	/�	
��	/�	��		3
Chu-13Emgk
			
gargs			
gfilenamefsystem/vm/inspect.scm�
�	��	
�	��			

C h��]A45HHHHHH4>"G4>"G44	5>"G4
4	5>"G44	5>"G44	5>"GK
OQ4>"G4>"G44	5>"GKOQ4>"G4>"G44	5>"GKOQ4>"G4>"G44	5>"GKOQ4>"G4>"G44	5>"GKOQ4>"G4>"G44	5>"G44	5>"GKO6�gx
	�gcommands	�gquit		�gprint		�gwrite		�gdisplay		�gdisassemble		�ghelp		�gc		�gc	�!gc	,�gc	��gc	�>gc	H�gfilenamefsystem/vm/inspect.scm�
	R
��		]	��		]	��		a	���	e	��,	i	���	m	���	q	��H	y	����	����	��	�gnameginspect�CRCqgm
		,gfilenamefsystem/vm/inspect.scm�		
���	"
��:	*
���	4
���	R
��	�
C6PK*[���:�&�&
foreign.gonu�[���GOOF----LE-8-2.0�&]�4h�]gguile�	�	gdefine-module*�	�	�	gsystem�	gforeign�	�		gfilenameS�	
fsystem/foreign.scm�	gimportsS�	grnrs�	
gbytevectors�	
�	�	gsrfi�	gsrfi-1�	�	�	gsrfi-9�	�	�	ggnu�	�	�	�	gexportsS�	gvoid�	gfloat�	gdouble�	gshort�	 gunsigned-short�	!gint�	"gunsigned-int�	#glong�	$g
unsigned-long�	%gsize_t�	&gssize_t�	'g	ptrdiff_t�	(gint8�	)guint8�	*guint16�	+gint16�	,guint32�	-gint32�	.guint64�	/gint64�	0gsizeof�	1galignof�	2g
%null-pointer�	3g
null-pointer?�	4gpointer?�	5gmake-pointer�	6gpointer->scm�	7gscm->pointer�	8gpointer-address�	9gpointer->bytevector�	:gbytevector->pointer�	;gset-pointer-finalizer!�	<gdereference-pointer�	=gstring->pointer�	>gpointer->string�	?gpointer->procedure�	@g
make-c-struct�	Agparse-c-struct�	Bgdefine-wrapped-pointer-type�	C !"#$%&'()*+,-./0123456789:;<=>?@AB'�	Dgset-current-module�	ED�	FD�	Ggload-extension�	Hg
string-append�	If	libguile-�	Jgeffective-version�	Kfscm_init_foreign�	Lgdefined?�	Mgprocedure->pointer�	Ngcall-with-deferred-observers�	ON�	PN�	Qgmodule-export!�	RQ�	SQ�	Tgcurrent-module�	UT�	VT�	WM�	Xg*�	Ygerror�	Zfwhat machine is this?�	[gbytevector-pointer-ref�	\gbytevector-pointer-set!�	]g"bytevector-ieee-single-native-set!�	^]�	_]�	`g"bytevector-ieee-double-native-set!�	a`�	b`�	cgbytevector-s8-set!�	dc�	ec�	fgbytevector-u8-set!�	gf�	hf�	igbytevector-s16-native-set!�	ji�	ki�	lgbytevector-u16-native-set!�	ml�	nl�	ogbytevector-s32-native-set!�	po�	qo�	rgbytevector-u32-native-set!�	sr�	tr�	ugbytevector-s64-native-set!�	vu�	wu�	xgbytevector-u64-native-set!�	yx�	zx�	{g	*writers*�	|g!bytevector-ieee-single-native-ref�	}|�	~|�	g!bytevector-ieee-double-native-ref������gbytevector-s8-ref��������gbytevector-u8-ref��������gbytevector-s16-native-ref��������gbytevector-u16-native-ref��������gbytevector-s32-native-ref��������gbytevector-u32-native-ref��������gbytevector-s64-native-ref��������gbytevector-u64-native-ref��������g	*readers*��galign��gwrite-c-struct��gassv-ref��ftoo few values��ftoo many values��g
read-c-struct��greverse��gmake-bytevector��gfold��gmake-syntax-transformer��������gmacro��g$sc-dispatch��������g_��gany����������g
datum->syntax��ggensym��fwrap��g
syntax-object��gbegin��gtop�����gribcage�����g%wrap��������fl-40afcf54ff-e4�����������g	type-name��gpred��gwrap��gunwrap��gprint����������������fl-40afcf54ff-d8��fl-40afcf54ff-d9��fl-40afcf54ff-da��fl-40afcf54ff-db��fl-40afcf54ff-dc���������������gstx�����fl-40afcf54ff-d5�������������������ghygiene�����������gdefine-record-type��������gpointer�����������gdefine��������glet��������gptr->obj��������gmake-weak-value-hash-table�������������������������glambda��������gptr�����������gor��������ghash-ref�������������go��������g	hash-set!������������������gset-record-type-printer!��������gsyntax-violation��������f-source expression failed to match any pattern�C5h0�]4	
C54F>"G4Gi4HiI4Ji55K>"G8h�]45
�C�gpointer
		gfilenamefsystem/foreign.scm�
	B
��		D	��		D	��		gnameg
null-pointer?�g
documentationf+Return true if POINTER is the null pointer.�C3R4LiM5$�4PSVWhE]456=gfilenamefsystem/foreign.scm�
	G	��		
C>"G"40iX5	�$�5hz]�6rgbv
		goffset		gfilenamefsystem/foreign.scm�
	P		��			Q	��		Q	��			C"�	�$�5hz]�6rgbv
		goffset		gfilenamefsystem/foreign.scm�
	R		��			S	��		S	��			C"	4YiZ5[R40iX5	�$�8h�]45�C�gbv
		goffset		gptr			gfilenamefsystem/foreign.scm�
	X		��		Y	1��		Y	��			C"�	�$�8h�]45�C�gbv
		goffset		gptr			gfilenamefsystem/foreign.scm�
	Z		��		[	1��		[	��			C"	4YiZ5\Ri_�ib�(ie�)ih�+ik�*in�-iq�,it�/iw�.iz�X\i�{Ri~�i��(i��)i��+i��*i��-i��,i��/i��.i��X[i��Rh�]����C�goff
		g	alignment		gfilenamefsystem/foreign.scm�
	y
��		z	��		z	��			z	��	
	z	��			gnamegalign�C�R�1��{0Y��
h�>],"��$��$r�4455�$4��>"G"445�>"G45���"���6(C	6"��X6gbv
	�goffset	�gtypes		�gvals		�goffset		�gtypes		�gvals		�gtype		�goffset		'�	gfilenamefsystem/foreign.scm�
	|
��		}	��				��	
	~	��	�	��		~	��	�	��	�	��	�	��	�	#��	'�	��	'�	��	,�	��	0�	��	1�	��	:�	&��	=�	2��	B�	��	O�	��	P�	
��	_�	1��	d�	��	o�	��	v�	��	y�	%��	|�	1����	����	
����	����	����	
����	����	
���	}	��#	�	gnamegwrite-c-struct�C�R�10����hx�]+"c�$V�445545���$4�5"4455�"���6"����gbv
		xgoffset		xgtypes			xgoffset			igtypes			igvals			igtype			cgoffset		 	cgfilenamefsystem/foreign.scm�
�
��	�	��		�	��	
�	��	�	��	�	��	�	��	�	#��	 �	��	 �	��	%�	��	,�	��	/�	%��	2�	��	6�	��	7�	��	@�	/��	B�	��	G�	��	H�	��	V�	��	Y�	��	c�	��	i�	��	i�	��	n�	/��	x�	��		x	gnameg
read-c-struct�C�R�0�:h0�]
445
54
>"G6�gtypes
		.gvals		.gbv			.gfilenamefsystem/foreign.scm�
�
��	�	��	�	��	�	��	�	��	�	��	.�	��		.	gnameg
make-c-struct�C@R�0�1h �]454455�C�gtype
		gtotal		gfilenamefsystem/foreign.scm�
�	��	�	��	
�	��	�	&��	�	��	�	��			C�9h �]
4
545
6�gforeign
		gtypes		gsize			gfilenamefsystem/foreign.scm�
�
��	�	��	�	��	�	��	�	��			gnamegparse-c-struct�CAR4�B��������������������hh�]
4455�	

	���C�g	type-name
		egpred		egwrap			egunwrap			egprint			egtmp			egfilenamefsystem/foreign.scm�	�	��	�	2��	�	:��	�	2��	�	��	�	��		e	C��h(�]	45$@6�gstx
		"gtmp		"gfilenamefsystem/foreign.scm�
�	��		"g
documentationfSDefine helper procedures to wrap pointer objects into Scheme
objects with a disjoint type.  Specifically, this macro defines PRED, a
predicate for the new Scheme type, WRAP, a procedure that takes a
pointer object and returns an object that satisfies PRED, and UNWRAP
which does the reverse.  PRINT must name a user-defined object printer.�C5BRC�gm
		,gkey
�2gkey
>�gfilenamefsystem/foreign.scm�		
��	-	:	��	2	:	��	8	:	!��	9	:	-��	A	:	��	C	;	��	H	:	��8	B
��9	F	��?	F	��A	F	��E	F
��F	G	���	O	���	O	���	O	���	O	��'	T	
��-	T	��/	T	
��5	N
��6	W	��<	W	��>	W	��>	W	���	\	
���	\	���	\	
���	V
���	_	��	^
��	l	��d	k
��"	y
��	9	|
����
����
����
��(	0
C6PK*[e�RJMDMDrepl/server.gonu�[���GOOF----LE-8-2.05D]�4h�]gguile�	�	gdefine-module*�	�	�	gsystem�	grepl�	gserver�		�	
gfilenameS�	fsystem/repl/server.scm�	gimportsS�	
�	
�	gice-9�	gthreads�	�	�	grdelim�	�	�	gmatch�	�	�	giconv�	�	�	grnrs�	gbytevectors�	�	�	 gio�	!gports�	" !�	#"�	$gsrfi�	%gsrfi-1�	&$%�	'&�	(gsrfi-26�	)$(�	*)�	+#'*	�	,gexportsS�	-gmake-tcp-server-socket�	.gmake-unix-domain-server-socket�	/g
run-server�	0gspawn-server�	1gstop-server-and-clients!�	2-./01�	3gset-current-module�	43�	53�	6g*open-sockets*�	7g
make-mutex�	8gsockets-lock�	9g
lock-mutex�	:9�	;9�	<gunlock-mutex�	=<�	><�	?gassq-remove!�	@g
close-port�	Ag
close-socket!�	Bgadd-open-socket!�	Cgerror�	DC�	EC�	Ffno matching pattern�	GghostS�	HG
��	IgaddrS�	JI��	KgportS�	LK	��	MHJL�	Ng	inet-aton�	OgINADDR_LOOPBACK�	Pgsocket�	QgPF_INET�	RgSOCK_STREAM�	Sg
setsockopt�	Tg
SOL_SOCKET�	UgSO_REUSEADDR�	Vgbind�	WgAF_INET�	XgpathS�	YX
��	ZY�	[f/tmp/guile-socket�	\gPF_UNIX�	]gAF_UNIX�	^gdelete-duplicates�	_g
filter-map�	`gand=>�	agmodule-variable�	bgthe-root-module�	cgvariable-ref�	dgEINTR�	egEAGAIN�	fgEWOULDBLOCK�	gdef�	hg
errs-to-retry�	igrun-server*�	jgserve-client�	kgcatch�	lgselect�	mgmemq�	ngaccept�	ogsystem-error-errno�	pgmemv�	qgwarn�	rfError accepting client�	sgsleep�	tgpipe�	ugfcntl�	vgF_SETFL�	wg
O_NONBLOCK�	xgF_GETFL�	yg	sigaction�	zgSIGPIPE�	{gSIG_IGN�	|gdisplay�	}gforce-output�	~glisten�	gcall-with-new-thread������g%thread-handler��������gclose��gcurrent-thread��gset-thread-cleanup!��g
cancel-thread��gguard-against-http-request��gwith-continuation-barrier��gcurrent-input-port��gcurrent-output-port��gcurrent-error-port��gcurrent-warning-port��g
parameter?��������g	scm-error��gwrong-type-arg��fparameterize��fNot a parameter: ~S��g*repl-stack*��g
start-repl��gport-closed?��g
port-encoding��gset-port-encoding!��gwith-temporary-port-encoding��g	port-line��gport-column��gset-port-line!��gset-port-column!��gwith-saved-port-line+column��gchar-ready?��gget-bytevector-some��gbytevector?��gbytevector->string��f
ISO-8859-1��gstring-concatenate-reverse��gsetvbuf��g_IOFBF��gdrain-input-and-close��gucs-range->char-set��gmake-regexp��g
string-append��f2^(OPTIONS|GET|HEAD|POST|PUT|DELETE|TRACE|CONNECT) ��f[^ ]+ ��fHTTP/[0-9]+.[0-9]+$��gstring-every��gregexp-exec��gpermissive-http-request-line?��gread-delimited��f
��gpeek��geof-object?��gdone��g%make-void-port��frw��gcall-with-port��g	dup->port��fw��gformat��f�
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@@ POSSIBLE BREAK-IN ATTEMPT ON THE REPL SERVER                @@
@@ BY AN HTTP INTER-PROTOCOL EXPLOITATION ATTACK.  See:        @@
@@ <https://en.wikipedia.org/wiki/Inter-protocol_exploitation> @@
@@ Possible HTTP request received: ~S
@@ The associated socket has been closed.                      @@
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
��g
unread-string��gcheck-for-http-request��g%set-port-property!��gguard-against-http-request?��g%port-property��gmaybe-check-for-http-request��g	add-hook!��gbefore-read-hook�C5h�1�]4	
+,2545>"G6R47i58R8;hI]L6Agfilenamefsystem/repl/server.scm�
	/	��		
C>hI]L6Agfilenamefsystem/repl/server.scm�
	/	��		
C?6@hX�]	OO4O>"GV45 X4O>"G6�gs
		Tgx		Ngfilenamefsystem/repl/server.scm�
	.
��		/	��	+	0	��	5	0	��	7	/	��	T	3	��		Tgnameg
close-socket!�CAR8;hI]L6Agfilenamefsystem/repl/server.scm�
	7	��		
C>hI]L6Agfilenamefsystem/repl/server.scm�
	7	��		
C6hh�]
OO4O>"GV�� X4O>"GCX4O>"GF�gs
		cgforce-close		cgx			cgfilenamefsystem/repl/server.scm�
	6
��		7	��	/	8	��	4	8	��	7	7	��		c	gnamegadd-open-socket!�CBR8;hI]L6Agfilenamefsystem/repl/server.scm�
	<	��		
C>hI]L6Agfilenamefsystem/repl/server.scm�
	<	��		
C6EF1	h�](OO4O>"GV("T�$?���$�� "4455"4455X4O>"G$4>"G6Cgx
	�gv	,�gw		F	{gx		F	{gx		T	cgt
��gfilenamefsystem/repl/server.scm�
	:
��		<	��	,	=	��	^	@		��	h	=	���	<	���	;	���	C		���	D		��
	�
gnamegstop-server-and-clients!�C1RMNOPQRSTUVWh�-/03##$45"#�4
54	>"G4
>"GCghost
	�gaddr	�gport		�gsock		R�gfilenamefsystem/repl/server.scm�
	F
��	(	H	 ��	)	H	)��	I	J	��	R	J	��	U	K	��	l	L	��	�

ghostS
�gaddrS�gportS	�gnamegmake-tcp-server-socket�C-RZ[P\RSTUV]h`�-/03#4
54>"G4	
>"GC�gpath
		Ygsock	'	Ygfilenamefsystem/repl/server.scm�
	O
��		O	5��		P	��	'	P	��	*	Q	��	A	R	��		Y

gpathS
�gnamegmake-unix-domain-server-socket�C.R4^i4_i`abchl]456dgname
		gfilenamefsystem/repl/server.scm�
	Y	��		Z	��		Z	��		Cg55hR-ijh(�-.,3#456�g
server-socket
		!gfilenamefsystem/repl/server.scm�
	^
��		^	/��	!	_	��		!
gnameg
run-server�C/Rklmnh(�]4M5�4M5$CL6�gready-ports
		#gfilenamefsystem/repl/server.scm�
	s	��		t	 ��		t	8��			t	<��		t	 ��		t	��		t	��		v	��		v	
��	#	w	��		#
CophqrshP�-134545$L64>"G4>"GL6�gk-args
			Lgerr		Lgfilenamefsystem/repl/server.scm�
	x	��	
	y	��		y	��		{	��		z	
��	#	|	��	$	~	��	(	~	��	/	~	��	8�	��	L�	��			L


Ch o]LLLOLO6ggfilenamefsystem/repl/server.scm�
	q	��		r	��		
gnamegaccept-new-client�Ctuvwxyz{B|}h u]4!M>"GM6mgfilenamefsystem/repl/server.scm�
	i	��		j	��		k	��		
gnamegshutdown-server�C~�hJ]LLL6Bgfilenamefsystem/repl/server.scm�
�	
��		

C��hq]BHHHHOQ45KJ�KJ�KJK445�>"G4	>"G4
O>"G4	>"G"b$2��	4
	O>"G45"���4J>"G4J>"G645"���ig
server-socket
	gserve-client	gshutdown-pipes		gshutdown-read-pipe		gshutdown-write-pipe		gmonitored-ports		gaccept-new-client		gclient	�g
client-socket	��gclient-addr		��
gfilenamefsystem/repl/server.scm�
	b
��	%	d	��	.	e	��	3	f	��	<	n	��	?�	��	H�	��	Q�		��	V�	��	_�	��	s�	����	����	����	����	����	����	����	
����	����	
����	����	���	���	���	���	��		gnamegrun-server*�CiR-�/hJ]L6Bgfilenamefsystem/repl/server.scm�
�	��		
C�h(�-.,3#45O6�g
server-socket
		&gfilenamefsystem/repl/server.scm�
�
��	�	1��	&�	��		&
gnamegspawn-server�C0R��AhS]L6Kgfilenamefsystem/repl/server.scm�
�	 ��	�	+��		
CB�hS]L6Kgfilenamefsystem/repl/server.scm�
�	��	�	(��		
C�������������h�] 45$"4	>"G45$"4	>"G45$"4	>"G45$"4	>"G����4	�L54	�L54	�L54	�L5Y
Y4>Z"ZCZF�gt-3d081069b-c3
	
gt-3d081069b-c4	
gt-3d081069b-c5		
gt-3d081069b-c6		
gfilenamefsystem/repl/server.scm�
�	��	
�	����	#����		��	
C	h`�]
454O>"G4O>"G4>"GO6�gclient
		[gaddr		[gthread			>gfilenamefsystem/repl/server.scm�
�
��	�	��	�	��	
�	��	#�	��	?�	��	[�	��		[	gnamegserve-client�CjR���h w]4L5$C4L5NLM6ogfilenamefsystem/repl/server.scm�
�	��	�	��	
�	��	�	��	�	
��	 �	
��		 
C���h w]4L5$C4L5NLM6ogfilenamefsystem/repl/server.scm�
�	��	�	��	
�	��	�	��	�	
��	 �	
��		 
C���h w]4L5$C4L5NLM6ogfilenamefsystem/repl/server.scm�
�	��	�	��	
�	��	�	��	�	
��	 �	
��		 
C���h w]4L5$C4L5NLM6ogfilenamefsystem/repl/server.scm�
�	��	�	��	
�	��	�	��	�	
��	 �	
��		 
C���h w]4L5$C4L5NLM6ogfilenamefsystem/repl/server.scm�
�	��	�	��	
�	��	�	��	�	
��	 �	
��		 
ChxS]HHOO4O>"GV4>X4O>"GCX4O>"GFKgport
		wgencoding		wgthunk			wgsaved-encoding			wgfilenamefsystem/repl/server.scm�
�
��	�	��	 �	��		w	gnamegwith-temporary-port-encoding�g
documentationfaCall THUNK in a dynamic environment in which the encoding of PORT is
temporarily set to ENCODING.�C�R���h(�]4L5$C4L5N4L5NCxgfilenamefsystem/repl/server.scm�
�	��	�	��	
�	��	�	��	�	
��	�	��	!�	
��		#
C���h0n]4L5$C4LM>"GLM6fgfilenamefsystem/repl/server.scm�
�	��	�	��	
�	��	�	
��	+�	
��		+
C���h(�]4L5$C4L5N4L5NCxgfilenamefsystem/repl/server.scm�
�	��	�	��	
�	��	�	��	�	
��	�	��	!�	
��		#
C���h0n]4L5$C4LM>"GLM6fgfilenamefsystem/repl/server.scm�
�	��	�	��	
�	��	�	
��	+�	
��		+
C���h0n]4L5$C4LM>"GLM6fgfilenamefsystem/repl/server.scm�
�	��	�	��	
�	��	�	
��	+�	
��		+
Chxt]HHOO4O>"GV4>X4O>"GCX4O>"GFlgport
		vgthunk		vg
saved-line			vgsaved-column			vgfilenamefsystem/repl/server.scm�
�
��	�	��	�	��		v	gnamegwith-saved-port-line+column�g
documentationf�Save the line and column of PORT before entering THUNK, and restore
their previous values upon normal or non-local exit from THUNK.�C�R������hP]"<4L5$4L5"45$45�"���6"����gchunks
		Bgresult		Bgfilenamefsystem/repl/server.scm�
�	��	�	��	�	��	�	��	�	��	�	��	 �	��	*�	
��	+�	��	1�	5��	3�	��	6�	��	<�	��	B�	��	B�	��	C�	��	I�	��		I
C��hS]L6Kgfilenamefsystem/repl/server.scm�
�	��	
�	��		

C@hS]L6Kgfilenamefsystem/repl/server.scm�
�	��	�	��		
Chp2]	OQOO4O>"GV4>X4O>"GCX4O>"GF*gsocket
		igthunk	
	igfilenamefsystem/repl/server.scm�
�
��	
�	��		ignamegdrain-input-and-close�g
documentationf�Drain input from SOCKET using ISO-8859-1 encoding until it would block,
and then close it.  Return the drained input as a string.�C�R4�i	 	~54�i4�i���55��h �]4L5$L6C�gline
		gfilenamefsystem/repl/server.scm�
�	��	�	��	�	��	�	��		g
documentationfQReturn true if LINE might plausibly be an HTTP request-line,
otherwise return #f.�CO�R����������������������h�]4LL56{gt-3d081069b-183
		gfilenamefsystem/repl/server.scm�
-	��	-	 ��		5	��	-	��		C�h�Q]4L545$C45$s454	>"G4
>"G4>"G4>"G4
L54	5O6L6Igv
	
�g	void-port	/	|g
drained-input��gfilenamefsystem/repl/server.scm�
	��		
��		!��		/��	
	
��		
��		
��	) 	��	- 	/��	/ 	��	/ 	
��	2!	��	D"	��	V#	��	h$	��	}(	"���(	
���,	���,	,���,	���,	���;	
��	�
ChS]LLO6Kgfilenamefsystem/repl/server.scm�
	��		��		
ChT]O6Lgsocket
		gfilenamefsystem/repl/server.scm�
�
��		'��		��		gnamegcheck-for-http-request�g
documentationf�Check for a possible HTTP request in the initial input from SOCKET.
If one is found, close the socket and print a report to STDERR (fdes 2).
Otherwise, put back the bytes.�C�R��h	]6gsocket
		gfilenamefsystem/repl/server.scm�
=
��	D	��	D	��		gnamegguard-against-http-request�g
documentationf\Arrange for the Guile REPL to check for an HTTP request in the
initial input from SOCKET, in which case the socket will be closed.
This guards against HTTP inter-protocol exploitation attacks, a scenario
whereby an attacker can, via an HTML page, cause a web browser to send
data to TCP servers listening on a loopback interface or private
network.�C�R������hP�-.,3#4545$(4>"G45$C6C�gsocket
		Pgfilenamefsystem/repl/server.scm�
F
��	G	��	K	��	 K	��	"K	��	&K	��	'L	��	9M	��	CM	��	KN	"��	NN	��		P
gnamegmaybe-check-for-http-request�g
documentationf�Apply check-for-http-request to SOCKET if previously requested by
guard-against-http-request.  This procedure is intended to be added to
before-read-hook.�C�R�i�i�i6�gm
		,gcs
't(�grx't(�gfilenamefsystem/repl/server.scm�		
��	-	(	��	0	(
��	1	*	��	:	*
��	.
��	6
���	:
���	F
��	�	O
��	�	X	��	�	Y	��
�	\	��
�	Y	��
�	X	��
�	W
��g	^
���	b
���
��N�
����
��#G�
��'U�
��'V�	��'a�	��'f�	
��'l�	��'n�	��'p�	��'r�	
��'t�	��'t�	��(��
��-w�
��/�=
��1�F
��1�Q
��&	1�
C6PK*[��)?d'd'repl/error-handling.gonu�[���GOOF----LE-8-2.0L']�4h�]gguile�	�	gdefine-module*�	�	�	gsystem�	grepl�	gerror-handling�		�	
gfilenameS�	fsystem/repl/error-handling.scm�	gimportsS�	
gbase�	gpmatch�	
�	�	gvm�	g
trap-state�	�	�	gdebug�	�	�	gice-9�	gformat�	�	�	�	gexportsS�	gcall-with-error-handling�	gwith-error-handling�	 �	!gset-current-module�	"!�	#!�	$gcall-with-output-string�	%g
vector-length�	&gprint-exception�	'gerror-string�	(gon-errorS�	)(��	*g
post-errorS�	+*	��	,g	pass-keysS�	-,	��	.gtrap-handlerS�	/.	��	0)+-/�	1gcatch�	2gquit�	32�	4gcurrent-input-port�	5gcurrent-output-port�	6gcurrent-error-port�	7g%stacks�	8gnarrow-stack->vector�	9g
make-stack�	:fTrap ~d: ~a�	;g
make-debug�	<gwith-input-from-port�	=gwith-output-to-port�	>gwith-error-to-port�	?f~a~%�	@fEntering a new prompt.  �	Af0Type `,bt' for a backtrace or `,q' to continue.
�	B�	Cg
start-repl�	DBC�	EBC�	FgdebugS�	Ggpass�	Hgdisabled�	Igerror�	JfUnknown trap-handler strategy�	Kgwith-default-trap-handler�	Lg%start-stack�	Mgreport�	Ngmemq�	Ogthrow�	Pgrun-hook�	Qgbefore-error-hook�	Rgafter-error-hook�	Sgforce-output�	Tg
procedure?�	UfUnknown post-error strategy�	Vg	backtrace�	Wgprint-frames�	XfUnknown on-error strategy�	Ygmake-syntax-transformer�	ZY�	[Y�	\gmacro�	]g$sc-dispatch�	^]�	_]�	`gany�	a``�	bg
syntax-object�	cgtop�	dc�	egribcage�	fgdummy�	ggform�	hfg�	igm-82c280f576c6227-80�	jic�	kjd�	lfl-82c280f576c6227-85�	mfl-82c280f576c6227-86�	nlm�	oehkn�	pe�	qgx�	rq�	sj�	tfl-82c280f576c6227-82�	ut�	versu�	wdopv�	xghygiene�	yx�	zbwy�	{glambda�	|b{wy�	}gsyntax-violation�	~}�	}��f-source expression failed to match any pattern�C5hxr]4	
 54#>"G$%&h(�]	
4L5�$L
�"LL6�gport
		&gframe		&gfilenamefsystem/repl/error-handling.scm�
	&	��		'	��		'	��		'	��		'	3��		'	��	&	(	��		&Ch�]O6�gstack
		gkey		gargs			gfilenamefsystem/repl/error-handling.scm�
	$
��		%	��			gnamegerror-string�C'R013456789:;<=>?@AEFhP�]L$?4L>"G4>"G4>"G"L6�gfilenamefsystem/repl/error-handling.scm�
	L		��		M	��			O	��		O	��		O	��		P	��	#	P	��	(	P	��	1	Q	��	6	Q	��	;	Q	��	I	R	��	O	R	��		O
ChY]LLLLO6Qgfilenamefsystem/repl/error-handling.scm�
	4	��		5	��		
ChY]LLLLLO6Qgfilenamefsystem/repl/error-handling.scm�
	2	��		3	
��		
C	hp�]#[�$	[��"445

$"5$45"4
5LLLO6gframe
		pgtrap-idx		pg	trap-name			pgtag			pgstack		2	pg	error-msg		L	pgdebug		Y	pgfilenamefsystem/repl/error-handling.scm�
	8	��		9	��	
	9	��		:	��		9	��		;	��		<	��	*	F	��	2	;	��	2	9	��	:	G	��	;	H	��	@	H	'��	F	H	��	L	9	��	O	J	��	Y	9	��	p	1	��		p	gnamegdebug-trap-handler�CGh�]C�gframe
		gtrap-idx		g	trap-name			gfilenamefsystem/repl/error-handling.scm�
	T	��			gnamegnull-trap-handler�CHIJ1KLhY]L6Qgfilenamefsystem/repl/error-handling.scm�
	a	
��			a	��			
ChY]MLO6Qgfilenamefsystem/repl/error-handling.scm�
	_	��		`	��		
CMNO<=>PQ&RShHq]4>"G4LLL>"G4>"GL6igfilenamefsystem/repl/error-handling.scm�
	j	��		k	��		l	��	,	m	��	C	n	��		C
ChY]LLLLO6Qgfilenamefsystem/repl/error-handling.scm�
	4	��		5	��		
ChY]LLLLO6Qgfilenamefsystem/repl/error-handling.scm�
	2	��		3	
��		
Ch@�-134L5$@4LLLO>"GC�gkey
			?gargs			?gfilenamefsystem/repl/error-handling.scm�
	e		��	
	f	��		f	��		g	��		1	��			?
CNOh �-134L5$@C�gkey
			 gargs			 gfilenamefsystem/repl/error-handling.scm�
	q		��	
	r	��		r	��		s	��			 
CTNOh(�-134L5$"L@�gk
			$gargs			$gfilenamefsystem/repl/error-handling.scm�
	v	
��	
	w	��		w	��	$	w	��			$
CUN789';<=>?@AEFhH�]4L>"G4>"G4>"GL6�gfilenamefsystem/repl/error-handling.scm�
�	��	�	��	�	��	�	��	�	��	�	��	"�	��	+�	��	0�	��	5�	��	?�	��	E�	��
		E
ChY]LLLO6Qgfilenamefsystem/repl/error-handling.scm�
	4	��		5	��		
ChY]LLLLO6Qgfilenamefsystem/repl/error-handling.scm�
	2	��		3	
��		
C	hxJ-134L5$C[�$	[��"445	
$"5454
5LLLO6Bgkey
			wgargs			wgtag		*	wgstack		H	wg	error-msg		U	wgdebug		b	wgfilenamefsystem/repl/error-handling.scm�
	|		��	
	}	��		}	��		~	 ��	 	~	��	$		 ��	*	~	��	-�	��	0�	��	@�	 ��	H�	��	H	~	��	K�	!��	U	~	��	X�	��	b	~	��	w	1	��			w
CN<=>PQ&RShHv]4>"G4LLL>"G4>"GL6ngfilenamefsystem/repl/error-handling.scm�
�	��	�	��	�	��	,�	��	C�	��		C
ChY]LLLLO6Qgfilenamefsystem/repl/error-handling.scm�
	4	��		5	��		
ChY]LLLLO6Qgfilenamefsystem/repl/error-handling.scm�
	2	��		3	
��		
Ch@�-134L5$C4LLLO>"GC�gkey
			9gargs			9gfilenamefsystem/repl/error-handling.scm�
�		��	
�	��	�	��		1	��			9
CVN789<=>WPQ&RShX]4L>"G4>"G4LLL>"G4>"GL6wgfilenamefsystem/repl/error-handling.scm�
�	��	�	��	�	��	'�	��	>�	��	U�	��		U
ChY]LLLLLO6Qgfilenamefsystem/repl/error-handling.scm�
	4	��		5	��		
ChY]LLLLLO6Qgfilenamefsystem/repl/error-handling.scm�
	2	��		3	
��		
Chp-134L5$C[�$	[��"445	
$"54LLLO>"GC�gkey
			mgargs			mgtag		*	mgframes		H	mgfilenamefsystem/repl/error-handling.scm�
�		��	
�	��	�	��	�	 ��	 �	��	$�	 ��	*�	��	-�	��	0�	��	@�	'��	H�	��	H�	��	K	1	��			m
Chw-13Cogkey
			gargs			gfilenamefsystem/repl/error-handling.scm�
�		��			
CNOh(�-134L5$"L@�gk
			$gargs			$gfilenamefsystem/repl/error-handling.scm�
�	
��	
�	��	�	��	$�	��			$
CXhx�-/03
####454545HO	Q	�$	"&	�$
"�$"	4
5KO�$O"5�$O"!45$
O"	45�$O"d�$O"J�$O"0	�$"!45$
O"	456�gthunk
	xgon-error	xg
post-error		xg	pass-keys		xgtrap-handler		xgin		Jxgout		Jxgerr		Jxgle-trap-handler		Qxgdebug-trap-handler			]x
gfilenamefsystem/repl/error-handling.scm�
	*
��		+	-��	%	+	A��	/	,	.��	9	,	E��	<	-	��	A	.	
��	F	/	
��	J	-	��	o	X	���	\	���	\	���	\	���	c	���	u	
���	u		���	x	
���	x	���	x	
��	z	��V�	
��`�		��n�	
��r�	��v�	
��x	^	��	x
gon-errorS�g
post-errorS	�g	pass-keysS	�gtrap-handlerS	�gnamegcall-with-error-handling�CR4[\_az|h?]C7gdummy
		gform					C�h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/repl/error-handling.scm�
�
��		"g
macro-typegsyntax-rules�gpatternsgformC5RCjgm
		,gfilenamefsystem/repl/error-handling.scm�		
���	$
��	*
��	q
C6PK*[C��ŵ���repl/command.gonu�[���GOOF----LE-8-2.0��]84h/<]gguile�	�	gdefine-module*�	�	�	gsystem�	grepl�	gcommand�		�	
gfilenameS�	fsystem/repl/command.scm�	gimportsS�	
gbase�	gsyntax�	
�	�	gpmatch�	
�	�	gcompile�	
�	�	gcommon�	�	�	gdebug�	�	�	gvm�	gobjcode�	�	 �	!gprogram�	"!�	#"�	$g
trap-state�	%$�	&%�	'�	('�	)gframe�	*)�	+gselectS�	,gframe-return-values�	-,�	.*+-�	/gice-9�	0gformat�	1/0�	21�	3gsession�	4/3�	54�	6g
documentation�	7/6�	87�	9gand-let-star�	:/9�	;:�	<grdelim�	=/<�	>=�	?gcontrol�	@/?�	A@�	Bgpretty-print�	C/B�	Dgpp�	EBD��	FE�	GC+F�	Hginspect�	IH�	Jg%inspect�	KHJ��	LK�	MI+L�	Ngstatprof�	ON�	PO�	Q #&(.258;>AGMP�	RgexportsS�	Sgmeta-command�	Tgdefine-meta-command�	UST�	Vg	autoloadsS�	Wglanguage�	X
W�	Yglookup-language�	Zglanguage-reader�	[YZ�	\gtrace�	]\�	^gcall-with-trace�	_^�	`X[]_�	agset-current-module�	ba�	ca�	dghelp�	egh�	fde�	ggshow�	hg�	igapropos�	jga�	kij�	lgdescribe�	mgd�	nlm�	odfhkn�	pgmodule�	qgm�	rpq�	sgimport�	tguse�	ust�	vgload�	wgl�	xvw�	ygreload�	zgre�	{yz�	|gbinding�	}gb�	~|}�	gin����prux{~���gL��W���W���gc�����gcompile-file��gcc������gexpand��gexp������goptimize��gopt������gdisassemble��gx������gdisassemble-file��gxx��������������gprofile��gtime��gt������gpr������gtr��\���������g	backtrace��gbt������gup�����gdown�����gfr��)���g	procedure��gproc������glocals�����g
error-message��gerror������gbreak��gbr��gbp�������gbreak-at-source��gbreak-at��gbs�������gstep��gs������gstep-instruction��gsi������gnext��gn������gnext-instruction��gni������gfinish�����g
tracepoint��gtp������gtraps�����gdelete��gdel������gdisable�����genable�����g	registers��gregs����������������������������gi��H���BD��H����ggc�����g
statistics��gstat������goption��go������gquit��gq��gcontinue��gcont��������������o���������g*command-table*��gwarranty��gw������gcopying������gversion��gv������g��������g*show-table*��g
group-name��ggroup-commands��gmake-hash-table��g*command-infos*��gcommand-name��gcommand-abbrevs��g	hashq-ref��gcommand-info��gcommand-info-procedure��gcommand-procedure�gprocedure-documentation�gcommand-doc�gmake-command-info�gcommand-info-arguments-reader�g	substring�gstring-index�g
command-usage�gcommand-summary�gassq�	glookup-group�
gmemq�glookup-command�f$~:(~A~) Commands~:[~; [abbrev]~]:~2%�
gfor-each�gdisplay-summary�gnewline�g
display-group�gdisplay�fUsage: �gdisplay-command�g
string-length�f
[,~A~{ ,~A~}]�f�f ,~A~A~A - ~A
�fabbrevs too long�f~%~v_�f~v_�gcatch�gread�f)Throw to key `~a' while reading command:
�g
display-error�gcurrent-output-port� f8Throw to key `~a' with args `~s' while reading command.
�!gforce-output�"gread-command�#gread-command-arguments�$gand=>�%fUnknown meta command: ~A~%�&fMeta-command not a symbol: ~s~%�'g
hashq-set!�(gappend�)gadd-meta-command!�*gmake-syntax-transformer�+*�,*�-gmacro�.g$sc-dispatch�/.�0.�1gany�211�3geach-any�431��514��625��713��817��968��:19��;g
syntax-object�<gtop�=<�>gribcage�?gdummy�@gname�Agcategory�Bgexpression0�Cgdatums�Dg	docstring�Egb0�Fgb1�G?@ABCDEF	�Hgm-3ee4d7042b-92�IH<�JI========	�Kfl-3ee4d7042b-97�Lfl-3ee4d7042b-98�Mfl-3ee4d7042b-99�Nfl-3ee4d7042b-9a�Ofl-3ee4d7042b-9b�Pfl-3ee4d7042b-9c�Qfl-3ee4d7042b-9d�Rfl-3ee4d7042b-9e�Sfl-3ee4d7042b-9f�TKLMNOPQRS	�U>GJT�V>�W��XI�Yfl-3ee4d7042b-94�ZY�[>WXZ�\=UV[�]ghygiene�^]�_;)\^�`gquote�a;`\^�bglambda*�c;b\^�d(�e(�fglambda�g;f\^�hgdefine�i;h\^�jghandle-read-error�k;j\^�lg	form-name�m;l\^�ngkey�o;n\^�pgargs�q;p\^�rkmoq�s;\^�tgunquote�u;t\^�vgsubr�w;v\^�xuw�ygmsg�z;y\^�{uz�|uq�}grest�~;}\^�x{|u~��;0\^��;\^��fDThrow to key `~a' while reading ~@[argument `~A' of ~]command `~A':
��;�\^��;\^��;\^��;\^��������wzq~�����gelse��;�\^��fTThrow to key `~a' with args `~s' while reading ~@[ argument `~A' of ~]command `~A'.
��;�\^��gabort��;�\^��������g%��;�\^��glet*��;�\^��gmap��������;\^��grepl-reader��;�\^��;\^��goptionalS��;�\^��gport��;�\^��gcurrent-input-port��;�\^�������������;Z\^��g
repl-language��;�\^��gcurrent-module��;�\^���������gk��;�\^���q����q��;(\^��glist��;�\^��glet��;�\^��gopen-input-string��;�\^��g	read-line��;�\^����������������glp��;�\^��gout��;�\^��a���������;�\^��;\^�������������gif��;�\^��geof-object?��;�\^������greverse��;�\^������gcons��;�\^���������������������������������g���k��q��g����������������g�������11���2⌤��8���1䌤�?@ACDEF��I=======��fl-3ee4d7042b-ae��fl-3ee4d7042b-af��fl-3ee4d7042b-b0��fl-3ee4d7042b-b1��fl-3ee4d7042b-b2��fl-3ee4d7042b-b3��fl-3ee4d7042b-b4��fl-3ee4d7042b-b5������������>�����=�V[��;T�^��15����8���1����?@BCDEF��fl-3ee4d7042b-c0��fl-3ee4d7042b-c1��fl-3ee4d7042b-c2��fl-3ee4d7042b-c3��fl-3ee4d7042b-c4��fl-3ee4d7042b-c5��fl-3ee4d7042b-c6��fl-3ee4d7042b-c7����������>���=V[�;T^�;^��1⌤8��1��	?@CDEF�
I======�fl-3ee4d7042b-d3�fl-3ee4d7042b-d4�
fl-3ee4d7042b-d5�fl-3ee4d7042b-d6�fl-3ee4d7042b-d7�fl-3ee4d7042b-d8�fl-3ee4d7042b-d9�
�>	
�=V[�;T^�;^��gsyntax-violation���f-source expression failed to match any pattern�fCommand Groups:

�fhelp all�fList all commands�gsymbol->string� g
string-append�!fhelp �"fList �#f	 commands�$fFType `,help -c COMMAND' to show documentation of a particular command.�%g-c�&fUnknown command: ~A~%�'fBad arguments: ~A~%�(fUnknown command or group: ~A~%�)gall�*gdefault-prompt-tag�+@*�,@*�-fUnknown topic: ~A~%�.g
*warranty*�/g	*copying*�0g	*version*�1g->string�2gobject-documentation�3g
repl-parse�4g
module-ref�5g	repl-eval�6gform�7f  ~A~24t~A
�8grepl-options�9grepl-option-set!�:geval�;grepl-option-ref�<gthrow�=gputs�>gmodule-name�?gresolve-module�@gmodule-uses�Agresolve-interface�Bgmodule-use!�CfNo such module: ~A~%�Dgload-in-vicinity�ED�FD�Gfsystem/repl�Hg
reload-module�Igmodule-for-each�Jf~23A ~A
�KgensureS�Lgsave-module-excursion�Mg
repl-print�NfFInvalid arguments to `in': expected a single expression or a command.
�OfNo such module: ~s
�Pf6Happy hacking with ~a!  To switch back, type `,L ~a'.
�Qglanguage-title�Rg
language-name�Sgcurrent-language�Tgsetter�UT�VT�Wgrepl-compile�Xgobjcode?�Ygguile:disassemble�ZgoptsS�[grepl-expand�\grun-hook�]gbefore-print-hook�^g
repl-optimize�_gassembly�`W_��a`��b`��cgprogram?�df9Argument to ,disassemble not a procedure or objcode: ~a~%�egload-objcode�fggc-run-time�ggget-internal-real-time�hgget-internal-run-time�if8;; ~,6Fs real time, ~,6Fs run time.  ~,6Fs spent in GC.
�je1.0�kginternal-time-units-per-second�lgrepl-prepare-eval-thunk�mgwidthS�ngterminal-width�ogdefine-stack-command�pg_�qp��rg
datum->syntax�sgframes�tgmessage�ug	for-trap?�vgindex�wgcur�x1111111�ygt-3ee4d7042b-8e0�zgt-3ee4d7042b-8e1�{gt-3ee4d7042b-8e2�|gt-3ee4d7042b-8e3�}gt-3ee4d7042b-8e6�~gt-3ee4d7042b-8e5�gt-3ee4d7042b-8e4��yz{|}~��gm-3ee4d7042b-8e7���<�����������fl-3ee4d7042b-8eb��fl-3ee4d7042b-8ec��fl-3ee4d7042b-8ed��fl-3ee4d7042b-8ee��fl-3ee4d7042b-8ef��fl-3ee4d7042b-8f0��fl-3ee4d7042b-8f1�����������>�����gbody��gbody*��@pD����======��fl-3ee4d7042b-8d4��fl-3ee4d7042b-8d5��fl-3ee4d7042b-8d6��fl-3ee4d7042b-8d7��fl-3ee4d7042b-8d8��fl-3ee4d7042b-8d9����������>�����=��fl-3ee4d7042b-8d1�����>W����=V��V���;T�^��;��^��;�^��g
repl-debug��;��^��;��^��g
letrec-syntax��;��^��gidentifier-syntax��;��^��gdebug-frames��;��^�������������gdebug-error-message��;��^�������������gdebug-for-trap?��;��^�������������gid��;��^��gdebug-index��;��^����������gset!��;��^��;��^������������������������g
vector-ref��;��^��;0�^��;�^��fNothing to debug.~%��;��^����������m	���gfull?S���	�������gprint-frames��gcountS��g	for-trap?S��ginteger?��fBInvalid argument to `up': expected a positive integer for COUNT.~%��g
vector-length��fAlready at outermost frame.
��gprint-frame��gindexS��gnext-source?S��fDInvalid argument to `down': expected a positive integer for COUNT.~%��fAlready at innermost frame.
��fGInvalid argument to `frame': expected a non-negative integer for IDX.~%��fNo such frame.~%��gframe-procedure��m������gprint-locals��f~a~%��gstring?��fNo error message��g
procedure?��gadd-trap-at-procedure-call!��fTrap ~a: ~a.~%��g	trap-name��fNot a procedure: ~a��gadd-trap-at-source-location!��gdefault-prompt-handler��@���@���gframe->stack-vector��gframe-previous��fNo return values.~%��fReturn values:~%����g
start-repl��gdebugS��g
make-debug��grepl-pop-continuation-resumer��fReturn from ~a��g#add-ephemeral-trap-at-frame-finish!��grepl-next-resumer��fStep into ~a��gadd-ephemeral-stepping-trap!��ginto?S��ginstruction?S��gadd-trace-at-procedure-call!�g
list-traps�fNo traps set.~%�f  ~a: ~a~a~%�g
trap-enabled?�f (disabled)�gdelete-trap!�f.expected a trap index (a non-negative integer)�g
disable-trap!�genable-trap!�	gprint-registers�
gwidth�f!Set screen width to ~a columns.~%�gtimes�
ggc-stats�g
repl-tm-stats�g
repl-gc-stats�gassq-ref�ggc-times�gdisplay-diff-stat�f	GC times:�ftimes�g	heap-size�gheap-free-size�gdisplay-stat-title�fMemory size:�fcurrent�flimit�gdisplay-stat�fheap�fbytes�gheap-total-allocated�fBytes allocated:� fdiff�!ftotal�"f	allocated�#g
gc-time-taken�$fGC time taken:�%gdisplay-time-stat�&g	tms:utime�'g	tms:stime�(g
tms:cutime�)g
tms:cstime�*fProcess time spent:�+fuser�,fsystem�-f
child user�.fchild system�/f~~20~AA ~~10@A /~~10@A ~~A~~%�0f@�1f~10,2F�2gexact->inexact�3fs�4f----�5e	1000000.0�6fmips�7gdisplay-mips-stat�C5h�oC]4	
QRUV`5	4c>"G��R��Rhx]�Cpgg
		gfilenamefsystem/repl/command.scm�
	J
��		J	��		gnameg
group-name�C�Rh|]�Ctgg
		gfilenamefsystem/repl/command.scm�
	K
��		K	��		gnameggroup-commands�C�R4�i5�Rhz]�Crgc
		gfilenamefsystem/repl/command.scm�
	N
��		N	��		gnamegcommand-name�C�Rh}]�Cugc
		gfilenamefsystem/repl/command.scm�
	O
��		O	��		gnamegcommand-abbrevs�C�R���h�]456zgc
		gfilenamefsystem/repl/command.scm�
	P
��		P	4��		P	��		gnamegcommand-info�C�R��h�]456gc
		
gfilenamefsystem/repl/command.scm�
	Q
��		Q	6��	
	Q	��		
gnamegcommand-procedure�C�R�h�]456ygc
		
gfilenamefsystem/repl/command.scm�
	R
��		R	1��	
	R	��		
gnamegcommand-doc�CRh�]�C�gproc
		garguments-reader		gfilenamefsystem/repl/command.scm�
	T
��		U	��			gnamegmake-command-info�CRh�]�Cginfo
		gfilenamefsystem/repl/command.scm�
	W
��		X	��		gnamegcommand-info-procedure�C�Rh�]�C�ginfo
		gfilenamefsystem/repl/command.scm�
	Z
��		[	��		gnamegcommand-info-arguments-reader�CRh �]	45
4
56�gc
		gdoc			gfilenamefsystem/repl/command.scm�
	]
��		^	
��			^	��		_	��		_	��		gnameg
command-usage�CRh@�]454
5�4
5$
66�gc
		<gdoc			<gstart			<gt		"	<gfilenamefsystem/repl/command.scm�
	a
��		b	��			b	��		c	��		c	��		b	��		d	��	"	d	��	4	e	��	<	f	��		<gnamegcommand-summary�CR�h}]6ugname
		
gfilenamefsystem/repl/command.scm�
	h
��	
	i	��		
gnameglookup-group�C	R�
hx;-.,3#"N"4(���"���4�5$�C�"���((C"���"���"���3gkey
		sgtable		sggroups			hgcommands			hgfilenamefsystem/repl/command.scm�
	k
��		l	��	$	m	��	'	o	��	*	o	��	3	o	��	4	p	��	;	p	��	=	p	��	A	m	��	D	p	%��	J	q	��	R	q	��	R	m	��	^	m	��	h	l	��	k	l	&��	s	l	��		sgnameglookup-command�CR0�
�h(�]45L$45"456�gc
		&gfilenamefsystem/repl/command.scm�
	u	��		v	��		w	��		w	+��		w	?��		x	��	&	v	��		&C�hX�-.,3#445>"G4O45>"G6�ggroup
		Sgabbrev?		Sgfilenamefsystem/repl/command.scm�
	s
��		t	��		t	
��		t	4��	)	t	��	2	u	��	<	y	��	G	u	��	S	z	��
		Sgnameg
display-group�CRh0�]4>"G445>"G6�gcommand
		/gfilenamefsystem/repl/command.scm�
	|
��		}	��		}	��		}	��		~	��		~	��	#	~	��	/		��			/gnamegdisplay-command�CR0�
h�]45�$4��5"45	 �$
45"0�	 �$4		 ��5"4		 ��56	gusage
	�gabbrevs	�gsummary		�g	usage-len			�gabbrevs		&�gabbrevs-len		/�gfilenamefsystem/repl/command.scm�
�
��	�	��		�	��	�	��	�	��	�	��	�	!��	�	1��	�	?��	 �	��	&�	��	&�	��	)�	��	/�	��	6�	��	=�	��	A�	��	B�	��	F�	��	J�	��	S�	��	V�	��	Z�	��	[�	��	`�	��	g�	&��	h�	!��	j�	��	o�	��	t�	��	y�	��	~�	����	��"	�	gnamegdisplay-summary�CRhT]6Lgfilenamefsystem/repl/command.scm�
�	��	�	��		
C0 !h�d-13�$����$y���$G��4>"G445>"G"4>"G"4>"G"4>"G4>"GC\gkey
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	ugvy		8	ugfilenamefsystem/repl/command.scm�
�	��	�	��	=�		��	B�	��	I�		��	R�		��	V�	��	g�		��	z�		��	�	����		����	����		����	����		����	��		�
Ch]6wgrepl
		gfilenamefsystem/repl/command.scm�
�
��	�	��		gnamegread-command�C"R�h�]44556�gc
		grepl		gfilenamefsystem/repl/command.scm�
�
��	�	��	�	"��	�	��	�	��			gnamegread-command-arguments�C#R"$#�hp]4L5L@hgargs
		gfilenamefsystem/repl/command.scm�
�	��	�	(��	�	!��		C0%&	hX]45&C�$.45$45O666grepl
		Rgcommand			Rgt		"	Igfilenamefsystem/repl/command.scm�
�
��	�	��		�	��	�	��	�	��	�	��	�	��	�	��	"�	��	-�	��	@�	��	E�	��	I�	��	N�	��	R�	��		Rgnamegmeta-command�CSR'��(hh~]445>"G$>45$4�5�C45 CCvgname
		egcategory		egproc			egargument-reader			egentry		.	cgfilenamefsystem/repl/command.scm�
�
��	�	��	
�	#��	�	��	%�	��	&�	��	.�	��	6�	��	9�	��	>�	$��	C�	6��	F�	0��	H�	��	I�	��	L�	��	W�	/��	Z�	 ��	]�	��	_�	��	a�	��		e	gnamegadd-meta-command!�C)R4,T-0:_acegirsq���om���������g��c�����ka�hH9]	L
�
��C1gtmp-3ee4d7042b-ab
		F		FC����h��,	3	45�����	

��	���4O5�����C�gdummy
	�gname	�gcategory		�grepl		�gexpression0		�gdatums		�g	docstring		�gb0		�gb1		�		�		C��h(�,3�������C�gdummy
		"gname		"gcategory			"grepl			"gdatums			"g	docstring			"gb0			"gb1			"		"	C�h(�,3��������C�gdummy
		!gname		!grepl			!gexpression0			!gdatums			!g	docstring			!gb0			!gb1			!		!	Ch �]��������C�gdummy
		gname		grepl			gdatums			g	docstring			gb0			gb1						Chh]!45$@45$@45$@45$	@
6gx
		ggtmp		ggtmp		"	ggtmp		9	ggtmp		P	ggfilenamefsystem/repl/command.scm�
�	��		gg
macro-typegsyntax-rules�gpatternsgnamegcategorygreplgexpression0g...gdatums���g	docstringgb0gb1g...gnamegcategorygreplgdatums��g	docstringgb0gb1g...gnamegreplgexpression0g...gdatums���g	docstringgb0gb1g...gnamegreplgdatums��g	docstringgb0gb1g...C5TR4)id	d
� !"#h8]445545456	gg
		1gname		1gusage			1gheader		&	1gfilenamefsystem/repl/command.scm�
	��	
	��	
	.��	
	��	
	��		��		.��		��	
	��		 ��	 	/��	$	<��	&	 ��	&
	��	1	��		1C�$%0&'()h j-13(y445>"G4>"G4>"G4	
�>"G4>"G4
>"G6"a"$"�"�"]�$M��&2�$"��(	66666�$��(	6"��"��{�$O��&9�$.��(45$456"��-"��)"��%"��!"���$.��(45$456"���"���"����$.��(45$456"���"���"����$(��&(	6"��t"��p"��lbgrepl
		 gargs		 gvx	��gvy	��gvx	��gvy	��gvx	gvy	gvx	.wgvy	.wgvx	Gogvy	Gogvx	��gvy	��gvx	��gvy	��gvx	�gvy	�gfilenamefsystem/repl/command.scm�
�
��		��			��			��			"��			��			��	'
	��	+
	��	0
	��	9	��	=	��	@	$��	E	��	N	��	U	��	Z	��	c	��	s	��	w	��	|	���	���	���!	���!	���#	���#	���#	���#	���#	���#	���#	���#	���	��	��	��	��R	��\	��_	��g	��k	���	���	���	���	���	���	���	���	���	���	��	��	��7		 
g
documentationf�help [all | GROUP | [-c] COMMAND]
Show help.

With one argument, tries to look up the argument as a group name, giving
help on that group if successful. Otherwise tries to look up the
argument as a command, giving help on the command.

If there is a command whose name is also a group name, use the ,help
-c COMMAND form to give help on the command instead of the group.

Without any argument, a list of help commands and command groups
are displayed.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0�d��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)ig��0-'	h��-13(4�>"G6�$q��(A45$44556��(	66(	666�grepl
		�gargs		�gvx		4�gvy		4�gvx		c	gvy		c	gvx	��gvy	��gfilenamefsystem/repl/command.scm�
%
��	/	��	1	��	1	��	1	��	'2	��	*/	��	?3	��	K/	��	L4	��	O4	��	Y4	��	]4	��	`/	��	r6	��	v6	��	{8	��	8	���/	���6	���6	���8	���8	���8	���8	��		�
g
documentationfshow [TOPIC]
Gives information about Guile.

With one argument, tries to show a particular piece of information;

currently supported topics are `warranty' (or `w'), `copying' (or `c'),
and `version' (or `v').

Without any argument, a list of topics is displayed.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
%
��		>
C0�g��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
%
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
%
��		,C>"G4)i�.h�]4>"G6�grepl
		gfilenamefsystem/repl/command.scm�
>
��	A	��	B	��		g
documentationf.show warranty
Details on the lack of warranty.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
>
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
>
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
>
��		,C>"G4)i�/h�]4>"G6�grepl
		gfilenamefsystem/repl/command.scm�
D
��	G	��	H	��		g
documentationfshow copying
Show the LGPLv3.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
D
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
D
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
D
��		,C>"G4)i�0h�]4>"G6�grepl
		gfilenamefsystem/repl/command.scm�
J
��	M	��	N	��		g
documentationf!show version
Version information.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
J
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
J
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
J
��		,C>"G4)iii1h�]456�grepl
		
gregexp		
gfilenamefsystem/repl/command.scm�
P
��	S	��	
S	��		
	g
documentationf.apropos REGEXP
Find bindings/modules/packages.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
P
��		>
C0�i��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
P
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
P
��		,C>"G4)il234�5hP9]
4445�$4455"	455>"G61grepl
		Igform		Iginput			6gfilenamefsystem/repl/command.scm�
U
��	X	��	Y	��		Z	��	Z	��	[	��	[	��	\	��	\	��	&\	��	+]	��	8Y	��	=X	��	I^	��		I	g
documentationf,describe OBJ
Show description/documentation.�C0�l��h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�
U
��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�
U
��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�
U
��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
U
��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
U
��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
U
��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�
U
��		MC>"G4)i�
07h�]���6zgspec
		gfilenamefsystem/repl/command.scm�
e	��	f	��	
f	+��	
f	6��	f	��		C89:�;
h��-13(
456"B�$9���$&��(44556CCC�$1��(445>"G	6"���"����grepl
		�gargs		�gvx		-	`gvy		-	`gvx		>	^gvy		>	^gvx		o�gvy		o�gfilenamefsystem/repl/command.scm�
`
��	c	��	g	��	e	��	 c	��	On	!��	Tn	+��	Zn	!��	\n	��	bc	��	zi	��	}i	���i	���j	���c	��		�
g
documentationf*option [NAME] [EXP]
List/show/set options.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
`
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
`
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
`
��		,C>"G4)i�<�h�]6�grepl
		gfilenamefsystem/repl/command.scm�
p
��	s		��	s	��		g
documentationfquit
Quit this session.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
p
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
p
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
p
��		,C>"G4)ip=>�a?hhk-13(44556�$8��(�$456456456456cgrepl
			ggargs			ggvx		*	\gvy		*	\gfilenamefsystem/repl/command.scm�
z
��	}	��	~	��	~	��	~	��	~	��	 }	��	7	��	;}	��	>�	��	F�	��	I�	#��	Q�	��	T�	#��	\�	��	_�	#��	g�	��			g
g
documentationf5module [MODULE]
Change modules / Show current module.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
z
��		>
C0�p��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
z
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
z
��		,C>"G4)is
=�>@�AB�0Ch(�]	45$4566�gname
		%gmod			%gfilenamefsystem/repl/command.scm�
�	��	�	��		�	��	�	��	�	��	�	��	!�	��	%�	��			%gnameguse�Ch0-13(44455566�grepl
			.gargs			.gfilenamefsystem/repl/command.scm�
�
��	�	��	�	��	�	(��	�	5��	"�	(��	$�	��	&�	��	.�	��
			.
g
documentationf9import [MODULE ...]
Import modules / List those imported.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0�s��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)ivFG1h�]456�grepl
		gfile		gfilenamefsystem/repl/command.scm�
�
��	�	��	�	��	�	��			g
documentationf,load FILE
Load a file in the current module.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0�v��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)iyH�?hhu-13(	456�$8��(�$456456456456mgrepl
			bgargs			bgvx		%	Wgvy		%	Wgfilenamefsystem/repl/command.scm�
�
��	�	��	�	��	�	��	�	��	2�	��	6�	��	9�	��	A�	��	D�	��	L�	��	O�	��	W�	��	Z�	��	b�	��			b
g
documentationfQreload [MODULE]
Reload the given module, or the current module if none was given.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0�y��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)i|I0Jh|]6tgk
		
gv		
gfilenamefsystem/repl/command.scm�
�	��	�	,��	
�	!��		
	C�h�]456�grepl
		
gfilenamefsystem/repl/command.scm�
�
��	�	��	
�	��		
g
documentationfbinding
List current bindings.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0�|��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)i?KtLa�h(x]4L>"G44L55LL@pgfilenamefsystem/repl/command.scm�
�	��	�	��	�	��	�	(��	 �	��	&�	��		&
CM:0NOh�-13	45$��$���&��$d��(845$O6(456	
6(456	
6(456	
6(456	
6(456	
6	6�grepl
		�gmodule		�gcommand-or-expression			�gargs			�gm		�gvx		(�gvy		(�gvx		A�gvy		A�	gfilenamefsystem/repl/command.scm�
�
��	
�	��	�	��	�	��	�	��	L�	&��	V�	��	g�	��	m�	��	r�	��	|�	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	��$		�	
	g
documentationf[in MODULE COMMAND-OR-EXPRESSION
Evaluate an expression or command in the context of module.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0���h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)iWY�0PQRSV	hX%]454544545>"G4>"G456grepl
		Tgname		Tglang			Tgcur			Tgfilenamefsystem/repl/command.scm�
�
��	�	��	
�	
��	�	��	�	��	�	��	�	��	"�	"��	-�	��	6�	��	T�	��		T	g
documentationf#language LANGUAGE
Change languages.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0�W��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)iW3XYMh0�]
445545$66�grepl
		-gform		-gx			-gfilenamefsystem/repl/command.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	%�	��	-�	��
		-	g
documentationf#compile EXP
Generate compiled code.�C0���h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�
�
��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�
�
��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�
�
��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�
�
��		MC>"G4)i��1Zh�-13456�grepl
			gfile			gopts				gfilenamefsystem/repl/command.scm�
�
��	�	��	�	��				
	g
documentationf!compile-file FILE
Compile a file.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)i�[3\]Dh0�]
44554>"G6�grepl
		.gform		.gx			.gfilenamefsystem/repl/command.scm�
�
��	�	��	�	��	�	��	�	��	�	��	.�	��		.	g
documentationf'expand EXP
Expand any macros in a form.�C0����h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�
�
��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�
�
��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�
�
��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�
�
��		MC>"G4)i�^3\]Dh0]
44554>"G6	grepl
		.gform		.gx			.gfilenamefsystem/repl/command.scm�
�
��	�	��	�	��	�	��	�	��	�	��	.�	��		.	g
documentationfGoptimize EXP
Run the optimizer on a piece of code and print the result.�C0����h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�
�
��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�
�
��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�
�
��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�
�
��		MC>"Gbh�]6�gx
		gfilenamefsystem/repl/command.scm�
�
��	�	��	�	��		gnamegguile:disassemble�CYR4)i�53cXY0dhH9]445545$"45$661grepl
		Egform		Egobj			Egt			2gfilenamefsystem/repl/command.scm�
�
��	�	
��	�	��	�	
��	�	��	�	��	�	��	)�	��	6�	��	<�	��	A�	��	E�	��
		E	g
documentationf1disassemble EXP
Disassemble a compiled procedure.�C0����h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�
�
��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�
�
��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�
�
��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�
�
��		MC>"G4)i�Ye1h�]44556�grepl
		gfile		gfilenamefsystem/repl/command.scm�
�
��	�	��	�	#��	�	��	�	��			g
documentationf)disassemble-file FILE
Disassemble a file.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)i�fgh53M0ijkh�D]:45454544554545454>"G4�	�
��	�
��	�
�>"GC<grepl
	�gform	�ggc-start		�g
real-start		�g	run-start		�gresult		'�grun-end		.�greal-end		5�ggc-end		<�	gfilenamefsystem/repl/command.scm�
�
��	�	��	�	��	
�	��	�	��	�	��	�	��		��		!��	'	��	'�	��	*	��	.�	��	1	��	5�	��	8	��	<�	��	?	��	S	��	X	��	]		��	_	��	`	��	h		��	j	��	k	��	s		��	u	��	v	��	~	��	�	g
documentationftime EXP
Time execution.�C0����h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�
�
��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�
�
��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�
�
��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�
�
��		MC>"G4)i�Nl3h �-134455@�grepl
			gform			gopts				gfilenamefsystem/repl/command.scm�

��			��		'��			��		��				
	g
documentationfprofile EXP
Profile execution.�C0����h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�

��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�

��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�

��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�

��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�

��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�

��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�

��		MC>"G4)i\^l3mnh(�-13445545@�grepl
			&gform			&gopts				&gfilenamefsystem/repl/command.scm�

��			��		'��			��		��	&	��			&	
	g
documentationftrace EXP
Trace execution.�C0�\��h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�

��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�

��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�

��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�

��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�

��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�

��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�

��		MC>"G4,o-0qrstuvw0x�������������hh�]LLL��LL��	�
�LL���
���C�gt-3ee4d7042b-8e0
		bgt-3ee4d7042b-8e1		bgt-3ee4d7042b-8e2			bgt-3ee4d7042b-8e3			bgt-3ee4d7042b-8e6			bgt-3ee4d7042b-8e5			bgt-3ee4d7042b-8e4			b		b	Chx�]4545454545454545$	O@
6�gname
		ugrepl		ugargs			ug	docstring			ugbody			ugbody*			ugtmp		D	ugtmp		O	ugfilenamefsystem/repl/command.scm�	+	��		+	/��	+	��	-	��	-	/��	-	��	/	��	/	/��	/	��	1	��	$1	/��	&1	��	'5	��	-5	/��	/5	��	07	&��	67	<��	87	&��	98	&��	?8	<��	A8	&��	D&	��		u	Ch(k]	45$@6cgx
		"gtmp		"gfilenamefsystem/repl/command.scm�
#	��		"C5oR4)i��n����m���0�
hh�-/03##45#45$ 45	4
56	6�grepl
		hgcount		hgwidth			hgfull?			hgdebug		9	hgfilenamefsystem/repl/command.scm�
<
��	#=	.��	3<
��	aC	��	f<
��		hgwidthS	�gfull?S	�g
documentationf�backtrace [COUNT] [#:width W] [#:full? F]
Print a backtrace.

Print a backtrace of all stack frames, or innermost COUNT frames.
If COUNT is negative, the last COUNT frames will be shown.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
<
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
<
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
<
��		,C>"G4)i���0�����V�����h@Z-.,3#45$45�$"
�$645�4455�${454455��$644	54455�>"G
4545�4545
�$4
5"644	545�>"G
4545�4545
�$4
5"66Rgrepl
	@gcount	@gdebug		@gt		,	@gfilenamefsystem/repl/command.scm�
I
��	%P	
��	,P	��	,P	��	=P	��	DO	��	IQ	��	KQ	��	UR	��	VR	��	bR	��	fO	��	nT	��	zT	��	{T	��	S	���U	���U	���W	���W	���W	���W	���Y	'���Y	"���X	���[	���[	���[	��&]	%��+]	 ��9\	��>I
��!	@g
documentationf�up [COUNT]
Select a calling stack frame.

Select and print stack frames that called this one.
An argument says how many frames up to go.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
I
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
I
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
I
��		,C>"G4)i���0���V������h-.,3#45$�45�$"
�$645�
�$Q45
�$6445
>"G4	545�
4545644545�>"G4	545�
4545
�$45"6
6grepl
	gcount	gdebug		gt		,	@gfilenamefsystem/repl/command.scm�
_
��	%f	
��	,f	��	,f	��	=f	��	De	��	Ig	��	Kg	��	Uh	��	Wh	��	[e	��	cj	��	hi	��	mk	��	ok	��	pm	���n	���p	���p	���p	���r	%���r	 ��q	��	_
��	g
documentationf�down [COUNT]
Select a called stack frame.

Select and print stack frames called by this one.
An argument says how many frames down to go.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
_
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
_
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
_
��		,C>"G4)i)��0���V�������h�-.,3#45$�$�45�$"
�$64455�$P445>"G	4545�
4545
�$45"6
6	4545�
4545
�$45"66�grepl
	�gidx	�gdebug		�gt		2	Fgfilenamefsystem/repl/command.scm�
t
��	*z	��	+}	��	2}	
��	2}	��	C}	��	J|	��	O~	��	Q~	��	T	
��	`	��	d|	��	e�	����	'����	"����	����	����	����	*����	%����		���t
��	�g
documentationflframe [IDX]
Show a frame.

Show the selected frame.
With an argument, select a frame by index, then show it.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
t
��		>
C0�)��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
t
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
t
��		,C>"G4)i��M���0�h8�]	45$44545�566�grepl
		2gdebug			2gfilenamefsystem/repl/command.scm�
�
��	�	��	+�	��	0�
��		2g
documentationf5procedure
Print the procedure for the selected frame.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)i��n����m0�
hP-/03#4545$4545�6	6grepl
		Mgwidth		Mgdebug		'	Mgfilenamefsystem/repl/command.scm�
�
��	�	0��	!�
��	F�	��	K�
��		M
gwidthS�g
documentationfQlocals
Show local variables.

Show locally-bound variables in the selected frame.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)i��0�����h@3]	45$$4455$45"66+grepl
		<gdebug			<gfilenamefsystem/repl/command.scm�
�
��	�	
��	�	��	&�	��	3�	2��	5�	��	:�
��		<g
documentationfyerror-message
Show error message.

Display the message associated with the error that started the current
debugging REPL.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)i�53��0����
h@~]445545$45456	6vgrepl
		@gform		@gproc			@gidx		&	8gfilenamefsystem/repl/command.scm�
�
��	�	��	�	��	�	��	�	��	�	
��	�	��	 �	��	&�	��	-�	��	0�	*��	8�	
��	<�	��	@�	��		@	g
documentationfabreak PROCEDURE
Break on calls to PROCEDURE.

Starts a recursive prompt when PROCEDURE is called.�C0����h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�
�
��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�
�
��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�
�
��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
�
��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�
�
��		MC>"G4)i��0��h8�]�$45"45456�grepl
		3gfile		3gline			3gfile			3gidx		!	3gfilenamefsystem/repl/command.scm�
�
��	�	��		�	��	
�	!��	�	��	�	��	!�	��	(�	��	+�	&��	3�	��		3	g
documentationf�break-at-source FILE LINE
Break when control reaches the given source location.

Starts a recursive prompt when control reaches line LINE of file FILE.
Note that the given source location must be inside a procedure.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G�,���h�]L44556{gframe
		gfilenamefsystem/repl/command.scm�
�	��	�	��	
�	��	�	��	�	��		Ch[]OCSgk
		
gfilenamefsystem/repl/command.scm�
�	��		
C0�,��
Mhd]L6\gx
		
gfilenamefsystem/repl/command.scm�
�	��	
�	'��		
C4A����h�S]4>G4L>"G45(4>"G",4>"G4	LO>"G4
45
54
L56Kgfrom
	
�gstack	
�gvals		0	~gfilenamefsystem/repl/command.scm�	�	��	�	��	�		��	�	��	!�		��	*�	��	0�		��	8�	��	9�	��	>�	��	C�	��	P�	��	U�	��	Z�	��	c�	��	�	
����	����	)����	����	>����	
����	����		��	�
Ch0�]45U4O>XCXFG@�grepl
		.gmsg		.ghandler			.gargs		#	.gfilenamefsystem/repl/command.scm�
�
��	�	��		.	gnamegrepl-pop-continuation-resumer�C�R4)i���0����<��h`\]45$G444545�5544545�>"G	6
6Tgrepl
		_gdebug			_ghandler		/	Xgfilenamefsystem/repl/command.scm�
�
��	�	��	�	��	�	"��	-�	��	/�	��	/�	��	2�	��	V�	��	X�	��	]�
��		_g
documentationfifinish
Run until the current frame finishes.

Resume execution, breaking when the current frame finishes.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G�,��hq]L456igframe
		
gfilenamefsystem/repl/command.scm�
�	��	�	��	
�	��		
Ch[]OCSgk
		
gfilenamefsystem/repl/command.scm�
�	��		
C0�4A����h@�]454L>"G4455	4

L56�gstack
			=gfilenamefsystem/repl/command.scm�	�	��		�	��	�	��	�	��	�	��	!�	��	$�	��	(�	'��	*�	��	,�	<��	.�	��	1�	��	=�	��		=
Ch0�]45U4O>XCXFG@�gmsg
		,ghandler		,gargs		!	,gfilenamefsystem/repl/command.scm�
�
��	�	��		,gnamegrepl-next-resumer�C�R4)i��0�������<��
hhd]45$K44545�544545�45	>"G
66\grepl
		cgdebug			cgmsg		(	\gfilenamefsystem/repl/command.scm�
�
��	�	
��	�	��	(�	
��	(�	��	+�	��	=�	&��	N�	��	Z�	��	\�	��	a�
��		cg
documentationfustep
Step until control reaches a different source location.

Step until control reaches a different source location.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)i��0�������<��
hhk]45$K44545�544545�45	>"G
66cgrepl
		cgdebug			cgmsg		(	\gfilenamefsystem/repl/command.scm�
�
��	�	
��	�	��	(�	
��	(�	��	+�	��	=�	&��	N�	��	Z�	��	\�	��	a�
��		cg
documentationf|step-instruction
Step until control reaches a different instruction.

Step until control reaches a different VM instruction.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)i��0�������<��
hh�]45$K44545�544545�45	>"G
66�grepl
		cgdebug			cgmsg		(	\gfilenamefsystem/repl/command.scm�
�
��	�	
��	�	��	(�	
��	(�	��	+�	��	=�	&��	N�	��	Z�	��	\�	��	a�
��		cg
documentationf�next
Step until control reaches a different source location in the current frame.

Step until control reaches a different source location in the current frame.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
�
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
�
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
�
��		,C>"G4)i��0�������<��
hh�]45$K44545�544545�45	>"G
66�grepl
		cgdebug			cgmsg		(	\gfilenamefsystem/repl/command.scm�

��		
��		��	(	
��	(	��	+	��	=	&��	N	��	Z	��	\	��	a
��		cg
documentationf�next-instruction
Step until control reaches a different instruction in the current frame.

Step until control reaches a different VM instruction in the current frame.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�

��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�

��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�

��		,C>"G4)i�53��0����
h@�]445545$45456	6�grepl
		@gform		@gproc			@gidx		&	8gfilenamefsystem/repl/command.scm�


��		��		��		��		��		
��		��	 	��	&	��	-	��	0	*��	8	
��	<	��	@	��		@	g
documentationf�tracepoint PROCEDURE
Add a tracepoint to PROCEDURE.

A tracepoint will print out the procedure and its arguments, when it is
called, and its return value(s) when it returns.�C0����h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�


��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�


��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�


��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�


��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�


��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�


��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�


��		MC>"G4)i�0
0�h(�]4545$"6�gidx
		%gfilenamefsystem/repl/command.scm�
	��		��	
 	 ��	!	 ��	!	��	!	4��	#!	7��	%	��			%Ch 3]	45(66+grepl
		gtraps		gfilenamefsystem/repl/command.scm�

��		��		��		��		��		��		��		g
documentationfxtraps
Show the set of currently attached traps.

Show the set of currently attached traps (breakpoints and tracepoints).�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�

��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�

��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�

��		,C>"G4)i���h �]45$66�grepl
		gidx		gfilenamefsystem/repl/command.scm�
$
��	)	��	
)	��	+	��	*	
��	*	��			g
documentationf)delete IDX
Delete a trap.

Delete a trap.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
$
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
$
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
$
��		,C>"G4)i���h �]45$66�grepl
		gidx		gfilenamefsystem/repl/command.scm�
-
��	2	��	
2	��	4	��	3	
��	3	��			g
documentationf,disable IDX
Disable a trap.

Disable a trap.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
-
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
-
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
-
��		,C>"G4)i���h �]45$66�grepl
		gidx		gfilenamefsystem/repl/command.scm�
6
��	;	��	
;	��	=	��	<	
��	<	��			g
documentationf)enable IDX
Enable a trap.

Enable a trap.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
6
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
6
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
6
��		,C>"G4)i��	��0�h0�]	45$4545�66�grepl
		+gdebug			+gfilenamefsystem/repl/command.scm�
?
��	$D	��	)?
��		+g
documentationfEregisters
Print registers.

Print the registers of the current frame.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
?
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
?
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
?
��		,C>"G4)i
n0h8-.,3#4>"G456grepl
		3gx		3gfilenamefsystem/repl/command.scm�
F
��	L	��	,M	
��	-M	1��	3M	��		3g
documentationfpwidth [X]
Set debug output width.

Set the number of screen columns in the output from `backtrace' and
`locals'.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
F
��		>
C0�
��h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
F
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
F
��		,C>"G4)iHl3
Jh(]
44455>G6�grepl
		&gform		&gargs			&gfilenamefsystem/repl/command.scm�
U
��	X	��	X	��		X	2��	X	��	X	��	&Z	��		&	g
documentationf4inspect EXP
Inspect the result(s) of evaluating EXP.�C0�H��h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�
U
��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�
U
��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�
U
��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
U
��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
U
��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
U
��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�
U
��		MC>"G4)iBl3
\]Dh m]4>"G6egx
		gfilenamefsystem/repl/command.scm�
b	��	c		��	d		��		Ch(]
44455>G6grepl
		&gform		&gargs			&gfilenamefsystem/repl/command.scm�
\
��	_	��	_	��		_	2��	_	��	_	��	&a	��		&	g
documentationf>pretty-print EXP
Pretty-print the result(s) of evaluating EXP.�C0�B��h�]3�$����$����$K��4>"G445>"G"4>"G"4>"G"4>"G6g	form-name
	�gkey	�gargs		�gvx		�gvy		�gvx		 �gvy		 �gvx		1	rgvy		1	r	gfilenamefsystem/repl/command.scm�
\
��	�	gnameghandle-read-error�C,��Z��h0^-.,3#4544L55456Vgport
		.gfilenamefsystem/repl/command.scm�
\
��		.
ChJ]LO6Bgfilenamefsystem/repl/command.scm�
\
��		
C6hm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
\
��			
C(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
\
��		>
Chm-13L6egk
			gargs			gfilenamefsystem/repl/command.scm�
\
��			
C	hP�]45U64OO544O5>XCXFGC�grepl
		Mghandle-read-error		Mgform		$	Bgk		F	Mgfilenamefsystem/repl/command.scm�
\
��		MC>"G4)i��h�]6�grepl
		gfilenamefsystem/repl/command.scm�
l
��	o	��		g
documentationfgc
Garbage collection.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
l
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
l
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
l
��		,C>"G4)i�
 !"#$%&'()*+,-.V&h�;]a4545454545454	>"G4
>"G45454
>"G4�>"G4
>"G45454
>"G4>"G4
>"G45454
>"G4>"G4
>"G4545454545454545
	4
 >"G4!>"G4">"G4#	
>"G4$>"G4
>"G	
44%5>"G4%563grepl
	|gthis-tms	|gthis-gcs		|glast-tms		|glast-gcs		|g
this-times		4	gg
last-times		4	gg	this-heap		y�g	this-free		y�g
this-alloc	� g
last-alloc	� g
this-total	2xg
last-total	2xg
this-utime	�Vg
last-utime	�Vg
this-stime	�Vg
last-stime	�Vgthis-cutime		�Vglast-cutime	
�Vgthis-cstime	�Vglast-cstime	�Vgfilenamefsystem/repl/command.scm�
q
��	t	��	u	��	
v	��	w	��	t	��	#y	��	)y	*��	+y	��	,z	��	2z	*��	4z	��	4y	��	9{	��	={	��	D{	>��	I{	��	R|	��	h~	��	n~	)��	p~	��	q	��	w	*��	y	��	y~	��	~�	����	����	)����	3����	����	����	����	����	@����	����	����	����	)����	����	����	)����	����	����	����	����	-����	4����	����	����	����	>���	���	��!�	��'�	)��)�	��*�	��0�	)��2�	��2�	��7�	��;�	��=�	+��?�	2��D�	��M�	��Q�	��Z�	��c�	��y�	����	����	����	����	����	����	����	����	����	����	����	0����	7����	����	����	����	����	����	����	���	���	���	���	���	��&�	��/�	��W�	��|�	��c	|g
documentationfstatistics
Display statistics.�C,(����h@|]4455"%4545$6�"���"���tgport
		>gout		7gx			7gfilenamefsystem/repl/command.scm�
q
��		>
C0����h��-13�$����$���$J��4>"G445>"G"4>"G"4>"G"4>"G6�gk
		�gargs		�gvx		�gvy		�gvx		'�gvy		'�gvx		8	xgvy		8	xgfilenamefsystem/repl/command.scm�
q
��		�
Ch0k]	45U445>XCXFGCcgrepl
		,gk	%	,gfilenamefsystem/repl/command.scm�
q
��		,C>"G0/0h0]
4$"56gtitle
		)gflag		)gfield1			)gfield2			)gunit			)gfmt			)gfilenamefsystem/repl/command.scm�
�
��	�	
��	�	��	�	8��	�	A��	�	D��	�	
��	�	��	)�	��
		)	gnamegdisplay-stat�CRh�]6�gtitle
		gfield1		gfield2			gfilenamefsystem/repl/command.scm�
�
��	
�	'��	�	��			gnamegdisplay-stat-title�CRh�]�6�gtitle
		gflag		gthis			glast			gunit			gfilenamefsystem/repl/command.scm�
�
��	
�	��	�	��			gnamegdisplay-diff-stat�CR012k3h@8]�44�5544�5560gtitle
		9gthis		9glast			9gnum			#gfilenamefsystem/repl/command.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	(��	�	��	 �	��	)�	��	*�	��	1�	(��	3�	��	5�	��	7�	:��	9�	��		9	gnamegdisplay-time-stat�C%R40156h`�]��
�$"4��5
�$"4��56�gtitle
		[g	this-time		[g
this-clock			[g	last-time			[g
last-clock			[gtime			9gclock			9gfilenamefsystem/repl/command.scm�
�
��	�	��	�	.��	�	��	�	��	�	��	�	��	$�	��	)�	%��	.�	.��	0�	<��	1�	.��	3�	��	=�	��	A�	��	C�	��	H�	��	M�	%��	R�	.��	T�	<��	U�	.��	W�	��	Y�	,��	[�	��		[	gnamegdisplay-mips-stat�C7RC;gm
		0gfilenamefsystem/repl/command.scm�		
��	2	3	��	5	2
��	7	H	��	:	G
���	J
��_	K
��`	M	��i	M
���	N
���	O
��=	P
���	Q
���	R
��L	T
���	W
���	Z
��o	]
���	a
��	a	h
��/	k
��
H	s
��O	|
���
����
���
����
����
��!��
��.q%
��5�>
��:D
��>QJ
��B�P
��GU
��O`
��U�p
��Y�z
��_Y�
��e9�
��i��
��o)�
��t�
��|A�
���i�
����
�����
����
���n�
���o�
���b�
�����
���2
����
��ƒ<
���iI
��ӹ_
��ڑt
���)�
�����
����
����
���J�
����
����
����
����
���
����
��A
��!�

��*r
��0I$
��4�-
��9�6
��>?
��B�F
��G�U
��OJ\
��W�l
��[�q
��i��
��j��
��k��
��ml�
��o��
��W	o�
C6PK*[�'�f�,�,repl/repl.gonu�[���GOOF----LE-8-2.0�,]�4h"]gguile�	�	gdefine-module*�	�	�	gsystem�	grepl�	�		gfilenameS�	
fsystem/repl/repl.scm�	gimportsS�	gbase�	
gsyntax�	
�	�	gpmatch�	�	�	gcompile�	�	�	glanguage�	�	�	gvm�	�	�	gerror-handling�	�	�	gcommon�	 �	! �	"gcommand�	#"�	$#�	%gice-9�	&gcontrol�	'%&�	('�	)!$(	�	*gexportsS�	+g
start-repl�	,grun-repl�	-+,�	.gset-current-module�	/.�	0.�	1g	read-char�	2geof-object?�	3gread-scheme-line-comment�	4gread�	5gread-scheme-datum-comment�	6g
language-name�	7gscheme�	8g	peek-char�	9gunread-char�	:gread-comment�	;gmeta�	<gmeta-command-token�	=gcurrent-input-port�	>gwith-input-from-port�	?gflush-leading-whitespace�	@glanguage-reader�	Agmeta-reader�	Bgchar-ready?�	Cgflush-all-input�	Dgcatch�	Egrepl-reader�	Fgrepl-prompt�	Gg
repl-language�	Hgcurrent-module�	Igquit�	Jgthrow�	Kgformat�	Lgcurrent-output-port�	MfWhile reading expression:
�	Ngprint-exception�	Ogprompting-meta-read�	PgdebugS�	QP��	RQ�	Sgcurrent-language�	Tgstart-repl*�	Ug
parameter?�	VU�	WU�	Xg	scm-error�	Ygwrong-type-arg�	Zfparameterize�	[fNot a parameter: ~S�	\g	run-repl*�	]g	make-repl�	^gmake-syntax-transformer�	_^�	`^�	agabort-on-error�	bgmacro�	cg$sc-dispatch�	dc�	ec�	fgany�	gfff�	hg
syntax-object�	igtop�	ji�	kgribcage�	lgdummy�	mgstring�	ngexp�	olmn�	pgm-1e9e6487f-43�	qpi�	rqjj�	sfl-1e9e6487f-48�	tfl-1e9e6487f-49�	ufl-1e9e6487f-4a�	vstu�	wkorv�	xk�	ygx�	zy�	{q�	|fl-1e9e6487f-45�	}|�	~kz{}�	jwx~��ghygiene�����hD���h���glambda��h����gkey��h����gargs��h���������hK���fWhile ~A:~%��h����hN���hL������h����������gabort��h�����������gsyntax-violation��������f-source expression failed to match any pattern��gdefault-prompt-tag��g%start-stack��������'���'���g*repl-stack*��grepl-welcome��gmeta-command��fWhile executing meta-command:~%��gnewline��gflush-to-newline��gcall-with-error-handling��grepl-prepare-eval-thunk��g
repl-parse��fparsing expression��fcompiling expression��grun-hook��gbefore-eval-hook��gon-errorS��grepl-option-ref��gon-error��gfor-each��g
repl-print��gtrap-handlerS��gdisabled��gchar-whitespace?��gchar=?�C5h��]4	
)*-540>"G12h8�]"*4545$C
�$C"���"����gport
		4gch	
	0gt			0gfilenamefsystem/repl/repl.scm�
	)
��		*	��		+	��	
	+	��		,	
��		,	��	&	-	
��	*	,	��	+	-	
��	0	.	
��	0	*	��		4gnamegread-scheme-line-comment�C3R4h�]6gport
		gfilenamefsystem/repl/repl.scm�
	0
��		1	��		gnamegread-scheme-datum-comment�C5R6713859h�]45&�;�$&4>"G4>"GC#�$`4>"G45;�$&4>"G4>"GC4#>"GCCCglang
	�gport	�gch		�gkey		`�gfilenamefsystem/repl/repl.scm�
	4
��		5	��		5	!��		5	��		6	��		8	
��	+	9	
��	G	6	��	H	<	
��	Z	=	��	`	=	
��	l	?	
��	~	@	
���	G	
��	�	gnamegread-comment�C:R;"�<R=>?21<:@hX�]4545$6,�$4>"GC4LL5$C4L5LL6�gch
		Rgfilenamefsystem/repl/repl.scm�
	W	��		X	��		X	��	
	Y	��		Y	
��		Z	��		[	��	!	Y	
��	"	\	��	5	^	��	C	Y	
��	F	`	��	R	`	��		R
Ch0k-.,3#45LLO6cgport
		*gfilenamefsystem/repl/repl.scm�
	U	��		U	��	*	V	��		*
Ch�]OCzglang
		genv		gfilenamefsystem/repl/repl.scm�
	T
��			gnamegmeta-reader�CARB281Ch8�]45$$4455$C4>"G6C�gfilenamefsystem/repl/repl.scm�
	b
��		c	��		c	��		d	��		d	��		d	��		c	��		f	��	/	g	��
		1
gnamegflush-all-input�CCRDEFhO]L6Ggfilenamefsystem/repl/repl.scm�
	s	��		s	��		
CAGHh o]LO44L54556ggfilenamefsystem/repl/repl.scm�
	r	��		t	��		t	 ��		t	5��		t	��		s	��		
CIJKLMNCh`�-13�$@445>"G445>"G4>"GC�gkey
			]gargs			]gfilenamefsystem/repl/repl.scm�
	u	��		v	��		x		��		z		��		z	��	$	z	'��	)	z		��	2	{		��	5	{	��	C	{		��	L	|		��			]
Ch�]O6ygrepl
		gfilenamefsystem/repl/repl.scm�
	p
��		q	��		gnamegprompting-meta-read�CORRSTOh8�-/03#45#6�glang
		3gdebug		3gfilenamefsystem/repl/repl.scm�
�
��	�	&��	3�	��		3
gdebugS�gnameg
start-repl�C+RSWXYZ[\]	hX�]45$"4>"G�4	�5Y445>ZCZF�glang
		Xgdebug		Xgprompting-meta-read			Xgt-1e9e6487f-3e			Xgfilenamefsystem/repl/repl.scm�
�
��	�	��	B�	��	E�	��	T�	��		X	gnamegstart-repl*�CTR4`abeg�������h(R]���CJgdummy
		&gstring		&gexp			&		&	C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/repl/repl.scm�
�
��		"g
macro-typegsyntax-rules�gpatternsgstringgexpC5aR\Ohx]6pgrepl
		
gfilenamefsystem/repl/repl.scm�
�
��	
�	��		
gnamegrun-repl�C,R��hQ]L6Igfilenamefsystem/repl/repl.scm�
�	!��	�	1��		
ChI]LO6Agfilenamefsystem/repl/repl.scm�	�	!��		
ChQ]LL6Igfilenamefsystem/repl/repl.scm�
�	/��	�	:��		
Ch8�]45U4O>XCXFGO"����gthunk
		3gk		3gproc			3gfilenamefsystem/repl/repl.scm�
�	��	�	��	�	��	3�	��		3gnamegwith-stack-and-prompt�C���<D�hQ]L6Igfilenamefsystem/repl/repl.scm�
�	��	�	��		
CI�K�NLh8�-13&64>"G456�gk
			8gargs			8gfilenamefsystem/repl/repl.scm�
�	��	
�	��	�	��	�	��	�	��	�	"��	"�	��	-�	(��	8�	��
			8
C2����DI�D�D�hQ]LL6Igfilenamefsystem/repl/repl.scm�
�	'��	
�	)��		

CK��NL�h@-134>"G445>"G6wgkey
			<gargs			<gfilenamefsystem/repl/repl.scm�
�	'��	�	7��	�	'��			<
Ch Z]L4LLO56Rgfilenamefsystem/repl/repl.scm�
�	$��	�	'��	�	&��		
CK��NL�h@�-134>"G445>"G6�gkey
			<gargs			<gfilenamefsystem/repl/repl.scm�
�	$��	�	'��	�	4��	�	$��			<
C���hQ]LL6Igfilenamefsystem/repl/repl.scm�
�	 ��	�	"��		
C�����ha]L6Ygv
		
gfilenamefsystem/repl/repl.scm�
�	"��	
�	$��		
Chx�]45UI4LLO54L>"G4LO	4
L5>X"G
"G
LO6�gthunk
		Ogk
	U	_gl
	`	rgfilenamefsystem/repl/repl.scm�
�	��	�	��	
�	$��	�	��	 �	��	4�	��	B�	+��	H�	A��	J�	+��	O�	��	X�	��	_�	)��	c�	��	r�	��		r
C�ht-136lgk
			gargs			gfilenamefsystem/repl/repl.scm�
�	��	�	��			
ChZ]LLLO6Rgfilenamefsystem/repl/repl.scm�
�	��	�	��	�	��		
C�����h(]OQ45U[$"�Y[�(4>"G""�45�$"�&4O>"G"j4	5$%4
>"G4>"G":4>"G4
O45>"G4>"G"��G"��CZ"XCXFGCgrepl
	(gprompting-meta-read	(gwith-stack-and-prompt		
(gt		 	2gexp		^gk	(gstatus	(gfilenamefsystem/repl/repl.scm�
�
��	�	��	 �	��	/�	<��	3�	��	9�	��	=�	��	>�	��	W�	��	X�	��	^�		��	d�	
��	h�	��	u�	
����	
����	����	
����	
����	����	
����	
����	
����	����	/����	����	����	
����	���	���	��!�	�� 	(	gnameg	run-repl*�C\R82�1?h@�]4545$C45$4>"G6C�gch
		9gfilenamefsystem/repl/repl.scm�
�
��	�	��	�	��	
�	��	�	��	�	��	"�	��	#�	!��	6�	-��
		9
gnamegflush-leading-whitespace�C?RB82�1��hX�]45$G4545$"45$#4>"G4
5$C6CC�gch
		Rgfilenamefsystem/repl/repl.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	#�	(��	-�	��	.�	��	>�	��	J�	��	P�	��		T
gnamegflush-to-newline�C�RC�gm
		,gfilenamefsystem/repl/repl.scm�		
��g	)
��
	0
���	4
���	R	!���	R	'���	R	���	R
��u	T
��m	b
��
d	p
��b�
����
����
��b�
����
����
��	�
C6PK*[<5�^77repl/common.gonu�[���GOOF----LE-8-2.07]�4h|]gguile�	�	gdefine-module*�	�	�	gsystem�	grepl�	gcommon�		�	
gfilenameS�	fsystem/repl/common.scm�	gimportsS�	
gbase�	gsyntax�	
�	�	gcompile�	
�	�	glanguage�	
�	�	gmessage�	
�	�	gvm�	gprogram�	�	�	gice-9�	gcontrol�	 �	! �	"ghistory�	#"�	$#�	%!$�	&gexportsS�	'g<repl>�	(g	make-repl�	)g
repl-language�	*grepl-options�	+g
repl-tm-stats�	,g
repl-gc-stats�	-g
repl-debug�	.grepl-welcome�	/grepl-prompt�	0g	repl-read�	1grepl-compile�	2grepl-prepare-eval-thunk�	3g	repl-eval�	4grepl-expand�	5g
repl-optimize�	6g
repl-parse�	7g
repl-print�	8grepl-option-ref�	9grepl-option-set!�	:grepl-default-option-set!�	;grepl-default-prompt-set!�	<gputs�	=g->string�	>g
user-error�	?g
*warranty*�	@g	*copying*�	Ag	*version*�	B'()*+,-./0123456789:;<=>?@A�	Cg	autoloadsS�	Dgtree-il�	Egoptimize�	FDE�	Gg	optimize!�	HG�	IFH�	Jgset-current-module�	KJ�	LJ�	Mgformat�	NfGNU Guile ~A
Copyright (C) 1995-2016 Free Software Foundation, Inc.

Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'.
This program is free software, and you are welcome to redistribute it
under certain conditions; type `,show c' for details.�	Ogversion�	PfqGuile is free software: you can redistribute it and/or modify
it under the terms of the GNU Lesser General Public License as
published by the Free Software Foundation, either version 3 of
the License, or (at your option) any later version.

Guile is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.

You should have received a copy of the GNU Lesser General Public
License along with this program. If not, see
<http://www.gnu.org/licenses/lgpl.html>.�	Qf8Guile is distributed WITHOUT ANY WARRANTY. The following
sections from the GNU General Public License, version 3, should
make that clear.

  15. Disclaimer of Warranty.

  THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
ALL NECESSARY SERVICING, REPAIR OR CORRECTION.

  16. Limitation of Liability.

  IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
SUCH DAMAGES.

  17. Interpretation of Sections 15 and 16.

  If the disclaimer of warranty and limitation of liability provided
above cannot be given local legal effect according to their terms,
reviewing courts shall apply local law that most closely approximates
an absolute waiver of all civil liability in connection with the
Program, unless a warranty or assumption of liability accompanies a
copy of the Program in return for a fee.

See <http://www.gnu.org/licenses/lgpl.html>, for more details.�	Rgmake-record-type�	Sf<repl>�	Tgoptions�	Ugtm-stats�	Vggc-stats�	Wgdebug�	XTUVW�	Ygrecord-constructor�	Zg%compute-initargs�	[grecord-predicate�	\grepl?�	]gmake-procedure-with-setter�	^grecord-accessor�	_grecord-modifier�	`g	copy-tree�	agcompile-options�	bg%auto-compilation-options�	c�	dgtrace�	ed�	fginterp�	gf�	hgprompt�	igstring?�	jgthunk?�	kg
procedure?�	lgerror�	mfInvalid prompt�	ngprint�	ofInvalid print procedure�	pg
value-history�	qgvalue-history-enabled?�	rgenable-value-history!�	sgdisable-value-history!�	tg->bool�	ugon-error�	vg	backtrace�	wgreport�	xgpass�	yf)Bad on-error value ~a; expected one of ~a�	zWvwx�	{grepl-default-options�	|g
%make-repl�	}glanguageS�	~g	language?�	glookup-language��goptionsS��gtm-statsS��gtimes��ggc-statsS��gdebugS��gdisplay��gnewline��fEnter `,help' for help.
��f	~A@~A~A> ��g
language-name��gmodule-name��gcurrent-module��glength��g*repl-stack*��f��f [~a]��glanguage-reader��gcurrent-input-port��grepl-compile-options��gfromS��gtoS��gobjcode��goptsS��genvS��g	decompile��glanguage-parser��glanguage-evaluator��gmake-program��glanguage-compilers��gdefault-prompt-handler�� ��� ���gdefault-prompt-tag�� ��� ���grun-hook��gbefore-print-hook��gwrite��gassq��funknown repl option��gobject->string��gthrow�C5h��]4	
%&BCI5	4L>"G4MiN4Oi55ARP@RQ?R4RiSX5'RTUVW4Yi'i5Zh.-13L4L5@&gargs
						


CO(R4[i'i5\R4]i4^i'i54_i'i55)R4]i4^i'iT54_i'iT55*R4]i4^i'iU54_i'iU55+R4]i4^i'iV54_i'iV55,R4]i4^i'iW54_i'iW55-R4`iabic��eghih\]LCTgrepl
		gfilenamefsystem/repl/common.scm�
	u	&��		Cjhd]L6\grepl
		gfilenamefsystem/repl/common.scm�
	v	%��		v	4��		CklmhH�]$<45$OC45$OC45$C6C�gprompt
		Fgfilenamefsystem/repl/common.scm�
	r	��		s	��			u	��		s	��		v	��	&	s	��	/	w	��	9	s	��	@	x	!��	D	x	��		FCnkloh �]$45$C6C}gprint
		 gfilenamefsystem/repl/common.scm�
	y	��		z	��			|	��		z	��		}	 ��		}	��		 Cp4qi5rsth8~]$4>"G"4>"G6vgx
		2gfilenamefsystem/repl/common.scm�
�	��	�		��		�	��	�	'��	2�		��		2CuWWvwxlyzh@�]&"&"&"�$C6gx
		?gfilenamefsystem/repl/common.scm�
�		��	
�	��	2�	��	9�	��	=�	��	?�	��		?C5{R(i|R|}~�`{���V�
hP�-.,3#45$"45454	5
456
�glang
		Ngdebug		Ngfilenamefsystem/repl/common.scm�
�
��	�	��	$�	��	+�	��	4�	��	=�	��	D�	��	N�	��			Ngnameg	make-repl�C(R�A��h@�]4>"G4>"G4>"G6�grepl
		:gfilenamefsystem/repl/common.scm�
�
��	�	��	�	��	%�	��	8�	��	:�	��		:gnamegrepl-welcome�C.R8hM��)������
hp|]45$6445544554	
[$�"5
�$"
456tgrepl
		ngt		ngt		:	Mglevel		O	lgfilenamefsystem/repl/common.scm�
�
��	�	��		�	��	�	��	�	��	�	��	�	��	�	��	"�	*��	*�	��	+�	��	.�	��	4�	��	5�	��	:�	!��	J�	(��	O�	��	O�	��	T�	��	Y�	��	[�	 ��	`�	#��	e�	.��	i�	#��	n�	��		ngnamegrepl-prompt�C/R�)��h �]	445545456�grepl
		greader		gfilenamefsystem/repl/common.scm�
�
��	�	��	�	!��	�	��	�	��	�	��	�	!��	�	��			gnameg	repl-read�C0R8ah�]6�grepl
		
gfilenamefsystem/repl/common.scm�
�
��	�	��	
�	��		
gnamegrepl-compile-options�C�R)�������
h0�]45454	56	�grepl
		-gform		-gfrom			-gopts			-gfilenamefsystem/repl/common.scm�
�
��	�	��	
�	��	�	��	 �	#��	'�	��	-�	��		-	gnamegrepl-compile�C1R)����D���h@�]45454	4
55	6�grepl
		:gform		:gfrom			:gopts			:gfilenamefsystem/repl/common.scm�
�
��	�	��	
�	��	�	��	�	��	#�	.��	*�	��	0�	��	4�	��	:�	��		:	gnamegrepl-expand�C4R)��G��D���hH]454544	
455	4556grepl
		Fgform		Fgfrom			Fgopts			Fgfilenamefsystem/repl/common.scm�
�
��	�	��	
�	��	�	��	�	��	�	��	&�	9��	-�	)��	3�	��	4�	��	<�	��	@�	��	F�	��		F	gnameg
repl-optimize�C5R�)h �]
4455$6C�grepl
		gform		gparser			gfilenamefsystem/repl/common.scm�
�
��	�	��	�	!��	�	��	�	��	�	��	�	��			gnameg
repl-parse�C6R�)�1�8f�h\]LL456Tgfilenamefsystem/repl/common.scm�
�	��	�	��	
�	��		
C	hhC]4455"
456$84455�$"	45$
OC"���"���;grepl
		cgform		cgeval			cgt		4	Mgfilenamefsystem/repl/common.scm�
�
��	�	��	�	#��	�	��	�	��	�	��	!�	��	!�	��	(�	��	+�	,��	3�	��	4�	��	4�	
��	B�	��	H�	'��	J�	��	Q�	��		c	gnamegrepl-prepare-eval-thunk�C2R2��hK]L6Cgfilenamefsystem/repl/common.scm�	�	��		
Ch8�]4545U4O>XCXFG@�grepl
		7gform		7gthunk			7ghandler			7gargs		,	7gfilenamefsystem/repl/common.scm�
�
��	�	��	�	��	�	��		7	gnameg	repl-eval�C3R��8n��hP�]
&C4>"G45$64>"G6�grepl
		Ngval		Ngt		(	Ngfilenamefsystem/repl/common.scm�
�
��		�	��	�	��	 �	
��	&�	 ��	(�	
��	(�	��	8�	��	9�	
��	N�	
��		N	gnameg
repl-print�C7R�*l�h0�]
4455$"	45��C�grepl
		-gkey		-gt			*gfilenamefsystem/repl/common.scm�
�
��	�	��	�	��	�	��	�	��	�	��	#�	��	'�	��	+�	��
		-	gnamegrepl-option-ref�C8R�*l�khPU]4455$"	45�4���5$4���5"�CMgrepl
		Pgkey		Pgval			Pgt			*gspec		*	Pgfilenamefsystem/repl/common.scm�
�
��	�	��	�	��	�	��	�	��	�	��	#�	��	'�	��	*�	��	/�	��	0�	��	5�	��	9�	��	=�	��	>�	��	A�	��	G�	��	N�	��		P	gnamegrepl-option-set!�C9R�{l�khP9]
45$"	45�4���5$4���5"�C1gkey
		Kgval		Kgt			%gspec		%	Kgfilenamefsystem/repl/common.scm�
�
��	�	��	�	��	�	��	�	��	"�	��	%�	��	*�	��	+�	��	0�	��	4�	��	8�	��	9�	��	<�	��	B�	��	I�	��		K	gnamegrepl-default-option-set!�C:R:hh�]6�gprompt
		
gfilenamefsystem/repl/common.scm�
�
��	�	��	
�	��		
gnamegrepl-default-prompt-set!�C;R��h|]4>"G6tgx
		gfilenamefsystem/repl/common.scm�
�
��	�	��	�	��		gnamegputs�C<R��hw]6ogx
		
gfilenamefsystem/repl/common.scm�

��	
	��		
gnameg->string�C=R�>h�-136�gmsg
			gargs			gfilenamefsystem/repl/common.scm�

��	
		��		��			
gnameg
user-error�C>RC�gm
		0gslots
	t�gconstructor	t�gfilenamefsystem/repl/common.scm�		
��	1	(	��	8	(	
��	9	-	7��	A	(	��	D	'
��	F	0
��	I	/
��	K	?
��	N	>
��	\	j
���	n	���	o	��k		��A	o	��/	n	��2	m
��9�
��w�
��u�
��
��
����
��B�
��
|�
����
��k�
��r�
����
��<�
����
����
����
��$�
����
����
��*
���
��&	�
C6PK*[�<67y,y,
repl/debug.gonu�[���GOOF----LE-8-2.0a,]�4h-]gguile�	�	gdefine-module*�	�	�	gsystem�	grepl�	gdebug�		�	
gfilenameS�	fsystem/repl/debug.scm�	gimportsS�	
gbase�	gpmatch�	
�	�	gsyntax�	
�	�	glanguage�	
�	�	gvm�	�	�	gframe�	�	�	gice-9�	grdelim�	�	 �	!gpretty-print�	"!�	#"�	$gformat�	%$�	&%�	'ginspect�	('�	)gselectS�	*g%inspect�	+'*��	,+�	-(),�	.gprogram�	/.�	0/�	1 #&-0
�	2gexportsS�	3g<debug>�	4g
make-debug�	5gdebug?�	6gdebug-frames�	7gdebug-index�	8gdebug-error-message�	9gdebug-for-trap?�	:gterminal-width�	;gprint-registers�	<gprint-locals�	=gprint-frame�	>gprint-frames�	?g
frame->module�	@g
stack->vector�	Agnarrow-stack->vector�	Bgframe->stack-vector�	C3456789:;<=>?@AB�	Dgset-current-module�	ED�	FD�	Ggmake-record-type�	Hf<debug>�	Igframes�	Jgindex�	Kg
error-message�	Lg	for-trap?�	MIJKL�	Ngrecord-predicate�	Ogmake-procedure-with-setter�	Pgrecord-accessor�	Qgrecord-modifier�	Rg
make-fluid�	Sgcatch�	TS�	US�	Vgstring->number�	Wggetenv�	XfCOLUMNS�	Yginteger?�	Zgexact?�	[gerror�	\f-Expected a column number (a positive integer)�	]gmake-hash-table�	^g
hash-for-each�	_g
hashq-set!�	`g	hashq-ref�	ag
reverse-hashq�	bgper-line-prefixS�	cb	��	dc�	egcurrent-output-port�	ff  �	gf~aRegisters:~%�	hgframe-instruction-pointer�	igdisplay�	jgrun-hook�	kgbefore-print-hook�	lfip = ~d
�	mgframe-stack-pointer�	nf
sp = #x~x
�	og
frame-address�	pf
fp = #x~x
�	qgwidthS�	rq	��	sb	��	trs�	ugframe-bindings�	vf~aNo local variables.~%�	wf~aLocal variables:~%�	xgfor-each�	ygframe-local-ref�	zg
binding:index�	{gbinding:boxed?�	|f~a~:[~; (boxed)~] = ~v:@y
�	}gbinding:name�	~gindexS�	~	���q	���gfull?S���	���glast-sourceS���	���gnext-source?S���	���������gframe-next-source��gframe-source��gsource:file��f
current input��funknown file��gand=>��gsource:line-for-user��g
source:column��f
~&In ~a:~&��f~9@a~:[~*~3_~;~3d~] ~v:@y~%��f~a:~a��f��gframe-call-representation��f     ���	���gforward?S���	���gcountS���	���g	for-trap?S���	���r������g
vector-length��gmax��gmin��gframe-procedure��gprogram?��gprogram-module��gcurrent-module��gmake-module��gmodule-use!��g
make-variable��f3~:[Read-only~;Mutable~] local variable ~a = ~70:@y
��gmodule-add!��gstack-length��gmake-vector��gframe-previous��g	stack-ref��g
make-stack����g%stacks�C5hx�]4	
12C54F>"G4GiHM53R3h�-13�C�gframes
			gindex			g
error-message				g	for-trap?				gdefrec-1f507eb13-0				gfilenamefsystem/repl/debug.scm�
	9
��				
	gnameg
make-debug�C4R4Ni3i55R4Oi4Pi3iI54Qi3iI556R4Oi4Pi3iJ54Qi3iJ557R4Oi4Pi3iK54Qi3iK558R4Oi4Pi3iL54Qi3iL559R4Ri5UVWXhh]456`gfilenamefsystem/repl/debug.scm�
	E	��		E	8��			E	@��		E	8��	
	E	(��		
Ch]-13CUgargs
			gfilenamefsystem/repl/debug.scm�
	E	��			


CYZ[\h�:)]3L[$C4545$#45$
�$"""$C	HC]$(45$45$
�"""$L\C62gt
		cgw
	!	Ugt
	U	cgw
	e�gfilenamefsystem/repl/debug.scm�
	B	��		D	��		E	��	!	E	��	$	F	��	.	F	
��	/	F	��	9	F	
��	=	F	*��	A	F	
��	U	D	��	e	B	��	k	I	��	l	I	��	v	I	��	w	I	)���	I	���	I	4���	I	���	I	���	K	���	K	��			c
	e�CO:R]^_`h�]L4L5�6�gk
		gv		gfilenamefsystem/repl/debug.scm�
	S	��		T	!��		T	2��		T	!��		T	��		T	��			Ch(�]	454O>"GC�gh
		%gret		%gfilenamefsystem/repl/debug.scm�
	P
��		Q	
��		Q	��	
	R	��		%gnameg
reverse-hashq�CaRdef$ghijklmnoph�-/03#45#4>"G454>"G4	>"G4
>"G454>"G4	>"G4>"G4
54>"G4	>"G6�gframe
	gport	gper-line-prefix		gval		G�gval	��gval	�gfilenamefsystem/repl/debug.scm�
	X
��		X	1��	(	Y	1��	+	_	��	1	_	��	8	_	��	A	`	��	G	`	��	J	[	��	^	\	��	r	]	��	x	`		��		]	���	a	���	a	���	[	���	\	���	]	���	a		���	]	���	b	���	b	���	[	���	\	��	b		��	]	��	gper-line-prefixS	�gnamegprint-registers�C;Rte:fu$vwxyz{ijk$|}
hp�]	4L45545$"4LL>"G4>"GL4	545L6�gbinding
		mgx		)gv	)	mgfilenamefsystem/repl/debug.scm�
	m	��		n	��		n	2��		n	��		n	��		o	��		o	��	 	p	��	)	n		��	,	r	��	@	s	��	Y	t	��	Z	u	��	a	u	*��	m	t	��		mCh�]-/03#45#45#45(
64>"G	
O456Ugframe
		~gport		~gwidth			~gper-line-prefix			~gbindings		>	~gfilenamefsystem/repl/debug.scm�
	d
��		d	.��	'	e	$��	5	e	G��	8	f	��	>	f	��	F	g	��	L	i	��	P	i	��	Q	k	��	W	k	��	^	k	��	v	v	��	~	l	��		~gwidthS	�gper-line-prefixS	�gnamegprint-locals�C<R�e:��������$�����<qb�hH'-/03#45##45###4$"5$45$""4	
5	4	5
$K$45$""�$"4
>"G"4	$4	
5"45>"G$6Cgframe
	Dgport	Dgindex		Dgwidth		Dgfull?		Dglast-source		Dgnext-source?		Dgsource		dDgt		s�gfile	�Dgline		�Dgcol	
�Dgt	��
gfilenamefsystem/repl/debug.scm�
	x
��		x	-��	0	y	)��	R		��	X		��	d		��	d		��	l	|	��	m	}	��	s	}	���	}	!���	~	���		����	���		����	���		����	���	|	���	}	���	}	���	}	!���	~	����	����	����	����	����	����	����	���	���	���	 ���	���	2���	��&�	��4�	��@�	(��B�	��)	DgindexS	�gwidthS	�gfull?S	�glast-sourceS	�gnext-source?S	�gnamegprint-frame�C=R�e:���=~q�����h�_-/03
#45#45####45$
�"$
"4
�5"$
45"�"!$
�$�""���""���	"�
�$�
	�$�
�4
	


�$">"G
$"	��"4
5"%

�$$45""���""���
"��fCC$"	
"��KWgframes
	ygport	ygwidth		ygfull?		ygforward?		ygcount		yg	for-trap?		yglen		Xyg	lower-idx		}yg	upper-idx		�ygi	
�bglast-source	�bgframe	�^
gfilenamefsystem/repl/debug.scm�
�
��	�	(��	'�	$��	R�	��	X�	��	`�	��	c�	(��	i�	��	m�	��	s�	��	{�	��	}�	��	}�	����	����	&����	����	����	#����	����	����	����	����	
����	����	
����	����	
����	����	-����	(��
�	���	��"�	��'�	��1�	��4�	��9�	��?�	��@�	��^�	��b�	��h�	��y�	��,	ygwidthS	�gfull?S	�gforward?S	�gcountS	�g	for-trap?S	�gnamegprint-frames�C>R������xyz{�$�}�	hp ]4L45545$"4544545$">"GL456gbinding
		lgx		lgvar		*	lgfilenamefsystem/repl/debug.scm�
�	��	�	��	�	.��	�	��	�	
��	�	��	�	��	$�	8��	*�	
��	-�	��	2�	��	3�	��	:�	��	C�	��	G�	��	J�	1��	U�	��	b�	!��	l�	��		lCu
hx@]4545$]45$"45454>"G4O4	5>"GC68gframe
		wgproc			wgt			3gmod		3	sgmod*		:	sgfilenamefsystem/repl/debug.scm�
�
��	�	��		�	��	�	��	�	��	�	��	�	��	,�	.��	3�	��	6�	��	:�	��	=�	
��	Q�	
��	]�	��	h�	
��	w�	��		wgnameg
frame->module�C?R����h`G]!4545
�$?"&�$��45"���"
4
5"���"C?gstack
		^glen			^gv			^gi		 	Fgframe		 	Fgfilenamefsystem/repl/debug.scm�
�
��	�	��		�	��	�	��	�	��	�	��	�	��	 �	��	%�	��	)�	
��	0�	��	3�	��	4�	��	B�	��	F�	��	H�	��	W�	��		^gnameg
stack->vector�C@R��@�h0�-1344
5?$6C�gstack
			)gargs			)gnarrowed			)gfilenamefsystem/repl/debug.scm�
�
��	
�	��	
�	$��	�	��	�	��	 �	��	&�	��	(�	��				)
gnamegnarrow-stack->vector�CAR�A�h8�]	[�$	[��"45

$"6�gframe
		1gtag		1gfilenamefsystem/repl/debug.scm�
�
��	�	��	
�	
��	�	��	�	��	�	��	)�	��	1�	��			1gnamegframe->stack-vector�CBRC�gm
		,g	set-width
�gfilenamefsystem/repl/debug.scm�		
��	:	9
���	A	���	A	��	@
���	P
��	�	X
��
(	d
���	x
����
��k�
��*�
��X�
��v�
��	x
C6PK*[�L�W:�:�repl/coop-server.gonu�[���GOOF----LE-8-2.0"�]�4hO^]gguile�	�	gdefine-module*�	�	�	gsystem�	grepl�	gcoop-server�		�	
gfilenameS�	fsystem/repl/coop-server.scm�	gimportsS�	
gice-9�	gmatch�	
�	�	greceive�	
�	�	gthreads�	
�	�	gq�	
�	�	gsrfi�	gsrfi-9�	�	�	�	gselectS�	 gstart-repl*�	!gprompting-meta-read�	" !�	#"�	$gserver�	%$�	&grun-server*�	'gmake-tcp-server-socket�	(gadd-open-socket!�	)g
close-socket!�	*gguard-against-http-request�	+&'()*�	,%+�	-#,�	.gexportsS�	/gspawn-coop-repl-server�	0gpoll-coop-repl-server�	1/0�	2gset-current-module�	32�	42�	5g<coop-repl-server>�	6g!%%make-coop-repl-server-procedure�	7gmake-syntax-transformer�	87�	97�	:g%make-coop-repl-server�	;gmacro�	<g$sc-dispatch�	=<�	><�	?g_�	@gany�	A?@@�	Bg
syntax-object�	Cglambda�	Dgm-6cff15a80cd23e5-5�	Egtop�	FDE�	Ggribcage�	Hgt-6cff15a80cd23e5-3�	Igt-6cff15a80cd23e5-4�	JHI�	KFF�	Lfl-6cff15a80cd23e5-a�	Mfl-6cff15a80cd23e5-b�	NLM�	OGJKN�	PG�	Qgx�	RQ�	SF�	Tfl-6cff15a80cd23e5-7�	UT�	VGRSU�	Wgshift�	Xg	proc-name�	Ygargs�	ZXY�	[E�	\[[�	]fl-1e8ba8b5a-2ba�	^fl-1e8ba8b5a-2bb�	_]^�	`GZ\_�	agkey�	bgvalue�	cgname�	dgformals�	egbody�	fabcde�	g[[[[[�	hfl-1e8ba8b5a-2ad�	ifl-1e8ba8b5a-2ae�	jfl-1e8ba8b5a-2af�	kfl-1e8ba8b5a-2b0�	lfl-1e8ba8b5a-2b1�	mhijkl�	nGfgm�	ogmake-procedure-name�	po�	q[�	rfl-1e8ba8b5a-29d�	sr�	tGpqs�	u[�	vfl-1e8ba8b5a-29c�	wv�	xGRuw�	yFOPVWPPPP`ntx
�	zghygiene�	{z�	|BCy{�	}gmutex�	~[OPV�	z��B}~��gqueue��B�~������gmake-struct��gm-6cff15a80cd23e5-1���E��gt-1e8ba8b5a-38d��gt-1e8ba8b5a-38c��gt-1e8ba8b5a-38b�������gm-1e8ba8b5a-38e���E�������fl-1e8ba8b5a-392��fl-1e8ba8b5a-393��fl-1e8ba8b5a-394�������G�����g	ctor-args�����fl-1e8ba8b5a-37a�����G�u���gctor��gfield������fl-1e8ba8b5a-376��fl-1e8ba8b5a-377������G�\���gform��g	type-name��gconstructor-spec��gfield-names��������[[[[��fl-1e8ba8b5a-36b��fl-1e8ba8b5a-36c��fl-1e8ba8b5a-36d��fl-1e8ba8b5a-36e��������G�����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������������G�����fl-1e8ba8b5a-334�����GRu����OPVWP�PPP��P�����B��{��B5~��B
�{���������|����geach-any��?Ȍ��gsyntax-violation��������fWrong number of arguments��gidentifier?��������[PV��B6���������f-source expression failed to match any pattern��grecord-type-vtable��������gpwpw��gdefault-record-printer��������}���gset-struct-vtable-name!��������gvtable-offset-user��������g%coop-repl-server?-procedure��gcoop-repl-server?��?@��gm-6cff15a80cd23e5-14���E��gt-6cff15a80cd23e5-13��������fl-6cff15a80cd23e5-19�����G�����fl-6cff15a80cd23e5-16�����GR������P�WPPPP`ntx
��BC�{��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���E����������fl-1e8ba8b5a-483�fl-1e8ba8b5a-484�fl-1e8ba8b5a-485�fl-1e8ba8b5a-486�fl-1e8ba8b5a-487�fl-1e8ba8b5a-488�fl-1e8ba8b5a-489��G���	g	copier-id�
	�fl-1e8ba8b5a-476��
G
u�g	ctor-name��fl-1e8ba8b5a-46e��Gu���fl-1e8ba8b5a-46c��Gu�glayout��fl-1e8ba8b5a-46a��Gu�g
immutable?��fl-1e8ba8b5a-468�� Gu�!gfield-count�"!�#fl-1e8ba8b5a-466�$#�%G"u$�&g
getter-ids�'&�(fl-1e8ba8b5a-463�)(�*G'u)�+g	field-ids�,+�-fl-1e8ba8b5a-460�.-�/G,u.�0gpredicate-name�1g
field-spec�2���01�3[[[[[[�4fl-1e8ba8b5a-453�5fl-1e8ba8b5a-454�6fl-1e8ba8b5a-455�7fl-1e8ba8b5a-456�8fl-1e8ba8b5a-457�9fl-1e8ba8b5a-458�:456789�;G23:�<��P�WPPPPP
PPPP P%P*P/;���=B�<{�>=�?gand�@B?<{�Agstruct?�BBA<{�CB=�Dgeq?�EBD<{�Fg
struct-vtable�GBF<{�HG=�I[�P��JB5I�KEHJ�L@CK�M�>L�N[P��OB�N�Pgthrow-bad-struct�QP�RP�Sgcoop-repl-server-mutex�Tg!%coop-repl-server-mutex-procedure�Ugfree-id�Vg
%%on-error�Wgm-6cff15a80cd23e5-20�XWE�YX�Zfl-6cff15a80cd23e5-22�[Z�\GRY[�]XP\WPPPP`ntx�^BV]{�_U^�`_@�ag%%type�bgt-1e8ba8b5a-3a5�cgt-1e8ba8b5a-3a6�dgt-1e8ba8b5a-3a7�egt-1e8ba8b5a-3a8�fgt-1e8ba8b5a-3a9�ggt-1e8ba8b5a-3aa�hgt-1e8ba8b5a-3ab�ibcdefgh�jgm-1e8ba8b5a-3ac�kjE�lkkkkkkk�mfl-1e8ba8b5a-3b0�nfl-1e8ba8b5a-3b1�ofl-1e8ba8b5a-3b2�pfl-1e8ba8b5a-3b3�qfl-1e8ba8b5a-3b4�rfl-1e8ba8b5a-3b5�sfl-1e8ba8b5a-3b6�tmnopqrs�uGilt�vggetter�wgindex�xvw�yfl-1e8ba8b5a-3a3�zfl-1e8ba8b5a-3a4�{yz�|Gx\{�}�&	�~[[[�fl-1e8ba8b5a-39e��fl-1e8ba8b5a-39f��fl-1e8ba8b5a-3a0������G}~����P\WPuPPP|P�����Ba�{��U���?`�@��gck��gerr��gs������XX��fl-6cff15a80cd23e5-25��fl-6cff15a80cd23e5-26������G�����X�P\WPPPP`ntx
��B��{��gquote��B��{��[�P\��B5����������g%%index��B��{��U���?`�@��fl-6cff15a80cd23e5-2a��fl-6cff15a80cd23e5-2b������G�����X�P\WPPPP`ntx
��B��{��B��{���P\��B
����������g%%copier��B��{��U���?`�@��fl-6cff15a80cd23e5-2f��fl-6cff15a80cd23e5-30������G�����X�P\WPPPP`ntx
��B��{��B��{��g%%<coop-repl-server>-set-fields��[�P\��B�����������gt-6cff15a80cd23e5-1f�����fl-6cff15a80cd23e5-34�����G�Y���X�P\WPPPP`ntx
��BC�{����P\WPuPPP|P�����B��{�����gif��B��{��BD�{��BF�{������[�P\��B5��������g
struct-ref��B��{���P\��B
��������BP�{��B��{��BS�����������������������[P\��BT���gcoop-repl-server-queue��g!%coop-repl-server-queue-procedure��gm-6cff15a80cd23e5-3b���E�����fl-6cff15a80cd23e5-3d�����GR�����P�WPPPP`ntx��BV�{��U����@���P�WPuPPP|P�����Ba�{��U���?��@������fl-6cff15a80cd23e5-40��fl-6cff15a80cd23e5-41������G�������P�WPPPP`ntx
��B��{��B��{��[�P���B5����������B��{��U���?��@��fl-6cff15a80cd23e5-45��fl-6cff15a80cd23e5-46������G�������P�WPPPP`ntx
��B��{��B��{���P���B������B��{�U�?�@�fl-6cff15a80cd23e5-4a�fl-6cff15a80cd23e5-4b��G���	�P�WPPPP`ntx
�
B�	{�B�	{�[P��
B��
��gt-6cff15a80cd23e5-3a��fl-6cff15a80cd23e5-4f��G���P�WPPPP`ntx
�BC{��P�WPuPPP|P����B�{��B�{�BD{�BF{��[P��B5� �!B�{�"P��#B"�$!#�%BP{�&B�{�'B��(&'�)%(�* $)�+*�,[P��-B�,�.geach�/@@�0./�1@0��2@1��3@2��4g%%set-fields�5gdummy�6gcheck?�7gexpr�856�v7�9gm-6cff15a80cd23e5-56�:9E�;:�����<fl-6cff15a80cd23e5-5b�=fl-6cff15a80cd23e5-5c�>fl-6cff15a80cd23e5-5d�?fl-6cff15a80cd23e5-5e�@fl-6cff15a80cd23e5-5f�A<=>?@�BG8;A�C:�Dfl-6cff15a80cd23e5-58�ED�FGRCE�Ggt-1e8ba8b5a-3c4�Hgt-1e8ba8b5a-3c6�Igt-1e8ba8b5a-3c5�JGHI�Kgm-1e8ba8b5a-3c7�LKE�MLLL�Nfl-1e8ba8b5a-3cb�Ofl-1e8ba8b5a-3cc�Pfl-1e8ba8b5a-3cd�QNOP�RGJMQ�Sfl-1e8ba8b5a-3c1�Tfl-1e8ba8b5a-3c2�Ufl-1e8ba8b5a-3c3�VSTU�WG}~V�X�BPFWPRPPPW��
�YB4X{�Z[BPF�[B5Z�\BSZ�]B�Z�^\]�_gmap�`_�a_�bglist�cg
make-mutex�dgmake-q�egmake-coop-repl-server�fg
lock-mutex�gf�hf�igunlock-mutex�ji�ki�lgenq!�mgcoop-repl-server-eval�ng<coop-repl>�og%%make-coop-repl-procedure�pg%make-coop-repl�q?@@@@�rgm-6cff15a80cd23e5-91�srE�tgt-6cff15a80cd23e5-8d�ugt-6cff15a80cd23e5-8e�vgt-6cff15a80cd23e5-8f�wgt-6cff15a80cd23e5-90�xtuvw�yssss�zfl-6cff15a80cd23e5-96�{fl-6cff15a80cd23e5-97�|fl-6cff15a80cd23e5-98�}fl-6cff15a80cd23e5-99�~z{|}�Gxy~��s��fl-6cff15a80cd23e5-93�����GR����sP�WPPPP`ntx
��BC�{��[P���B}���gcondvar��B����gthunk��B����gcont��B����������gm-6cff15a80cd23e5-8b���E���P�WP�PPP��P�����B��{��Bn���B
�{����������������[P���Bo���gpwpwpwpw��}�����g%coop-repl?-procedure��g
coop-repl?��gm-6cff15a80cd23e5-a4���E��gt-6cff15a80cd23e5-a3��������fl-6cff15a80cd23e5-a9�����G�����fl-6cff15a80cd23e5-a6�����GR������P�WPPPP`ntx
��BC�{����P�WPPPPP
PPPP P%P*P/;����B��{�����B?�{��BA�{������BD�{��BF�{������[�P���Bn������������������[P���B����gcoop-repl-mutex��g%coop-repl-mutex-procedure��gm-6cff15a80cd23e5-b0���E�����fl-6cff15a80cd23e5-b2�����GR�����P�WPPPP`ntx��BV�{��U����@���P�WPuPPP|P�����Ba�{��U���?��@������fl-6cff15a80cd23e5-b5��fl-6cff15a80cd23e5-b6������G�������P�WPPPP`ntx
��B��{��B��{��[�P���Bn����������B��{��U���?��@��fl-6cff15a80cd23e5-ba��fl-6cff15a80cd23e5-bb������G�������P�WPPPP`ntx
��B��{��B��{���P���B
����������B��{��U���?��@��fl-6cff15a80cd23e5-bf��fl-6cff15a80cd23e5-c0������G�������P�WPPPP`ntx
��B��{��B��{��g%%<coop-repl>-set-fields��[�P���B�����������gt-6cff15a80cd23e5-af�����fl-6cff15a80cd23e5-c4�����G�������P�WPPPP`ntx
��BC�{����P�WPuPPP|P�����B��{�����B��{��BD�{��BF�{����[�P��Bn���B��{��P��B
���BP�{�	B��{�
B��	
���
����
�[P��B��gcoop-repl-condvar�g%coop-repl-condvar-procedure�gm-6cff15a80cd23e5-cb�E��fl-6cff15a80cd23e5-cd��GR�PWPPPP`ntx�BV{�U�@��PWPuPPP|P����Ba{�U� ?@�!�"fl-6cff15a80cd23e5-d0�#fl-6cff15a80cd23e5-d1�$"#�%G�!$�&%PWPPPP`ntx
�'B�&{�(B�&{�)[%P�*Bn)�+(*�,+�-B�{�.U-�/?.@�0fl-6cff15a80cd23e5-d5�1fl-6cff15a80cd23e5-d6�201�3G�!2�43PWPPPP`ntx
�5B�4{�6B�4{�73P�8B7�968�:9�;B�{�<U;�=?<@�>fl-6cff15a80cd23e5-da�?fl-6cff15a80cd23e5-db�@>?�AG�!@�BAPWPPPP`ntx
�CB�B{�DB�B{�E[AP�FB�E�GDF�HG�Igt-6cff15a80cd23e5-ca�JI�Kfl-6cff15a80cd23e5-df�LK�MGJL�NMPWPPPP`ntx
�OBCN{�P�MPWPuPPP|P����QB�P{�RQ�SB�P{�TBDP{�UBFP{�VUQ�W[MP�XBnW�YTVX�ZB�P{�[MP�\B[�]ZQ\�^BPP{�_B�P{�`BW�a_`�b^Qa�cSY]b�dORc�e[P�fBe�ggcoop-repl-read-thunk�hg%coop-repl-read-thunk-procedure�igm-6cff15a80cd23e5-e6�jiE�kj�lfl-6cff15a80cd23e5-e8�ml�nGRkm�ojPnWPPPP`ntx�pBVo{�qUp�rq@�s�PnWPuPPP|P����tBas{�uUt�v?ru@�wjj�xfl-6cff15a80cd23e5-eb�yfl-6cff15a80cd23e5-ec�zxy�{G�wz�|j{PnWPPPP`ntx
�}B�|{�~B�|{�[{Pn��Bn��~������B�s{��U���?r�@��fl-6cff15a80cd23e5-f0��fl-6cff15a80cd23e5-f1������G�w���j�PnWPPPP`ntx
��B��{��B��{���Pn��B	����������B�s{��U���?r�@��fl-6cff15a80cd23e5-f5��fl-6cff15a80cd23e5-f6������G�w���j�PnWPPPP`ntx
��B��{��B��{��[�Pn��B�����������gt-6cff15a80cd23e5-e5�����fl-6cff15a80cd23e5-fa�����G�k���j�PnWPPPP`ntx
��BC�{����PnWPuPPP|P�����B��{�����B��{��BD�{��BF�{������[�Pn��Bn��������B��{���Pn��B	��������BP�{��B��{��Bg�����������������������[Pn��Bh���gcoop-repl-cont��g%coop-repl-cont-procedure��gm-6cff15a80cd23e5-101���E�����fl-6cff15a80cd23e5-103�����GR�����P�WPPPP`ntx��BV�{��U����@���P�WPuPPP|P�����Ba�{��U���?��@������fl-6cff15a80cd23e5-106��fl-6cff15a80cd23e5-107������G�������P�WPPPP`ntx
��B��{��B��{��[�P���Bn����������B��{��U���?��@��fl-6cff15a80cd23e5-10b��fl-6cff15a80cd23e5-10c������G�������P�WPPPP`ntx
��B��{��B��{���P���B	����������B��{��U���?��@��fl-6cff15a80cd23e5-110��fl-6cff15a80cd23e5-111������G�������P�WPPPP`ntx
��B��{��B��{��[�P���B�����������gt-6cff15a80cd23e5-100�����fl-6cff15a80cd23e5-115�����G�������P�WPPPP`ntx
��BC�{����P�WPuPPP|P�����B��{�����B��{�BD�{�BF�{���[�P��Bn��B��{��P��B	�	��
BP�{�B��{�B��
�
�
��	����[P��B��gm-6cff15a80cd23e5-11c�E������fl-6cff15a80cd23e5-121�fl-6cff15a80cd23e5-122�fl-6cff15a80cd23e5-123�fl-6cff15a80cd23e5-124�fl-6cff15a80cd23e5-125��G8��fl-6cff15a80cd23e5-11e�� GR�!�P WPRPPPW��
�"B4!{�#[P �$Bn#�%B�#�&B#�'Bg#�(B�#�)%&'(�*gset-coop-repl-read-thunk!�+g$%set-coop-repl-read-thunk!-procedure�,gm-6cff15a80cd23e5-130�-,E�.gt-6cff15a80cd23e5-12e�/gt-6cff15a80cd23e5-12f�0./�1--�2fl-6cff15a80cd23e5-135�3fl-6cff15a80cd23e5-136�423�5G014�6-�7fl-6cff15a80cd23e5-132�87�9GR68�:-5P9WPPPP`ntx
�;BC:{�<gt-1e8ba8b5a-3e6�=gt-1e8ba8b5a-3e7�><=�?gm-1e8ba8b5a-3e8�@?E�A@@�Bfl-1e8ba8b5a-3ec�Cfl-1e8ba8b5a-3ed�DBC�EG>AD�Fgsetter�GcvF�Hfl-1e8ba8b5a-3e0�Ifl-1e8ba8b5a-3e1�Jfl-1e8ba8b5a-3e2�KHIJ�LGG~K�M1w�Nfl-1e8ba8b5a-3d7�Ofl-1e8ba8b5a-3d8�PNO�QGM\P�Rgfield-specs�S�R�Tfl-1e8ba8b5a-3d3�Ufl-1e8ba8b5a-3d4�VTU�WGS\V�X�5P9WPELPQPW���YB�X{�Zgval�[BZX{�\Y[�]B�X{�^BDX{�_BFX{�`_Y�a[5P9�bBna�c^`b�dgstruct-set!�eBdX{�f5P9�gB	f�heYg[�iBPX{�jB�X{�kB*a�ljk�miYl�n]chm�o;\n�p[P9�qB+p�rgset-coop-repl-cont!�sg%set-coop-repl-cont!-procedure�tgm-6cff15a80cd23e5-140�utE�vgt-6cff15a80cd23e5-13e�wgt-6cff15a80cd23e5-13f�xvw�yuu�zfl-6cff15a80cd23e5-145�{fl-6cff15a80cd23e5-146�|z{�}Gxy|�~u�fl-6cff15a80cd23e5-142����GR~���u}P�WPPPP`ntx
��BC�{���}P�WPELPQPW����B��{��BZ�{������B��{��BD�{��BF�{������[}P���Bn��������Bd�{��}P���B	���������BP�{��B��{��Br�����������������������[P���Bs���gmake-condition-variable��gmake-coop-repl��gwait-condition-variable��gerror��f2coop-repl-read: condvar signaled, but thunk is #f!��gcoop-repl-read��gcoop-repl-prompt��gstore-repl-cont��g*repl-stack*��gcurrent-module��f"coop-reader: read-thunk is not #f!��gsignal-condition-variable��gmake-coop-reader��geval��greader-loop��gq-empty?��gdeq!��������fno matching pattern��gnew-repl��gstart-repl-client��gcatch��������gcall-with-new-thread��������g%thread-handler��������gcurrent-language��gstart-coop-repl��gmake-coop-client-proc��grun-coop-repl-server��g
close-fdes��gfileno��gwith-continuation-barrier��gcurrent-input-port��gcurrent-output-port��gcurrent-error-port��gcurrent-warning-port��g
parameter?��������g	scm-error��gwrong-type-arg��fparameterize��fNot a parameter: ~S��gsave-module-excursion�C5h�`]4	
-.1544>"G5h�]�C�gmutex
		gqueue		gfilenamefsystem/repl/coop-server.scm�
	$
��			gnameg!%%make-coop-repl-server-procedure�C6R49:;>A�h\]CTgt-6cff15a80cd23e5-3
		gt-6cff15a80cd23e5-4					C��:�h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		$
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		$
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/repl/coop-server.scm�
	$
��		nC5:R���5ݨ4�5>"G	�6i�5R5h�]�$��CC�gobj
		gfilenamefsystem/repl/coop-server.scm�
	$
��		gnameg%coop-repl-server?-procedure�C�R49�;>�Mh<]C4gt-6cff15a80cd23e5-13
		
		
C����h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		$
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		$
��		
COh]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/repl/coop-server.scm�
	$
��		nC5�R5RSh�]�&
�C6�gs
		gfilenamefsystem/repl/coop-server.scm�
	$
��		gnameg!%coop-repl-server-mutex-procedure�CTR49S;>���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h<]C4gt-6cff15a80cd23e5-1f
		
		
C��S�h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		$
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		$
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/repl/coop-server.scm�
	$
��	�C5SR5R�h�]�&�C6�gs
		gfilenamefsystem/repl/coop-server.scm�
	$
��		gnameg!%coop-repl-server-queue-procedure�C�R49�;>���h:]��C2gerr
		gs					C��h:]��C2gerr
		gs					C
h:]��C2gerr
		gs					C�+h<]C4gt-6cff15a80cd23e5-3a
		
		
C����h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		$
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		$
��		
C-h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/repl/coop-server.scm�
	$
��	�C5�R49�;>3Y[^abh v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/repl/coop-server.scm�
	$
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5�Rcd5h �]4545�C�gmutex
		gqueue		gfilenamefsystem/repl/coop-server.scm�
	*
��		+	��		+	'��		+	��		
gnamegmake-coop-repl-server�CeR5RShhN]L6Fgfilenamefsystem/repl/coop-server.scm�
	0	��		
CkhN]L6Fgfilenamefsystem/repl/coop-server.scm�
	0	��		
Cl�h��-13�&
�"	45OO4O>"GV4�&�"	45�>X4O>"GCX4O>"GF�gcoop-server
		�gopcode		�gargs			�gx		#�gfilenamefsystem/repl/coop-server.scm�
	-
��		0	��	#	0	��	J	1	��	O	1	
��	k	2	
��	p	1	��	r	0	��			�	
	gnamegcoop-repl-server-eval�g
documentationf�Queue a new instruction with the symbolic name OPCODE and an arbitrary
number of arguments, to be processed the next time COOP-SERVER is polled.�CmRnh�]�C�gmutex
		gcondvar		gthunk			gcont			gfilenamefsystem/repl/coop-server.scm�
	4
��			gnameg%%make-coop-repl-procedure�CoR49p;>q�h�]C�gt-6cff15a80cd23e5-8d
		gt-6cff15a80cd23e5-8e		gt-6cff15a80cd23e5-8f			gt-6cff15a80cd23e5-90						C��p�h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		4
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		4
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/repl/coop-server.scm�
	4
��		nC5pR���n��4�n>"G	�oi�nRnh�]�$��CCygobj
		gfilenamefsystem/repl/coop-server.scm�
	4
��		gnameg%coop-repl?-procedure�C�R49�;>��h<]C4gt-6cff15a80cd23e5-a3
		
		
C����h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		4
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		4
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/repl/coop-server.scm�
	4
��		nC5�RnR�h�]�&
�C6|gs
		gfilenamefsystem/repl/coop-server.scm�
	4
��		gnameg%coop-repl-mutex-procedure�C�R49�;>���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C�h<]C4gt-6cff15a80cd23e5-af
		
		
C����h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		4
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		4
��		
Ch]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/repl/coop-server.scm�
	4
��	�C5�RnRh�]�&�C6~gs
		gfilenamefsystem/repl/coop-server.scm�
	4
��		gnameg%coop-repl-condvar-procedure�CR49;> ',h:]��C2gerr
		gs					C/5:h:]��C2gerr
		gs					C=CHh:]��C2gerr
		gs					C�dh<]C4gt-6cff15a80cd23e5-ca
		
		
C���h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		4
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		4
��		
Cfh]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/repl/coop-server.scm�
	4
��	�C5RnRgh �]�&	�C6�gs
		gfilenamefsystem/repl/coop-server.scm�
	4
��		gnameg%coop-repl-read-thunk-procedure�ChR49g;>v}�h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h<]C4gt-6cff15a80cd23e5-e5
		
		
C��g�h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		4
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		4
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/repl/coop-server.scm�
	4
��	�C5gRnR�h �]�&	�C6{gs
		gfilenamefsystem/repl/coop-server.scm�
	4
��		gnameg%coop-repl-cont-procedure�C�R49�;>���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C�h=]C5gt-6cff15a80cd23e5-100
		
		
C����h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		4
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		4
��		
Ch]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/repl/coop-server.scm�
	4
��	�C5�R49�;>3"$)abh v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/repl/coop-server.scm�
	4
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5�RnR*h �]�&	�C6�gs
		gval		gfilenamefsystem/repl/coop-server.scm�
	4
��			gnameg$%set-coop-repl-read-thunk!-procedure�C+R49*;>Aoh`]CXgt-6cff15a80cd23e5-12e
		gt-6cff15a80cd23e5-12f					C��*�h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		4
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		4
��		
Cqh]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/repl/coop-server.scm�
	4
��		nC5*RnRrh �]�&	�C6�gs
		gval		gfilenamefsystem/repl/coop-server.scm�
	4
��			gnameg%set-coop-repl-cont!-procedure�CsR49r;>A�h`]CXgt-6cff15a80cd23e5-13e
		gt-6cff15a80cd23e5-13f					C��r�h^]L6Vga
		gfilenamefsystem/repl/coop-server.scm�		4
��		C?�hN]L6Fgfilenamefsystem/repl/coop-server.scm�		4
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/repl/coop-server.scm�
	4
��		nC5rRc�nh �]4545�C�gmutex
		gcondvar		gfilenamefsystem/repl/coop-server.scm�
	<
��		=	��		=	 ��		=	��		
gnamegmake-coop-repl�C�RnR�hhN]L6Fgfilenamefsystem/repl/coop-server.scm�
	B		��		
CkhN]L6Fgfilenamefsystem/repl/coop-server.scm�
	B		��		
Cg���*h0�]�&
�"	45OO4O>"GV�&		�"	45$"D4�&�"	45�&
�"	45>"G�&		�"	45$"4	
>"G�&	�"4>"GX4O>"G6�g	coop-repl
	.gx	(gthunk	�gthunk(.gfilenamefsystem/repl/coop-server.scm�
	?
��		B	��		B		��	E	C	��	a	C	��	f	D	
��	k	D	&���	E	&���	D	
���	F	���	F	���	G	
���	H	���	H	���	H	���	I	
��	B		��(	A	��.	K	��	.gnamegcoop-repl-read�g
documentationf5Read an expression via the thunk stored in COOP-REPL.�C�Rn�hV]LL6Ngfilenamefsystem/repl/coop-server.scm�
	R	��		R	%��		
Chh]LO6`gexp
		gfilenamefsystem/repl/coop-server.scm�
	P	��		Q	��		CRrh �]�&
	O�C6�gcont
		 g	coop-repl		 gfilenamefsystem/repl/coop-server.scm�
	M
��		O	��		 	gnamegstore-repl-cont�g
documentationf4Save the partial continuation CONT within COOP-REPL.�C�R��h]L6		
Ch0]U4O>XCXFG@�gthunk
		)ghandler		)gargs			)gfilenamefsystem/repl/coop-server.scm�
	T
��		V	��		V	��	
	V	��		)gnamegcoop-repl-prompt�g
documentationf2Apply THUNK within a prompt for cooperative REPLs.�C�R���2!h(^]LY4L>"G4L>ZCZFVgfilenamefsystem/repl/coop-server.scm�
	b	
��			d	��		e	��		(
CnR�hhN]L6Fgfilenamefsystem/repl/coop-server.scm�
	f	��		
CkhN]L6Fgfilenamefsystem/repl/coop-server.scm�
	f	��		
Cg��*��hD][45OL�&L
�"	4L5OO4O>"GVL�&	L	�"	4L	5$4
>"G"L�&L	�"4L>"G4
L�&L�"	4L5>"GX4O>"GLWF<grepl
	
gstack	
	gmodule		
	g
read-thunk	gx		;gfilenamefsystem/repl/coop-server.scm�
	\	��		a	��	
	`	��		]	��	$	f	��	;	f	��	d	g	���	g	���	h	
���	h	���	h	
���	i	���	j	���	j	#���	j	���	f	��	k	��	k	��	
ChS]OCKg	coop-repl
		
gfilenamefsystem/repl/coop-server.scm�
	X
��		
gnamegmake-coop-reader�g
documentationf�Return a new procedure for reading user input from COOP-REPL.  The
generated procedure passes the responsibility of reading input to
another thread and aborts the cooperative REPL prompt.�C�Rm���h(S]445>"G6Kgcoop-server
		'g	coop-repl		'gfilenamefsystem/repl/coop-server.scm�
	m
��		p	��			p	%��		q	��		p	��	'	r	��		'	gnamegreader-loop�g
documentationfRun an unbounded loop that reads an expression for COOP-REPL and
stores the expression within COOP-SERVER for later evaluation.�C�R5RShhN]L6Fgfilenamefsystem/repl/coop-server.scm�
	y	��		
CkhN]L6Fgfilenamefsystem/repl/coop-server.scm�
	y	��		
C����n�����h�]1�&
�"	45OO4O>"GV�&�"	4545$"45X4O>"G$}"�$���	&��$����$[�(7�4�
&		�"	45>"G"	44
5>"�G"�44
5>"�G"�44
5>"�G"�44
5>"�G"�44
5>"pG"i�$^��&>�$/�( �4>"G""���""���""���""���"C�gcoop-server
	gx	�gqueue		\	xgop�gw	��gx	��gw	�Lgx	�Lgw	�gw	�
gx	�
gw	��gfilenamefsystem/repl/coop-server.scm�
	t
��		y	��		y	��	E	z	��	\	z	��	_	{	��	i	{	��	o	|	��	z	y	���	y	���	}	���	~	����		��
	~	����		���	~	��	gnamegpoll-coop-repl-server�g
documentationf�Poll the cooperative REPL server COOP-SERVER and apply a pending
operation if there is one, such as evaluating an expression typed at the
REPL prompt.  This procedure must be called from the same thread that
called spawn-coop-repl-server.�C0R����hO]LL6Ggfilenamefsystem/repl/coop-server.scm�
�	��		

C� ��h8�]454LO>"G45456�g	coop-repl
		5gfilenamefsystem/repl/coop-server.scm�
�	��	�	��	�	��	
�	��	'�	��	-�	(��	5�	��		5
Chd-13C\gargs
			gfilenamefsystem/repl/coop-server.scm�
�	��			


Ch�]O6�gcoop-server
		gfilenamefsystem/repl/coop-server.scm�
�
��	�	��		gnamegstart-coop-repl�g
documentationf5Start a new cooperative REPL process for COOP-SERVER.�C�R&�h]456gcoop-server
		g
server-socket		gfilenamefsystem/repl/coop-server.scm�
�
��	�	��	�	��			gnamegrun-coop-repl-server�g
documentationfQStart the cooperative REPL server for COOP-SERVER using the socket
SERVER-SOCKET.�C�R'e��hO]LL6Ggfilenamefsystem/repl/coop-server.scm�
�	��		

C�h@�-.,3#45454O>"GC�g
server-socket
		>gcoop-server		>gfilenamefsystem/repl/coop-server.scm�
�
��	�	$��	�	��	�	��	!�	��		>
gnamegspawn-coop-repl-server�g
documentationf�Create and return a new cooperative REPL server object, and spawn a
new thread to listen for connections on SERVER-SOCKET.  Proper
functioning of the REPL server requires that poll-coop-repl-server be
called periodically on the returned server object.�C/Rm�h�]L6�gclient
		gaddr		gfilenamefsystem/repl/coop-server.scm�
�	��	�	'��	�	��			Ch]OC�gcoop-server
		
gfilenamefsystem/repl/coop-server.scm�
�
��		
gnamegmake-coop-client-proc�g
documentationfgReturn a new procedure that is used to schedule the creation of a new
cooperative REPL for COOP-SERVER.�C�R(��ha]4L56Ygfilenamefsystem/repl/coop-server.scm�
�	��	�	2��	
�	&��		
C*��������������hX]L6Pgfilenamefsystem/repl/coop-server.scm�
�	
��	�	��		
C�)hX]L6Pgfilenamefsystem/repl/coop-server.scm�
�	��	�		��		
Chd-13C\gargs
			gfilenamefsystem/repl/coop-server.scm�
�	��			


Ch0] 45$"4	>"G45$"4	>"G45$"4	>"G45$"4	>"G����4	�L54	�L54	�L54	�L5Y
Y4LO>"GZZ
LO6�gt-6cff15a80cd23e5-300
	
"gt-6cff15a80cd23e5-301	
"gt-6cff15a80cd23e5-302		
"gt-6cff15a80cd23e5-303		
"gfilenamefsystem/repl/coop-server.scm�
�	��	
�	����	&����	��0�	��	0
ChX]LLO6Pgfilenamefsystem/repl/coop-server.scm�
�	��	�	��		
Ch@8]4O>"G4>"GO60gcoop-server
		:gclient		:gfilenamefsystem/repl/coop-server.scm�
�
��	�	��	�	��	:�	��		:	gnamegstart-repl-client�g
documentationfmRun a cooperative REPL for COOP-SERVER within a prompt.  All input
and output is sent over the socket CLIENT.�C�RCgm
		,grtd
��grtd
m�gfilenamefsystem/repl/coop-server.scm�		
���	$
��1	*
��h	-
��N	4
��=L	<
��A	?
��C9	M
��D�	T
��J	X
��K�	m
��Q�	t
��T��
��U��
��X~�
��Z[�
��`��
��	`�
C6PK*[��Wl``
base/ck.gonu�[���GOOF----LE-8-2.0H]�4h�]gguile�	�	gdefine-module*�	�	�	gsystem�	gbase�	gck�		�	
gfilenameS�	fsystem/base/ck.scm�	gexportsS�	
�	gset-current-module�	�	�	gmake-syntax-transformer�	�	�	gmacro�	g$sc-dispatch�	�	�	gany�	gfree-id�	g
syntax-object�	gquote�	gtop�	�	gribcage�	�	 gx�	! �	"gm-1e97f9b4a-48�	#"�	$#�	%fl-1e97f9b4a-4a�	&%�	'!$&�	('�	)ghygiene�	*)�	+(*�	,+�	-,�	.-�	/geach-any�	0//��	10��	21-�	3gck-arg�	4gdummy�	5gop�	6gea�	7gs�	8gv�	945678�	:#�	;fl-1e97f9b4a-52�	<fl-1e97f9b4a-53�	=fl-1e97f9b4a-54�	>fl-1e97f9b4a-55�	?fl-1e97f9b4a-56�	@;<=>?�	A9:@�	BA'�	C3B*�	Dgappend�	ED�	FD�	GB*�	H/��	IH�	J4756�	K#�	Lfl-1e97f9b4a-5f�	Mfl-1e97f9b4a-60�	Nfl-1e97f9b4a-61�	Ofl-1e97f9b4a-62�	PLMNO�	QJKP�	RQ'�	S3R*�	Tgsyntax-violation�	UT�	VT�	Wf-source expression failed to match any pattern�	Xgm-1e97f9b4a-68�	YX�	ZY�	[fl-1e97f9b4a-6a�	\[�	]!Z\�	^]�	_^*�	`_�	a`�	ba/��	c/b��	dc��	ed��	fgea1�	g4758f�	hY�	ifl-1e97f9b4a-77�	jfl-1e97f9b4a-78�	kfl-1e97f9b4a-79�	lfl-1e97f9b4a-7a�	mfl-1e97f9b4a-7b�	nijklm�	oghn�	po]�	q3p*�	rp*�	s/H��	ts��	ut��	v4756f�	wfl-1e97f9b4a-84�	xfl-1e97f9b4a-85�	yfl-1e97f9b4a-86�	zfl-1e97f9b4a-87�	{fl-1e97f9b4a-88�	|wxyz{�	}vh|�	~}]�	~*�C5h�V]4	

54>"G4.h<]C4gdummy
		gv					C2CFGh k]45���Ccgdummy
		gop		gea			gs			gv						CISh\]���CTgdummy
		gs		gop			gea						CVW
hP"]45$@45$@45$@	6gx
		Pgtmp		Pgtmp		"	Pgtmp		9	Pgfilenamefsystem/base/ck.scm�
	$	��		Pg
macro-typegsyntax-rules�gpatternsgquotegvgopg...geag...gs�gquotegvgsgopgeag...C5R43Ih\]��CTgdummy
		gs		gop			gva						CeqFrh l]45���Cdgdummy
		gs		gop			gv			gea1						Cuhm]��Cegdummy
		gs		gop			gea			gea1						CVW
hP6]45$@45$@45$@	6.gx
		Pgtmp		Pgtmp		"	Pgtmp		9	Pgfilenamefsystem/base/ck.scm�
	.	��		Pg
macro-typegsyntax-rules�gpatternsgsgopgvag...gsgopg...gquotegvgea1g...gsgopg...geagea1g...C53RCNgm
		(gfilenamefsystem/base/ck.scm�		 
��	�
C6PK*[����
base/types.gonu�[���GOOF----LE-8-2.0�]	�4h��]gguile�	�	gdefine-module*�	�	�	gsystem�	gbase�	gtypes�		�	
gfilenameS�	fsystem/base/types.scm�	gimportsS�	
grnrs�	gbytevectors�	
�	�	gio�	gports�	
�	�	gsrfi�	gsrfi-1�	�	�	gsrfi-9�	�	�	ggnu�	�	�	gsrfi-11�	 �	! �	"gsrfi-26�	#"�	$#�	%gsrfi-60�	&%�	'&�	(gice-9�	)gmatch�	*()�	+*�	,giconv�	-(,�	.-�	/gformat�	0(/�	10�	2gvlist�	3(2�	43�	5gforeign�	65�	76�	8!$'+.147
�	9gexportsS�	:g
%word-size�	;gmemory-backend�	<gmemory-backend?�	=g%ffi-memory-backend�	>gdereference-word�	?gmemory-port�	@gtype-number->name�	Aginferior-object?�	Bginferior-object-kind�	Cginferior-object-sub-kind�	Dginferior-object-address�	Eginferior-fluid?�	Fginferior-fluid-number�	Gginferior-struct?�	Hginferior-struct-name�	Iginferior-struct-fields�	Jgscm->object�	K:;<=>?@ABCDEFGHIJ�	Lgset-current-module�	ML�	NL�	Ogsizeof�	Pg*�	Qg<memory-backend>�	Rg%memory-backend-procedure�	Sgmake-syntax-transformer�	TS�	US�	Vgmacro�	Wg$sc-dispatch�	XW�	YW�	Zg_�	[gany�	\Z[[[�	]g
syntax-object�	^glambda�	_g
m-1f6d4c535-6�	`gtop�	a_`�	bgribcage�	cg
t-1f6d4c535-3�	dg
t-1f6d4c535-4�	eg
t-1f6d4c535-5�	fcde�	gaaa�	hf
l-1f6d4c535-b�	if
l-1f6d4c535-c�	jf
l-1f6d4c535-d�	khij�	lbfgk�	mb�	ngx�	on�	pa�	qf
l-1f6d4c535-8�	rq�	sbopr�	tgshift�	ug	proc-name�	vgargs�	wuv�	x`�	yxx�	zfl-1e8ba8b5a-60�	{fl-1e8ba8b5a-61�	|z{�	}bwy|�	~gkey�	gvalue��gname��gformals��gbody��~�����xxxxx��fl-1e8ba8b5a-53��fl-1e8ba8b5a-54��fl-1e8ba8b5a-55��fl-1e8ba8b5a-56��fl-1e8ba8b5a-57���������b�����gmake-procedure-name�����x��fl-1e8ba8b5a-43�����b�����x��fl-1e8ba8b5a-42�����bo����almstmmmm}���
��ghygiene�����]^����gpeek��xlms�����]�����gopen��]�����g	type-name��]����������gmake-struct��g
m-1f6d4c535-1���`��gt-1e8ba8b5a-133��gt-1e8ba8b5a-132��gt-1e8ba8b5a-131�������gm-1e8ba8b5a-134���`�������fl-1e8ba8b5a-138��fl-1e8ba8b5a-139��fl-1e8ba8b5a-13a�������b�����g	ctor-args�����fl-1e8ba8b5a-120�����b�����gctor��gfield������fl-1e8ba8b5a-11c��fl-1e8ba8b5a-11d������b�y���gform��gconstructor-spec��gfield-names��������xxxx��fl-1e8ba8b5a-111��fl-1e8ba8b5a-112��fl-1e8ba8b5a-113��fl-1e8ba8b5a-114��������b�����g
record-layout��gfunctional-setters��gsetters��gcopier��ggetters��gconstructor��ggetter-identifiers��gfield-identifiers������������xxxxxxxx��fl-1e8ba8b5a-e9��fl-1e8ba8b5a-e7��fl-1e8ba8b5a-e5��fl-1e8ba8b5a-e3��fl-1e8ba8b5a-e1��fl-1e8ba8b5a-df��fl-1e8ba8b5a-dd��fl-1e8ba8b5a-db������������b�����fl-1e8ba8b5a-da�����bo�����lmstm�mmm��m�����]�����]Q����]
�����������������geach-any��Z挤�gsyntax-violation��������fWrong number of arguments��gidentifier?��������xms��]R����������f-source expression failed to match any pattern��grecord-type-vtable��������gpwpwpw��gdefault-record-printer�������������gset-struct-vtable-name!��������gvtable-offset-user�����g%memory-backend?-procedure�Z[�gm-1f6d4c535-17�`�gt-1f6d4c535-16���	fl-1f6d4c535-1c�
	�b
�fl-1f6d4c535-19�
�bo
�mtmmmm}���
�]^��gobj�gt-1e8ba8b5a-224�gt-1e8ba8b5a-21e�gt-1e8ba8b5a-21f�gt-1e8ba8b5a-220�gt-1e8ba8b5a-223�gt-1e8ba8b5a-222�gt-1e8ba8b5a-221��gm-1e8ba8b5a-225�`��fl-1e8ba8b5a-229�fl-1e8ba8b5a-22a�fl-1e8ba8b5a-22b� fl-1e8ba8b5a-22c�!fl-1e8ba8b5a-22d�"fl-1e8ba8b5a-22e�#fl-1e8ba8b5a-22f�$ !"#�%b$�&g	copier-id�'&�(fl-1e8ba8b5a-21c�)(�*b'�)�+g	ctor-name�,+�-fl-1e8ba8b5a-214�.-�/b,�.�0��1fl-1e8ba8b5a-212�21�3b0�2�4glayout�54�6fl-1e8ba8b5a-210�76�8b5�7�9g
immutable?�:9�;fl-1e8ba8b5a-20e�<;�=b:�<�>gfield-count�?>�@fl-1e8ba8b5a-20c�A@�Bb?�A�Cg
getter-ids�DC�Efl-1e8ba8b5a-209�FE�GbD�F�Hg	field-ids�IH�Jfl-1e8ba8b5a-206�KJ�LbI�K�Mgpredicate-name�Ng
field-spec�O9���MN�Pxxxxxx�Qfl-1e8ba8b5a-1f9�Rfl-1e8ba8b5a-1fa�Sfl-1e8ba8b5a-1fb�Tfl-1e8ba8b5a-1fc�Ufl-1e8ba8b5a-1fd�Vfl-1e8ba8b5a-1fe�WQRSTUV�XbOPW�Y�mtm%mmmm*m/m3m8m=mBmGmLX���Z]Y��[Z�\gand�]]\Y��^gstruct?�_]^Y��`_Z�ageq?�b]aY��cg
struct-vtable�d]cY��edZ�fxm�g]Qf��hbeg�i]`h�j[i�kxm�l]k��mgthrow-bad-struct�nm�om�pgmemory-backend-peek�qg%memory-backend-peek-procedure�rgfree-id�sg
%%on-error�tgm-1f6d4c535-23�ut`�vu�wfl-1f6d4c535-25�xw�ybovx�zumytmmmm}����{]sz��|r{�}|[�~g%%type�gt-1e8ba8b5a-14b��gt-1e8ba8b5a-14c��gt-1e8ba8b5a-14d��gt-1e8ba8b5a-14e��gt-1e8ba8b5a-14f��gt-1e8ba8b5a-150��gt-1e8ba8b5a-151����������gm-1e8ba8b5a-152���`�����������fl-1e8ba8b5a-156��fl-1e8ba8b5a-157��fl-1e8ba8b5a-158��fl-1e8ba8b5a-159��fl-1e8ba8b5a-15a��fl-1e8ba8b5a-15b��fl-1e8ba8b5a-15c�����������b�����ggetter��gindex������fl-1e8ba8b5a-149��fl-1e8ba8b5a-14a������b�y����C&��xxx��fl-1e8ba8b5a-144��fl-1e8ba8b5a-145��fl-1e8ba8b5a-146�������b������mytm�mmm�m�����]~����r���Z}�[��gck��gerr��gs������uu��fl-1f6d4c535-28��fl-1f6d4c535-29������b�����u�mytmmmm}���
��]�����gquote��]�����x�my��]Q�����������g%%index��]�����r���Z}�[��fl-1f6d4c535-2d��fl-1f6d4c535-2e������b�����u�mytmmmm}���
��]�����]������my��]
�����������g%%copier��]�����r���Z}�[��fl-1f6d4c535-32��fl-1f6d4c535-33������b�����u�mytmmmm}���
��]�����]�����g%%<memory-backend>-set-fields��x�my��]������������gt-1f6d4c535-22�����fl-1f6d4c535-37�����b�v���u�mytmmmm}���
��]^������mytm�mmm�m�����]��������gif��]�����]a����]c��������x�my��]Q���������g
struct-ref��]������my��]
���������]m����]�����]p������������������������xmy��]q����gmemory-backend-open��g%memory-backend-open-procedure��gm-1f6d4c535-3e���`�����fl-1f6d4c535-40�����bo�����m�tmmmm}�����]s����r���[��m�tm�mmm�m����]~��r�Z[����fl-1f6d4c535-43�fl-1f6d4c535-44��	b��
�	m�tmmmm}���
�]�
��]�
��
x	m��]Q
����]���r�Z[�fl-1f6d4c535-48�fl-1f6d4c535-49��b���m�tmmmm}���
�]���]���m��]����]��� r�!Z [�"fl-1f6d4c535-4d�#fl-1f6d4c535-4e�$"#�%b�$�&�%m�tmmmm}���
�']�&��(]�&��)x%m��*]�)��+(*�,+�-gt-1f6d4c535-3d�.-�/fl-1f6d4c535-52�0/�1b.�0�2�1m�tmmmm}���
�3]^2��4�1m�tm�mmm�m����5]�4��65�7]�4��8]a4��9]c4��:95�;x1m��<]Q;��=8:<�>]�4��?1m��@]?��A>5@�B]m4��C]�4��D]�;��ECD�FB5E�G7=AF�H36G�Ixm��J]�I��Kgmemory-backend-type-name�Lg#%memory-backend-type-name-procedure�Mgm-1f6d4c535-59�NM`�ON�Pfl-1f6d4c535-5b�QP�RboOQ�SNmRtmmmm}����T]sS��UrT�VU[�W�mRtm�mmm�m����X]~W��YrX�ZZVY[�[NN�\fl-1f6d4c535-5e�]fl-1f6d4c535-5f�^\]�_b�[^�`N_mRtmmmm}���
�a]�`��b]�`��cx_mR�d]Qc��ebd�fe�g]�W��hrg�iZVh[�jfl-1f6d4c535-63�kfl-1f6d4c535-64�ljk�mb�[l�nNmmRtmmmm}���
�o]�n��p]�n��qmmR�r]	q��spr�ts�u]�W��vru�wZVv[�xfl-1f6d4c535-68�yfl-1f6d4c535-69�zxy�{b�[z�|N{mRtmmmm}���
�}]�|��~]�|��x{mR��]����~������gt-1f6d4c535-58�����fl-1f6d4c535-6d�����b�O���N�mRtmmmm}���
��]^������mRtm�mmm�m�����]��������]�����]a����]c��������x�mR��]Q���������]������mR��]	���������]m����]�����]K������������������������xmR��]L����geach��[[������[����[����[����g%%set-fields��gdummy��gcheck?��gexpr���������gm-1f6d4c535-74���`���������fl-1f6d4c535-79��fl-1f6d4c535-7a��fl-1f6d4c535-7b��fl-1f6d4c535-7c��fl-1f6d4c535-7d���������b��������fl-1f6d4c535-76�����bo����gt-1e8ba8b5a-16a��gt-1e8ba8b5a-16c��gt-1e8ba8b5a-16b�������gm-1e8ba8b5a-16d���`�������fl-1e8ba8b5a-171��fl-1e8ba8b5a-172��fl-1e8ba8b5a-173�������b�����fl-1e8ba8b5a-167��fl-1e8ba8b5a-168��fl-1e8ba8b5a-169�������b�������m�tm�mmm���
��]�����x�m���]Q����]p����]�����]K���������gmap��������glist��gmake-pointer��gpointer->bytevector��gbytevector-uint-ref��gnative-endianness��gopen-bytevector-input-port��gmake-custom-binary-input-port��f
ffi-memory��gbytevector-copy!��gsetvbuf��g_IONBF��g% dereference-word-procedure��Z[[��gsyntax-parameterize��gm-1f6d4c535-c6���`��gt-1f6d4c535-c4��gt-1f6d4c535-c5����������fl-1f6d4c535-cb��fl-1f6d4c535-cc������b��������fl-1f6d4c535-c8�����bo����fl-bde397a-1eaf��fl-bde397a-1eb0������bwy��������fl-bde397a-1ea6��fl-bde397a-1ea7��fl-bde397a-1ea8�������b�����gprefix������xx��fl-bde397a-1e9a�fl-bde397a-1e98���b���fl-bde397a-1e97��bo����m�tmmmm��
���]��	x�m��
]>	��gidentifier-syntax�]�
]�	��
�
��]^�gbackend�]	��gaddress�]	���f*Return the word at ADDRESS, using BACKEND.�]	��glet�]	��]�	��]p	����� �! �"!�#"�$��%��&xm��']�&��([[[�)��*gm-1f6d4c535-e9�+*`�,+xx�-fl-1f6d4c535-ee�.fl-1f6d4c535-ef�/fl-1f6d4c535-f0�0-./�1b),0�2+�3fl-1f6d4c535-eb�43�5bo24�6x1m5�7]6��8]�6��9]�6��:]6��;:�<[[[[�=gsize�>�=�?+xxx�@fl-1f6d4c535-f5�Afl-1f6d4c535-f6�Bfl-1f6d4c535-f7�Cfl-1f6d4c535-f8�D@ABC�Eb>?D�FxEm5�G]�F��Hgzero?�I]HF��J]�F��K]�F��Lgvu8
	�j�M]LF��NKM�OJN�P]F��Q]�F��R]�F��Sgget-bytevector-n�Tgget-word�Ug% type-number->name-procedure�Vgm-1f6d4c535-104�WV`�Xgt-1f6d4c535-101�Ygt-1f6d4c535-102�Zgt-1f6d4c535-103�[XYZ�\WWW�]fl-1f6d4c535-109�^fl-1f6d4c535-10a�_fl-1f6d4c535-10b�`]^_�ab[\`�bW�cfl-1f6d4c535-106�dc�ebobd�fWametmmmm��
�g]�f�hxame�i]@h��j]f�k]Uh��ljk�mil�nm�o]^f�p]h��qgkind�r]qh��sgnumber�t]sh��uprt�vfyReturn the name of the type NUMBER of KIND, where KIND is one of
'smob or 'port, or #f if the information is unavailable.�w]vh��x]h��ygproc�z]yh��{]Kh��|{p�}z|�~}�]\h���zrt��z���x~���ouw���gn���xme��]U����gmatch-cell-words��g
bytevector��gm-1f6d4c535-12d���`�����fl-1f6d4c535-12f�����bo����xm���]�����r����[[���挤�[[�[��gport��glen��grest�����������xxxxx��fl-1f6d4c535-132��fl-1f6d4c535-133��fl-1f6d4c535-134��fl-1f6d4c535-135��fl-1f6d4c535-136��fl-1f6d4c535-137����������b�����x�m���]����]S����g	remainder��]�����gmodulo��]�����]:�������gunless��]�����]H��������g-��]�������������]�����[挤�[[�[����������xxxx��fl-1f6d4c535-140��fl-1f6d4c535-141��fl-1f6d4c535-142��fl-1f6d4c535-143��fl-1f6d4c535-144���������b�����x�m���]����]T����]�����[[[��gmatch-bit-pattern��g||��gm-1f6d4c535-152���`�����fl-1f6d4c535-154�����bo����xm���]�����r���[�[��g&��]�����r���g=��]�����r�����[�[��[[�[[��gbits��ga��gb��gn��gc��g
consequent��g	alternate�������������xxxxxxx��fl-1f6d4c535-157��fl-1f6d4c535-158��fl-1f6d4c535-159��fl-1f6d4c535-15a��fl-1f6d4c535-15b��fl-1f6d4c535-15c��fl-1f6d4c535-15d��fl-1f6d4c535-15e������������b�����x�m���]����gtag��]�����glogand��]�����]�����]��������gbitwise-not��]�����[�[�[��[[�[[����n�������xxxxxx��fl-1f6d4c535-168��fl-1f6d4c535-169��fl-1f6d4c535-16a��fl-1f6d4c535-16b��fl-1f6d4c535-16c��fl-1f6d4c535-16d�fl-1f6d4c535-16e��������b���xm��]��]���]���]���]���	]Z���
r	�
�[�[�[[[[�
��������xxxxx�fl-1f6d4c535-177�fl-1f6d4c535-178�fl-1f6d4c535-179�fl-1f6d4c535-17a�fl-1f6d4c535-17b�fl-1f6d4c535-17c��b
�xm��]��]���]���]���]���(�[�[[[[�g<<� ��������!fl-1f6d4c535-184�"fl-1f6d4c535-185�#fl-1f6d4c535-186�$fl-1f6d4c535-187�%fl-1f6d4c535-188�&fl-1f6d4c535-189�'fl-1f6d4c535-18a�(fl-1f6d4c535-18b�)!"#$%&'(�*b �)�+x*m��,]+��-]�+��.gbitwise-and�/].+��0]�+��1gexpt�2]1+��3]	+��4]+��54�6]�+��7]�+��8garithmetic-shift�9]8+��:gmatch-cell-clauses�;�[�<;挤=[[[<�>gtag-pattern�?gthing�@���>?���Agm-1f6d4c535-194�BA`�CBxxxxxx�Dfl-1f6d4c535-199�Efl-1f6d4c535-19a�Ffl-1f6d4c535-19b�Gfl-1f6d4c535-19c�Hfl-1f6d4c535-19d�Ifl-1f6d4c535-19e�Jfl-1f6d4c535-19f�KDEFGHIJ�Lb@CK�MB�Nfl-1f6d4c535-196�ON�PboMO�QxLmP�R]�Q��S]�Q��T]:Q��U[[[�Vginferior-object�W����XBxx�Yfl-1f6d4c535-1aa�Zfl-1f6d4c535-1ab�[fl-1f6d4c535-1ac�\YZ[�]bWX\�^x]mP�_]V^��`]�^��ag
unmatched-tag�b]a^��c`b�dg
match-cell�e���f[e��g[f��hgpattern�i��h��jgm-1f6d4c535-1b0�kj`�lkxxx�mfl-1f6d4c535-1b5�nfl-1f6d4c535-1b6�ofl-1f6d4c535-1b7�pfl-1f6d4c535-1b8�qmnop�rbilq�sk�tfl-1f6d4c535-1b2�ut�vbosu�wxrmv�x]w��ygport*�z]yw��{]�w��|]Tw��}]:w��~gbegin�]~w���gmatch-scm-clauses���挤�[����[����gbit-pattern���������gm-1f6d4c535-1c0���`���xxxx��fl-1f6d4c535-1c5��fl-1f6d4c535-1c6��fl-1f6d4c535-1c7��fl-1f6d4c535-1c8��fl-1f6d4c535-1c9���������b��������fl-1f6d4c535-1c2�����bo����x�m���]�����]~����]����������x��fl-1f6d4c535-1d2��fl-1f6d4c535-1d3������b�����x�m���]�����g
unmatched-scm��]���������g	match-scm��[����gclauses�������gm-1f6d4c535-1d6���`���xx��fl-1f6d4c535-1db��fl-1f6d4c535-1dc��fl-1f6d4c535-1dd�������b��������fl-1f6d4c535-1d8�����bo����x�m���]����gbits*��]�����]�����g%tc2-int��g
%tc3-imm24��g	%tc3-cons��g	%tc3-int1��g	%tc3-int2��g	%tc8-char��g	%tc8-flag��g%tc3-struct��g%tc7-symbol��g
%tc7-variable��g%tc7-vector��g
%tc7-wvect��g%tc7-string��g%tc7-number��g%tc7-hashtable��g%tc7-pointer��g
%tc7-fluid��g%tc7-stringbuf��g%tc7-dynamic-state��g
%tc7-frame��g%tc7-objcode��g%tc7-vm��g%tc7-vm-continuation��g%tc7-bytevector��g%tc7-program��g
%tc7-array��g%tc7-bitvector��g	%tc7-port��g	%tc7-smob��g%tc16-bignum��g
%tc16-real��g
%tc16-complex��g%tc16-fraction��g<stringbuf>��g%stringbuf-procedure��g	stringbuf��gm-1f6d4c535-1e6���`��gt-1f6d4c535-1e5��������fl-1f6d4c535-1eb�����b�����fl-1f6d4c535-1e8�����bo������m�tmmmm}���
��]^����gstring��x�m���]��������gm-1f6d4c535-1e3���`����m�tm�mmm��m�����]�����]�����]
���������������xm���]�����gpw�����g%stringbuf?-procedure��g
stringbuf?��gm-1f6d4c535-1f3���`��gt-1f6d4c535-1f2�������fl-1f6d4c535-1f8��b���fl-1f6d4c535-1f5��bo���mtmmmm}���
�]^���mtm%mmmm*m/m3m8m=mBmGmLX���	]��
	�]\��]^��
	�]a��]c��	�xm�]����
�
�xm�]���gstringbuf-contents�g%stringbuf-contents-procedure�gm-1f6d4c535-1ff�`��fl-1f6d4c535-201��bo� mtmmmm}����!]s ��"r!�#"[�$�mtm�mmm�m����%]~$��&r%�'Z#&[�(�)fl-1f6d4c535-204�*fl-1f6d4c535-205�+)*�,b�(+�-,mtmmmm}���
�.]�-��/]�-��0x,m�1]�0��2/1�32�4]�$��5r4�6Z#5[�7fl-1f6d4c535-209�8fl-1f6d4c535-20a�978�:b�(9�;:mtmmmm}���
�<]�;��=]�;��>:m�?]
>��@=?�A@�B]�$��CrB�DZ#C[�Efl-1f6d4c535-20e�Ffl-1f6d4c535-20f�GEF�Hb�(G�IHmtmmmm}���
�J]�I��K]�I��Lg%%<stringbuf>-set-fields�MxHm�N]LM��OKN�PO�Qgt-1f6d4c535-1fe�RQ�Sfl-1f6d4c535-213�TS�UbRT�VUmtmmmm}���
�W]^V��X�Umtm�mmm�m����Y]�X��ZY�[]�X��\]aX��]]cX��^]Y�_xUm�`]�_��a\^`�b]�X��cUm�d]
c��ebYd�f]mX��g]�X��h]_��igh�jfYi�k[aej�lWZk�mxm�n]m��ogm-1f6d4c535-21a�po`�qp�����rfl-1f6d4c535-21f�sfl-1f6d4c535-220�tfl-1f6d4c535-221�ufl-1f6d4c535-222�vfl-1f6d4c535-223�wrstuv�xb�qw�yp�zfl-1f6d4c535-21c�{z�|boy{�}�xm|tm�mmm���
�~]�}��xxm|��]����]������gset-record-type-printer!��gdisplay��f#<stringbuf ��gwrite��f#>��g<inferior-struct>��g%inferior-struct-procedure��ginferior-struct��gm-1f6d4c535-242���`��gt-1f6d4c535-240��gt-1f6d4c535-241����������fl-1f6d4c535-247��fl-1f6d4c535-248������b��������fl-1f6d4c535-244�����bo������m�tmmmm}���
��]^����x�m���]�����gfields��]���������gm-1f6d4c535-23e���`����m�tm�mmm��m�����]�����]�����]
����������������xm���]�����gpwpw������g%inferior-struct?-procedure��gm-1f6d4c535-251���`��gt-1f6d4c535-250��������fl-1f6d4c535-256�����b�����fl-1f6d4c535-253�����bo������m�tmmmm}���
��]^������m�tm%mmmm*m/m3m8m=mBmGmLX����]�������]\����]^��������]a����]c��������x�m���]��������������������xm���]�����g%inferior-struct-name-procedure��gm-1f6d4c535-25d���`�����fl-1f6d4c535-25f�����bo�����m�tmmmm}�����]s����r����[���m�tm�mmm�m�����]~����r���Z��[������fl-1f6d4c535-262��fl-1f6d4c535-263������b�������m�tmmmm}���
��]�����]�����x�m���]������������]�����r���Z��[��fl-1f6d4c535-267��fl-1f6d4c535-268������b�������m�tmmmm}���
��]�����]������m���]
�����������]�����r���Z��[��fl-1f6d4c535-26c��fl-1f6d4c535-26d������b�������m�tmmmm}���
��]�����]�����g%%<inferior-struct>-set-fields��x�m���]��������gt-1f6d4c535-25c��fl-1f6d4c535-271��b���m�tmmmm}���
�]^��	�m�tm�mmm�m����
]�	��
�]�	��
]a	��]c	��
�xm��]���
�]�	��m��]
��
�]m	��]�	��]H���
���xm��]��� g!%inferior-struct-fields-procedure�!gm-1f6d4c535-278�"!`�#"�$fl-1f6d4c535-27a�%$�&bo#%�'"m&tmmmm}����(]s'��)r(�*)[�+�m&tm�mmm�m����,]~+��-r,�.Z*-[�/""�0fl-1f6d4c535-27d�1fl-1f6d4c535-27e�201�3b�/2�4"3m&tmmmm}���
�5]�4��6]�4��7x3m&�8]�7��968�:9�;]�+��<r;�=Z*<[�>fl-1f6d4c535-282�?fl-1f6d4c535-283�@>?�Ab�/@�B"Am&tmmmm}���
�C]�B��D]�B��EAm&�F]E��GDF�HG�I]�+��JrI�KZ*J[�Lfl-1f6d4c535-287�Mfl-1f6d4c535-288�NLM�Ob�/N�P"Om&tmmmm}���
�Q]�P��R]�P��SxOm&�T]�S��URT�VU�Wgt-1f6d4c535-277�XW�Yfl-1f6d4c535-28c�ZY�[bX#Z�\"[m&tmmmm}���
�]]^\��^�[m&tm�mmm�m����_]�^��`_�a]�^��b]a^��c]c^��dc_�ex[m&�f]�e��gbdf�h]�^��i[m&�j]i��kh_j�l]m^��m]�^��n]Ie��omn�pl_o�qagkp�r]`q�sxm&�t] s��ugm-1f6d4c535-293�vu`�wv�����xfl-1f6d4c535-298�yfl-1f6d4c535-299�zfl-1f6d4c535-29a�{fl-1f6d4c535-29b�|fl-1f6d4c535-29c�}xyz{|�~b�w}�v��fl-1f6d4c535-295�����bo����~m�tm�mmm���
��]�����x~m���]�����]H����]I��������gset-inferior-struct-fields!��g&%set-inferior-struct-fields!-procedure��gm-1f6d4c535-2a7���`��gt-1f6d4c535-2a5��gt-1f6d4c535-2a6����������fl-1f6d4c535-2ac��fl-1f6d4c535-2ad������b��������fl-1f6d4c535-2a9�����bo������m�tmmmm}���
��]^����gt-1e8ba8b5a-18c��gt-1e8ba8b5a-18d������gm-1e8ba8b5a-18e���`������fl-1e8ba8b5a-192��fl-1e8ba8b5a-193������b�����gsetter�������fl-1e8ba8b5a-186��fl-1e8ba8b5a-187��fl-1e8ba8b5a-188�������b�����N���fl-1e8ba8b5a-17d��fl-1e8ba8b5a-17e������b�y���gfield-specs������fl-1e8ba8b5a-179��fl-1e8ba8b5a-17a������b�y�����m�tm��m�m�����]�����gval��]���������]�����]a����]c��������x�m���]����������gstruct-set!��]������m���]����������]m����]�����]�������������������������xm���]�����gmake-parameter��g
vlist-null��g
vhash-assq��f#-1#��f#<struct ~a��g
parameter?��������g	scm-error��gwrong-type-arg��fparameterize��fNot a parameter: ~S��gvhash-consq��gfor-each��f #0#��f ~s��f ~x>��gobject-address��gprint-inferior-struct��g<inferior-fluid>��g%inferior-fluid-procedure��ginferior-fluid��gm-1f6d4c535-2de���`��gt-1f6d4c535-2dc��gt-1f6d4c535-2dd����������fl-1f6d4c535-2e3��fl-1f6d4c535-2e4������b��������fl-1f6d4c535-2e0�����bo������m�tmmmm}���
��]^����x�m���]s����]��������gm-1f6d4c535-2da���`����m�tm�mmm��m�����]����]����]
����������xm��]���s�g%inferior-fluid?-procedure�gm-1f6d4c535-2ed�	`�
gt-1f6d4c535-2ec�
�	�
fl-1f6d4c535-2f2�
�b�fl-1f6d4c535-2ef��bo�	mtmmmm}���
�]^���mtm%mmmm*m/m3m8m=mBmGmLX���]���]\��]^���]a��]c���xm�]��� �! �"!�#xm�$]#��%g %inferior-fluid-number-procedure�&gm-1f6d4c535-2f9�'&`�('�)fl-1f6d4c535-2fb�*)�+bo(*�,'m+tmmmm}����-]s,��.r-�/.[�0�m+tm�mmm�m����1]~0��2r1�3Z/2[�4''�5fl-1f6d4c535-2fe�6fl-1f6d4c535-2ff�756�8b�47�9'8m+tmmmm}���
�:]�9��;]�9��<x8m+�=]�<��>;=�?>�@]�0��Ar@�BZ/A[�Cfl-1f6d4c535-303�Dfl-1f6d4c535-304�ECD�Fb�4E�G'Fm+tmmmm}���
�H]�G��I]�G��JFm+�K]
J��LIK�ML�N]�0��OrN�PZ/O[�Qfl-1f6d4c535-308�Rfl-1f6d4c535-309�SQR�Tb�4S�U'Tm+tmmmm}���
�V]�U��W]�U��Xg%%<inferior-fluid>-set-fields�YxTm+�Z]XY��[WZ�\[�]gt-1f6d4c535-2f8�^]�_fl-1f6d4c535-30d�`_�ab^(`�b'am+tmmmm}���
�c]^b��d�am+tm�mmm�m����e]�d��fe�g]�d��h]ad��i]cd��jie�kxam+�l]�k��mhjl�n]�d��oam+�p]
o��qnep�r]md��s]�d��t]Fk��ust�vreu�wgmqv�xcfw�yxm+�z]%y��{ginferior-fluid-value�|g%inferior-fluid-value-procedure�}gm-1f6d4c535-314�~}`�~��fl-1f6d4c535-316�����bo���~m�tmmmm}�����]s����r����[���m�tm�mmm�m�����]~����r���Z��[��~~��fl-1f6d4c535-319��fl-1f6d4c535-31a������b�����~�m�tmmmm}���
��]�����]�����x�m���]������������]�����r���Z��[��fl-1f6d4c535-31e��fl-1f6d4c535-31f������b�����~�m�tmmmm}���
��]�����]������m���]�����������]�����r���Z��[��fl-1f6d4c535-323��fl-1f6d4c535-324������b�����~�m�tmmmm}���
��]�����]�����x�m���]X�����������gt-1f6d4c535-313�����fl-1f6d4c535-328�����b����~�m�tmmmm}���
��]^������m�tm�mmm�m�����]��������]�����]a����]c��������x�m���]����������]������m���]���������]m����]�����]{������������������������xm���]|����gm-1f6d4c535-32f���`���������fl-1f6d4c535-334��fl-1f6d4c535-335��fl-1f6d4c535-336��fl-1f6d4c535-337��fl-1f6d4c535-338���������b��������fl-1f6d4c535-331�����bo������m�tm�mmm���
��]�����x�m���]�����]F����]{��������f#<fluid ~a ~x>��gerror��*���*���fno matching pattern��g<inferior-object>��g%%inferior-object-procedure��g%inferior-object��gm-1f6d4c535-3a3���`��gt-1f6d4c535-3a0��gt-1f6d4c535-3a1��gt-1f6d4c535-3a2������������fl-1f6d4c535-3a8��fl-1f6d4c535-3a9��fl-1f6d4c535-3aa�������b��������fl-1f6d4c535-3a5�����bo������m�tmmmm}���
��]^���x�m��]q��gsub-kind�]��]���gm-1f6d4c535-39e�`��m�tm�mmm��m����	]���
]���]
��	
�
��xm��]���q�g%inferior-object?-procedure�gm-1f6d4c535-3b4�`�gt-1f6d4c535-3b3���fl-1f6d4c535-3b9��b�fl-1f6d4c535-3b6��bo�mtmmmm}���
�]^��mtm%mmmm*m/m3m8m=mBmGmLX��� ]��! �"]\��#]^��$# �%]a��&]c��'& �(xm�)]�(��*%')�+"$*�,!+�-xm�.]-��/g%inferior-object-kind-procedure�0gm-1f6d4c535-3c0�10`�21�3fl-1f6d4c535-3c2�43�5bo24�61m5tmmmm}����7]s6��8r7�98[�:m5tm�mmm�m����;]~:��<r;�=Z9<[�>11�?fl-1f6d4c535-3c5�@fl-1f6d4c535-3c6�A?@�Bb�>A�C1Bm5tmmmm}���
�D]�C��E]�C��FxBm5�G]�F��HEG�IH�J]�:��KrJ�LZ9K[�Mfl-1f6d4c535-3ca�Nfl-1f6d4c535-3cb�OMN�Pb�>O�Q1Pm5tmmmm}���
�R]�Q��S]�Q��TPm5�U]
T��VSU�WV�X]�:��YrX�ZZ9Y[�[fl-1f6d4c535-3cf�\fl-1f6d4c535-3d0�][\�^b�>]�_1^m5tmmmm}���
�`]�_��a]�_��bg%%<inferior-object>-set-fields�cx^m5�d]bc��ead�fe�ggt-1f6d4c535-3bf�hg�ifl-1f6d4c535-3d4�ji�kbh2j�l1km5tmmmm}���
�m]^l��nkm5tm�mmm�m����o]�n��po�q]�n��r]an��s]cn��tso�uxkm5�v]�u��wrtv�x]�n��ykm5�z]
y��{xoz�|]mn��}]�n��~]Bu��}~��|o��qw{���mp���xm5��]/����g#%inferior-object-sub-kind-procedure��gm-1f6d4c535-3db���`�����fl-1f6d4c535-3dd�����bo�����m�tmmmm}�����]s����r����[��m�tm�mmm�m�����]~����r���Z��[������fl-1f6d4c535-3e0��fl-1f6d4c535-3e1������b�������m�tmmmm}���
��]�����]�����x�m���]������������]�����r���Z��[��fl-1f6d4c535-3e5��fl-1f6d4c535-3e6������b�������m�tmmmm}���
��]�����]������m���]�����������]�����r���Z��[��fl-1f6d4c535-3ea��fl-1f6d4c535-3eb������b�������m�tmmmm}���
��]�����]�����x�m���]b�����������gt-1f6d4c535-3da�����fl-1f6d4c535-3ef�����b�������m�tmmmm}���
��]^�����m�tm�mmm�m�����]��������]�����]a����]c��������x�m���]����������]������m���]���������]m����]�����]C������������������������xm���]�����g"%inferior-object-address-procedure��gm-1f6d4c535-3f6���`�����fl-1f6d4c535-3f8�����bo�����m�tmmmm}�����]s����r����[��m�tm�mmm�m�����]~����r���Z��[������fl-1f6d4c535-3fb��fl-1f6d4c535-3fc������b�������m�tmmmm}���
��]�����]�����x�m���]������������]�����r���Z��[��fl-1f6d4c535-400��fl-1f6d4c535-401������b�������m�tmmmm}���
��]�����]������m��	]	���	�	�		�	]����	r	�	Z�	[�	fl-1f6d4c535-405�	fl-1f6d4c535-406�			�		b��	�	
�		m�tmmmm}���
�	]�	
��	]�	
��	
x		m��	]b	
��			�		�	gt-1f6d4c535-3f5�		�	fl-1f6d4c535-40a�		�	b	�	�	�	m�tmmmm}���
�	]^	��		m�tm�mmm�m����	]�	��		�	]�	��	]a	��	]c	��			�	x	m��	 ]�	��	!			 �	"]�	��	#	m��	$]		#��	%	"		$�	&]m	��	']�	��	(]D	��	)	'	(�	*	&		)�	+		!	%	*�	,			+�	-xm��	.]�	-��	/gm-1f6d4c535-411�	0	/`�	1	0�	2fl-1f6d4c535-416�	3fl-1f6d4c535-417�	4fl-1f6d4c535-418�	5fl-1f6d4c535-419�	6fl-1f6d4c535-41a�	7	2	3	4	5	6�	8b�	1	7�	9	0�	:fl-1f6d4c535-413�	;	:�	<bo	9	;�	=	8m	<tm�mmm���
�	>]�	=��	?x	8m	<�	@]�	?��	A]B	?��	B]C	?��	C]D	?��	D	A	B	C�	Ef#<~a ~:[~*~;~a ~]~x>�	Fgsmob�	Gg
inferior-smob�	Hg
inferior-port�	Ig%visited-cells�	Jgvisited�	Kg->�	Lgm-1f6d4c535-525�	M	L`�	N	M�	Ofl-1f6d4c535-527�	P	O�	Qbo	N	P�	Rxm	Q�	S]	K	R��	Tr	S�	U[	T[�	V	U挤	W[	V��	Xgparameterize�	Ygobject�	Z�	Y��	[	Mxxx�	\fl-1f6d4c535-52a�	]fl-1f6d4c535-52b�	^fl-1f6d4c535-52c�	_fl-1f6d4c535-52d�	`	\	]	^	_�	ab	Z	[	`�	bx	am	Q�	c]	X	b��	d]	I	b��	egvhash-consv�	f]	e	b��	g	d�	h	g�	igsymbol->string�	jg
string-length�	kgbytevector->uint-list�	lginvalid-struct�	mgaddress->inferior-struct�	ngand=>�	og
vhash-assv�	pgcdr�	qgcell->object�	rgstring->symbol�	sgvariable�	tg	substring�	ugbytevector->string�	vf
ISO-8859-1�	wgbitwise-ior�	xglittle�	yfUTF-32LE�	zgbig�	{fUTF-32BE�	|gmake-vector�	}gfold�	~gweak-vector�	g
dynamic-state�	�gprogram�	�gbignum�	�gdouble�	�g
hash-table�	�gobjcode�	�gvm�	�gvm-continuation�	�garray�	�g	bitvector�	�gbit-set?�	�g
integer->char�	�g	undefined�	�g
eof-object�	�gunbound�C5h��]4	
89K54N>"G4OiP5:RQh�]�C�gpeek
		gopen		g	type-name			gfilenamefsystem/base/types.scm�
	D
��			gnameg%memory-backend-procedure�CRR4U;VY\�hk]Ccg
t-1f6d4c535-3
		g
t-1f6d4c535-4		g
t-1f6d4c535-5						C��;�hX]L6Pga
		gfilenamefsystem/base/types.scm�		D
��		CZ�hH]L6@gfilenamefsystem/base/types.scm�		D
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�
	D
��		nC5;R���Q��4�Q>"G	�Ri�QRQh�]�$��CCxgobj
		gfilenamefsystem/base/types.scm�
	D
��		gnameg%memory-backend?-procedure�CR4U<VYjh6]C.gt-1f6d4c535-16
		
		
C��<�hX]L6Pga
		gfilenamefsystem/base/types.scm�		D
��		CZ�hH]L6@gfilenamefsystem/base/types.scm�		D
��		
Clh]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�
	D
��		nC5<RQoph�]�&
�C6zgs
		gfilenamefsystem/base/types.scm�
	D
��		gnameg%memory-backend-peek-procedure�CqR4UpVY���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C�h6]C.gt-1f6d4c535-22
		
		
C��p�hX]L6Pga
		gfilenamefsystem/base/types.scm�		D
��		CZ�hH]L6@gfilenamefsystem/base/types.scm�		D
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�
	D
��	�C5pRQo�h�]�&�C6zgs
		gfilenamefsystem/base/types.scm�
	D
��		gnameg%memory-backend-open-procedure�C�R4U�VYh:]��C2gerr
		gs					Ch:]��C2gerr
		gs					C!',h:]��C2gerr
		gs					CHh6]C.gt-1f6d4c535-3d
		
		
C����hX]L6Pga
		gfilenamefsystem/base/types.scm�		D
��		CZ�hH]L6@gfilenamefsystem/base/types.scm�		D
��		
CJh]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�
	D
��	�C5�RQoKh �]�&	�C6gs
		gfilenamefsystem/base/types.scm�
	D
��		gnameg#%memory-backend-type-name-procedure�CLR4UKVYZafh:]��C2gerr
		gs					Cioth:]��C2gerr
		gs					Cw}�h:]��C2gerr
		gs					C�h6]C.gt-1f6d4c535-58
		
		
C��K�hX]L6Pga
		gfilenamefsystem/base/types.scm�		D
��		CZ�hH]L6@gfilenamefsystem/base/types.scm�		D
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�
	D
��	�C5KR4U�VY������h v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/base/types.scm�
	D
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5�RQi��:��h(�]4545
456�gaddress
		$gptr			$gbv			$gfilenamefsystem/base/types.scm�
	O	��		P	��			P	��		Q	��		P	��		R	"��	$	R	��		$gnamegdereference-word�C��������h@�]4M5454
>"GM�NC�gbv
		9gindex		9gcount			9gptr				9gmem			9gfilenamefsystem/base/types.scm�
	W	��		X	��			X	��		Y	��		X	��		Z	
��	4	[	 ��	6	[	
��			9	gnamegread-memory!�C��	hX)]HK$454564O54>"GC!gaddress
		Sgsize		Sgcurrent-address			Sgptr			)gbv		!	)gport		:	Sgfilenamefsystem/base/types.scm�
	T	��		^	��		_	��		_	
��		`	��	!	_	
��	)	a	��	*	b	��	.	b	5��	:	b	��	:	b	
��	=	e	��
		S	gnamegopen�C�=RQoph(�]
�&
�"	456�gbackend
		$gaddress		$gpeek			$gfilenamefsystem/base/types.scm�
	j
��		l	��		l	��	$	m	��		$	gnameg% dereference-word-procedure�C�R4U>VY�#hR]CJgt-1f6d4c535-c4
		gt-1f6d4c535-c5					C��>�hX]L6Pga
		gfilenamefsystem/base/types.scm�		j
��		CZ%hH]L6@gfilenamefsystem/base/types.scm�		j
��		
C'h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�
	j
��		nC5>R4U?VY(789;h W]��COgdummy
		gbackend		gaddress						C<GIOPQRh0i]Cagdummy
		.gbackend		.gaddress			.gsize			.		.	C��h@�]45$@45$@6zgx
		9gtmp		9gtmp		"	9gfilenamefsystem/base/types.scm�
	p	��		9g
documentationf�Return an input port to the SIZE bytes at ADDRESS, using BACKEND.  When
SIZE is omitted, return an unbounded port to the memory at ADDRESS.�g
macro-typegsyntax-rules�gpatternsgbackendgaddressgbackendgaddressgsizeC5?RS:��h �]	45
456�gport
		gbv		gfilenamefsystem/base/types.scm�
	~
��	�	��	�	��	�	��	�	��		gnamegget-word�g
documentationf2Read a word from PORT and return it as an integer.�CTRQoKh0�]�&		�"	45$6C�gbackend
		/gkind		/gnumber			/gproc			/gfilenamefsystem/base/types.scm�
�
��	�	��	�	��	%�	��	-�	��		/	gnameg% type-number->name-procedure�CUR4U@VY\�hq]Cigt-1f6d4c535-101
		gt-1f6d4c535-102		gt-1f6d4c535-103						C��@�hY]L6Qga
		gfilenamefsystem/base/types.scm�	�
��		CZ%hI]L6Agfilenamefsystem/base/types.scm�	�
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�
�
��		nC5@R4U�VY����������
h@�]����	C~gdummy
		@gport		@gname			@glen			@grest			@gbody			@		@	C����h(u]Cmgdummy
		"gport		"gname			"grest			"gbody			"		"	C�hQ]CIgdummy
		gport		gbody						C��
hP?]45$@45$@45$@	67gx
		Pgtmp		Pgtmp		"	Pgtmp		9	Pgfilenamefsystem/base/types.scm�
�	��		Pg
macro-typegsyntax-rules�gpatternsgportg
bytevectorgnameglengrestg...gbodygportgnamegrestg...gbodygportgbodyC5�R4U�VY��������hP�,3�C�gdummy
		Ogbits		Oga			Ogb			Ogn			Ogc			Og
consequent			Og	alternate			O		O	C�h@�]C�gdummy
		:gbits		:gx			:gn			:gc			:g
consequent			:g	alternate			:		:	Ch0�]C�gdummy
		+gbits		+gn			+gc			+g
consequent			+g	alternate			+		+	C,-/0235679hX�,3��	
C�gdummy
		Wgbits		Wga			Wg<<			Wgn			Wgc			Wg
consequent			Wg	alternate			W		W	C��hh�]!45$@45$@45$@45$	@
6�gx
		ggtmp		ggtmp		"	ggtmp		9	ggtmp		P	ggfilenamefsystem/base/types.scm�
�	��		gg
macro-typegsyntax-rules�gpatternsgbitsgag||gbg&gng=gcg
consequentg	alternategbitsgxg&gng=gcg
consequentg	alternategbitsg_g&gng=gcg
consequentg	alternategbitsgag<<gng||gcg
consequentg	alternateC5�R4U:VY=RSTh(�]C�gdummy
		"gport		"gtag			"gtag-pattern			"gthing			"gbody			"grest			"		"	CU_chP]CHgdummy
		gport		gtag						C��h@]45$@45$@6gx
		9gtmp		9gtmp		"	9gfilenamefsystem/base/types.scm�
�	��		9g
macro-typegsyntax-rules�gpatternsgportgtaggtag-patterngthingg...gbodygrestg...gportgtagC5:R4UdVYgxz{|}�hX]�CPgtmp-1f6d4c535-1be
		
gtmp-1f6d4c535-1bd		
		
	Ch8f]45C^gdummy
		2gport		2gpattern			2gbody			2		2	C��h(B]	45$@6:gx
		"gtmp		"gfilenamefsystem/base/types.scm�
�	��		"g
documentationffMatch a cell---i.e., a non-immediate value other than a pair.  The
cell's contents are read from PORT.�g
macro-typegsyntax-rules�gpatternsgportgpatterngbodyg...g...C5dR4U�VY����h |]���Ctgdummy
		gbits		gbit-pattern			gbody			grest						C��h?]C7gdummy
		gbits					C��h@�]45$@45$@6�gx
		9gtmp		9gtmp		"	9gfilenamefsystem/base/types.scm�
�	��		9g
macro-typegsyntax-rules�gpatternsgbitsgbit-patterngbodyg...grestg...gbitsC5�R4U�VY����h T]��CLgdummy
		gbits		gclauses						C��h(,]	45$@6$gx
		"gtmp		"gfilenamefsystem/base/types.scm�
�	��		"g
documentationfbMatch BITS, an integer representation of an 'SCM' value, against
CLAUSES.  Each clause must have the form:

  (PATTERN BODY ...)

PATTERN is a bit pattern that may specify bitwise operations on BITS to
determine if it matches.  TEMPLATE specify the name of the variable to bind
the matching bits, possibly with bitwise operations to extract it from BITS.�g
macro-typegsyntax-rules�gpatternsgbitsgclausesg...C5�R	�R	�R
�R�i�R�i	��R	�i��R�i
��R�R	�R	�R	
�R	�R	�R	�R	�R	�R	%�R	'�R	-�R	/�R	5�R	7�R	G�R	M�R	O�R	U�R	W�R	}�R	�R�i��R�i��R�i��R�i��R�h~]�Cvgstring
		
gfilenamefsystem/base/types.scm�

��		
gnameg%stringbuf-procedure�C�R4U�VY�h7]C/gt-1f6d4c535-1e5
		
		
C����hY]L6Qga
		gfilenamefsystem/base/types.scm�	
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�

��		nC5�R������4��>"G	��i��R�h|]�$��CCtgobj
		gfilenamefsystem/base/types.scm�

��		gnameg%stringbuf?-procedure�C�R4U�VYh7]C/gt-1f6d4c535-1f2
		
		
C����hY]L6Qga
		gfilenamefsystem/base/types.scm�	
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	
��		
Ch]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�

��		nC5�R�oh�]�&
�C6zgs
		gfilenamefsystem/base/types.scm�

��		gnameg%stringbuf-contents-procedure�CR4UVY'.3h:]��C2gerr
		gs					C6<Ah:]��C2gerr
		gs					CDJPh:]��C2gerr
		gs					Clh7]C/gt-1f6d4c535-1fe
		
		
C���hY]L6Qga
		gfilenamefsystem/base/types.scm�	
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	
��		
Cnh]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�

��	�C5R4ULVY�~����h v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/base/types.scm�

��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5LR4�i�i����o�hP�]4>"G4�&
�"	45>"G6�g	stringbuf
		Jgport		Jgfilenamefsystem/base/types.scm�
	��		��		%��		��		��		#��	:	��	F	%��	J	��
		J	C>"G�h�]�C�gname
		gfields		gfilenamefsystem/base/types.scm�

��			gnameg%inferior-struct-procedure�C�R4U�VY��hT]CLgt-1f6d4c535-240
		gt-1f6d4c535-241					C����hY]L6Qga
		gfilenamefsystem/base/types.scm�	
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�

��		nC5�R������4��>"G	��i��R�h�]�$��CCzgobj
		gfilenamefsystem/base/types.scm�

��		gnameg%inferior-struct?-procedure�C�R4UGVY�h7]C/gt-1f6d4c535-250
		
		
C��G�hY]L6Qga
		gfilenamefsystem/base/types.scm�	
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�

��		nC5GR�oHh�]�&
�C6|gs
		gfilenamefsystem/base/types.scm�

��		gnameg%inferior-struct-name-procedure�C�R4UHVY���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h:]��C2gerr
		gs					Ch7]C/gt-1f6d4c535-25c
		
		
C��H�hY]L6Qga
		gfilenamefsystem/base/types.scm�	
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	
��		
Ch]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�

��	�C5HR�oIh�]�&�C6~gs
		gfilenamefsystem/base/types.scm�

��		gnameg!%inferior-struct-fields-procedure�C R4UIVY.5:h:]��C2gerr
		gs					C=CHh:]��C2gerr
		gs					CKQVh:]��C2gerr
		gs					Crh7]C/gt-1f6d4c535-277
		
		
C��I�hY]L6Qga
		gfilenamefsystem/base/types.scm�	
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	
��		
Cth]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�

��	�C5IR4U�VY������h v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/base/types.scm�

��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5�R�o�h �]�&�C6�gs
		gval		gfilenamefsystem/base/types.scm�

��			gnameg&%set-inferior-struct-fields!-procedure�C�R4U�VY��hT]CLgt-1f6d4c535-2a5
		gt-1f6d4c535-2a6					C����hY]L6Qga
		gfilenamefsystem/base/types.scm�	
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�

��		nC5�R4�i�i5�/���oH���������/�h �]L&L6L6�gfield
		gfilenamefsystem/base/types.scm�
/	��	
0	��	1	'��	1	��	2	+��	2	��		CI��h�9]44L55$64�&
�"	45>"G4L5$"4	
L>"GL�4L	�4
4L555Y4O�&�"	45>"GZ4561gstruct
	�gport	�gfilenamefsystem/base/types.scm�
'	��	(	
��	(	��	(	
��	(	��	)	��	)	
��	+	��	!+	��	$,	��	@+	��	I-	��	~.	���.	3���.	���-	���/	���3	���/	���4	���4	 ���4	��	�	CO�R4�i�i�i>"G�h�]�C�gnumber
		gvalue		gfilenamefsystem/base/types.scm�
9
��			gnameg%inferior-fluid-procedure�C�R4U�VY�hT]CLgt-1f6d4c535-2dc
		gt-1f6d4c535-2dd					C����hY]L6Qga
		gfilenamefsystem/base/types.scm�	9
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	9
��		
Ch]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�
9
��		nC5�R�����4��>"G	��i��R�h�]�$��CCygobj
		gfilenamefsystem/base/types.scm�
9
��		gnameg%inferior-fluid?-procedure�CR4UEVY"h7]C/gt-1f6d4c535-2ec
		
		
C��E�hY]L6Qga
		gfilenamefsystem/base/types.scm�	9
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	9
��		
C$h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�
9
��		nC5ER�oFh�]�&
�C6}gs
		gfilenamefsystem/base/types.scm�
9
��		gnameg %inferior-fluid-number-procedure�C%R4UFVY3:?h:]��C2gerr
		gs					CBHMh:]��C2gerr
		gs					CPV\h:]��C2gerr
		gs					Cxh7]C/gt-1f6d4c535-2f8
		
		
C��F�hY]L6Qga
		gfilenamefsystem/base/types.scm�	9
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	9
��		
Czh]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�
9
��	�C5FR�o{h�]�&�C6|gs
		gfilenamefsystem/base/types.scm�
9
��		gnameg%inferior-fluid-value-procedure�C|R4U{VY���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C�h7]C/gt-1f6d4c535-313
		
		
C��{�hY]L6Qga
		gfilenamefsystem/base/types.scm�	9
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	9
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�
9
��	�C5{R4UXVY������h v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/base/types.scm�
9
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5XR4�i�i�/���)�hH�]
�$-�&
�456456456�gfluid
		Cgport		Cgw			)gfilenamefsystem/base/types.scm�
@	��	A	��	C	,��	!E	'��	)C	��	*A	��		C	C>"G�h�]�C�gkind
		gsub-kind		gaddress			gfilenamefsystem/base/types.scm�
J
��			gnameg%%inferior-object-procedure�C�R4U�VY\
hq]Cigt-1f6d4c535-3a0
		gt-1f6d4c535-3a1		gt-1f6d4c535-3a2						C����hY]L6Qga
		gfilenamefsystem/base/types.scm�	J
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	J
��		
Ch]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�
J
��		nC5�R�����4��>"G	��i��R�h�]�$��CCzgobj
		gfilenamefsystem/base/types.scm�
J
��		gnameg%inferior-object?-procedure�CR4UAVY,h7]C/gt-1f6d4c535-3b3
		
		
C��A�hY]L6Qga
		gfilenamefsystem/base/types.scm�	J
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	J
��		
C.h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/types.scm�
J
��		nC5AR�oBh�]�&
�C6|gs
		gfilenamefsystem/base/types.scm�
J
��		gnameg%inferior-object-kind-procedure�C/R4UBVY=DIh:]��C2gerr
		gs					CLRWh:]��C2gerr
		gs					CZ`fh:]��C2gerr
		gs					C�h7]C/gt-1f6d4c535-3bf
		
		
C��B�hY]L6Qga
		gfilenamefsystem/base/types.scm�	J
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	J
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�
J
��	�C5BR�oCh�]�&�C6�gs
		gfilenamefsystem/base/types.scm�
J
��		gnameg#%inferior-object-sub-kind-procedure�C�R4UCVY���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C�h7]C/gt-1f6d4c535-3da
		
		
C��C�hY]L6Qga
		gfilenamefsystem/base/types.scm�	J
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	J
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�
J
��	�C5CR�oDh �]�&	�C6gs
		gfilenamefsystem/base/types.scm�
J
��		gnameg"%inferior-object-address-procedure�C�R4UDVY���h:]��C2gerr
		gs					C��	h:]��C2gerr
		gs					C			h:]��C2gerr
		gs					C	,h7]C/gt-1f6d4c535-3f5
		
		
C��D�hY]L6Qga
		gfilenamefsystem/base/types.scm�	J
��		CZ�hI]L6Agfilenamefsystem/base/types.scm�	J
��		
C	.h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/types.scm�
J
��	�C5DR4UbVY�	>	@	D��h v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/base/types.scm�
J
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5bR�h(U)3�C]�CMgkind
			gaddress			gkind
		"gsub-kind		"gaddress			"gfilenamefsystem/base/types.scm�
R	��	V	��	R	��	!X	��						"	gnameginferior-object�g
documentationfSReturn an object representing an inferior object at ADDRESS, of type
KIND/SUB-KIND.�CVR4�i�i�/	E�)�hP�]�$9�&#
��	�6456456�gio
		Ogport		Ogw			5gw			5gw		#	5gfilenamefsystem/base/types.scm�
[	��	\	��	+^	,��	5^	��	6\	��		O	C>"GV	FQoKhX_]�&		�"	45$
45"$"6Wgbackend
		Qgtype-number		Qgaddress			Qgproc		!	:gt		:	Mgfilenamefsystem/base/types.scm�
b
��	e	��		f	��	.f	2��	2f	��	:f	��	Qe	��		Q	gnameg
inferior-smob�g
documentationfLReturn an object representing the SMOB at ADDRESS whose type is
TYPE-NUMBER.�C	GRV�QoKhX_]�&		�"	45$
45"$"6Wgbackend
		Qgtype-number		Qgaddress			Qgproc		!	:gt		:	Mgfilenamefsystem/base/types.scm�
j
��	m	��		n	��	.n	2��	2n	��	:n	��	Qm	��		Q	gnameg
inferior-port�g
documentationfLReturn an object representing the port at ADDRESS whose type is
TYPE-NUMBER.�C	HR4�i�i5	IR4U	JVY	W	c	d	f	hh h]�����C`gdummy
		gaddress		gobject			gbody						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/base/types.scm�
y	��		"g
macro-typegsyntax-rules�gpatternsgaddressg->gobjectgbodyg...C5	JR:QopJ	i	j�L�S�	I�����	e�Jhg]L6_gt-1f6d4c535-5af
		
gfilenamefsystem/base/types.scm�
�	��		
C	k��V	lh��]s
���&
�"	454545	���&
�"	454545�$745	4	5	�
��&
�"	4545
�
�$4	5"+�&�"	4
54
�54
�5
�
45$"4>"G�4	�44
555Y4O4
4555�&�"4>"GZCZF6�gaddress
	�gvtable-data-address	�gbackend		�glayout-address			�gpeek		%	1glayout-bits		1�glayout		<�gname-address		F�gpeek		b	ng	name-bits		n�gname		y�glayout		��glen	
��gaddress	��gpeek	��gslots	��gopen	�
gport	
�gfields	
�gresult	"�gt-1f6d4c535-5a8	&�gvalues	��gfilenamefsystem/base/types.scm�

��	�	��		�	��		�	��	�	��	1�	��	4�	��	<�	��	E�	��	F�	��	F�	��	K�	��	n�	��	q�	��	y�	��	~�	����	����	����	����	����	����	����	1����	����	����	2����	���	2���	��
�	��
�	���	.���	���	��"�	��"�	��&�	
��p�	��z�	���	6����	����	����	����	����	����	��/	�	gnamegaddress->inferior-struct�g
documentationf^Read the struct at ADDRESS using BACKEND.  Return an 'inferior-struct'
object representing it.�C	mR=	n	o	I	pQo�T�	m�	q�	r�)��V	s�	t�S:	u	v	w�	x	y	z	{��L.1�8	|�����	e	}h�]L��C|gelement
		
gindex		
gfilenamefsystem/base/types.scm�
�	��		�	��	�	��		
	C�Jhg]L6_gt-1f6d4c535-732
		
gfilenamefsystem/base/types.scm�
�	��		
C	k�	~���	�	H�	��	��O	��s�	����	��	��	��	��	��	GaXh��
-.,3#444555$C�&�"	45454	5	�
�$

�6	��$n4	54	>"G4	>"G4
5�$"�&
�6456456�$4	>"G6�$c4	54	5	4	5
4
5�$)�&
�		
�6456456��$Q4	5	4	5	�

�$"4�>"G4
5�C		45�$�4	5
4	
�5	
��
�$"4�>"G445

& "!
&""44
55
5

�C	�

#�$W4	54	5
�$4$%5"(�&�"	45
4
5


64&4'		5�5(�$�4)	�54	>"G4)	�5
4
�54*
54+5$"4,-./>"G�4	�404555Y412O
434O454555>"GZCZF	�6�$764&4'		5�5

8�$&4)	�54	>"G9�C	�:�$;64&4'		5�5<�$4)	�5=��6	�>�$?6���@�$A6B�$}4	>"G	��4CD5
�$4$%5"-�&�"	4544CD5544CD55
45�CE�$4	>"GF6G�$>4	>"G4	>"G4	>"GH6I�$4	5J6K�$L6M�$N6O�$P6Q�$R6S�$T64&4'		5�5U�$'4)	�54	>"GV6W6}
gaddress
	�gbackend	�gt		)�gopen		N	[gport		[�gtag		d�gtag		k�gtag	��gbuf	�gv	�gw	��gtag	�gtag	*�gbuf	<�gstart		E�glen	
N�gv	Y�gw	o~gtag	��glen		��gbuf	
��g	remainder	��gstring	��gtag		��glen	
�gbuf	,�g	remainder	,�gv	
]�gstring	
��gtag	
��glen	��gaddress	��gopen	
��gbv-port	
��gtag	�glen	$�glen	
A�gwords	O�gvector	X�gt-1f6d4c535-729	\�gtag	��gtag	
�gn	7gtag	<�gtag	`�g
flags+type	t�gtag	��gtag	��gtag	��gaddress	�Egopen	)gport	)Egwords	9Egtag	G�gtag	n�gtag	��gaddress	��gtag	��gtag	��gtag	��gtag	�gtag	)�gtag	M�g	smob-type	a@gfilenamefsystem/base/types.scm�
�
��	�	��	�	
��	�	!��	%�	
��	)�	��	)�	��	7�	��	[�	��	^�	��	�	%����	����	����	����	����	���	��$�	��(�	��*�	��Q�	��|�	&��~�	���	����	����	����	.����	����	����	���	���	��"�	 ��$�	��)�	 ��,�	��T�	��Y�	.��i�	9��o�	.��w�	6��|�	.����	����	����	����	����	����	
���	��9�	��A�	��D�	��M�	1��O�	��O�	��R�	��X�	��\�	
����	����	����	����	7����	����	����	����	����	����	����	��6�	��<�	��K�	��O�	��P�	����	"����	����	����	����	����	����	����	����	����	&����	����	����	8����	���	8��&�	��)�	��,�	��1�	2��9�	��9�	��?�	1��D�	
��G�	��h�	��l�	��n�	����	����	����	����	����	����	����	����	����	����	����	���	���	���	��#�	��'�	��)�	��8�	��<�	��=�	���	����	��|	�gnamegcell->object�g
documentationfWReturn an object representing the object at ADDRESS, reading from memory
using BACKEND.�C	qR=.1�8�Qop	�	n	o	I	p:�����	eJ	q�	��V	�	�	�� h|-.,3
#44		5�5�$	�6	��$��&
�"	4	5454

5�$�444
555$C��
45$"4>"G�4	�44
555Y45�4�&
�"	4	5	4	5	5�ZCZF644		5�5�$4	�5644		5�5�$q4	�5
�$C�$C	�$C	�$C	�$C		�$6	
�$6	�$6CCtgbits
	�gbackend	�gtag		'�gtag		?�gpeek		d	pgtype		pBgpair?		{Bgt	�:gcdrloc	�:gpair	�:gt-1f6d4c535-80f	�:gpeek		#/gtag	S�gchar	gogtag	��gflag	��gfilenamefsystem/base/types.scm�
�
��	�	��	M�	��	p�	��	s�	��	{�	��	{�	����	����	����	����	*����	����	����	����	����	����	����	����	"���	��	��	*��3	��4	��B	��C�	��o	��p�	���	���	
���	���	���	
���	���	
���	���	���	
����	��(	�gnamegscm->object�g
documentationfLReturn the Scheme object corresponding to BITS, the bits of an 'SCM'
object.�CJRC�gm
		,grtd
��grtd
A�Bgrtd
P�Qg%printed-struct
c�f�grtd
j�j�grtd
~�gfilenamefsystem/base/types.scm�		
��	-	B	��	3	B	
��	5	B	��	8	@
��	D
���	h	��	K
��		j
��$	~
��%P�
��=��
��=��
��=��
��=��
��=��	��=��
��=��	��=��
��=��	��=��
��=��
��=��
��=��
��=��
��=��
��>�
��>�
��>�
��>�
��>�
��> �
��>&
��>,
��>2
��>8
��>>
��>D
��>J
��>P
��>V
��>\	
��>b

��>j	$��>k	��>o
��>w
	"��>x
	��>|
��>�	%��>�	��>�
��>�	&��>�	��>�
��?:
��L#
��N"
��c�&	��c�&	��f�%
��f�6
��g�9
��y�?
��{�J
����Q
����Z
����b
����j
����v	����r
����
����
�����
��K	��
C6PK*[�A5M��base/target.gonu�[���GOOF----LE-8-2.0�]i4h�]gguile�	�	gdefine-module*�	�	�	gsystem�	gbase�	gtarget�		�	
gfilenameS�	fsystem/base/target.scm�	gimportsS�	
grnrs�	gbytevectors�	
�	�	gice-9�	gregex�	�	�	�	gexportsS�	gtarget-type�	gwith-target�	g
target-cpu�	g
target-vendor�	g	target-os�	gtarget-endianness�	gtarget-word-size�	�	gset-current-module�	 �	!�	"gforeign�	#"�	$gsizeof�	%#$�	&#$�	'g*�	(g%native-word-size�	)g
make-fluid�	*g
%host-type�	+g%target-type�	,gnative-endianness�	-g%target-endianness�	.g%target-word-size�	/gstring?�	0gstring-split�	1glength�	2gor-map�	3gstring-null?�	4gerror�	5finvalid target�	6gvalidate-target�	7gtriplet-cpu�	8gcpu-endianness�	9gtriplet-pointer-size�	:gstring=?�	;gstring-match�	<f
^i[0-9]86$�	=glittle�	>gmember�	?fx86_64�	@fia64�	Af	powerpcle�	Bfpowerpc64le�	Cfmipsel�	Dfmips64el�	Efnios2�	Ffsh3�	Gfsh4�	Hfalpha�	I?@ABCDEFGH
�	Jfsparc�	Kfsparc64�	Lfpowerpc�	Mf	powerpc64�	Nfspu�	Ofmips�	Pfmips64�	Qfm68k�	Rfs390x�	SJKLMNOPQR	�	Tgbig�	Uf^arm.*el�	Vf^arm.*eb�	Wgstring-prefix?�	Xfarm�	Yf^aarch64.*be�	Zfaarch64�	[funknown CPU endianness�	\f^mips64.*-gnuabi64�	]f^mips64�	^f^x86_64-.*-gnux32�	_f64$�	`f64_?[lbe][lbe]$�	aJLOCEQFG�	bRH�	cf^arm.*�	dfunknown CPU word size�	eg
triplet-os�	fg	substring�	ggstring-index�	hgtriplet-vendor�C5hH*]4	
54!>"G4&'5(R4)i*i5+R4)i4,i55-R4)i(i5.R/012345hX�]45$54-545	�$"	45"$6C�gtarget
		Qgparts		>gt		"	;gfilenamefsystem/base/target.scm�
	-
��		.	��	
	.	��		/	��		/	
��		0	��	"	0	��	"	0	��	0	1	��	C	.	
��	G	.	��	K	2	
��	O	2	��		Qgnamegvalidate-target�C6R67+-.89hH�]
4>"G454545Y4>ZCZF�gtarget
		Agthunk		Agcpu			Agfilenamefsystem/base/target.scm�
	4
��		5	��		6	
��		6	��	&	8	&��	-	9	%��	6	:	��		A	gnamegwith-target�CR:7*,;<=>ISTUVWXYZ4[h�-]4455$645$C4	5$C4
5$C45$C4
5$C45$C45$C45$C6%gcpu
	�gfilenamefsystem/base/target.scm�
	<
��		>	��		>	��		>	��		>	��		?	��		@	
��		@	��	!	@	
��	%	@	��	'	A	
��	)	B	
��	/	B	��	1	B	
��	5	@	��	7	D	
��	9	E	
��	?	E	��	A	E	
��	E	@	��	G	G	
��	I	H	
��	M	H	��	Q	H	
��	U	@	��	W	I	
��	Y	J	
��	]	J	��	a	J	
��	e	@	��	g	K	
��	i	L	
��	m	L	��	q	L	
��	u	@	��	w	M	
��	y	N	
��	}	N	���	N	
���	@	���	O	
���	P	
���	P	���	P	
���	@	���	Q	
���	S	���	S	
��1	�gnamegcpu-endianness�g
documentationfReturn the endianness for CPU.�C8R7;<\]^_`>abc4d:*e(h�}]	45"�45$	C45$	C45$	C45$	C45$	C45$	C4	
5$	C4	5$	C45$	C
64455$445455$C"��8"��4ugtriplet
	�gcpu		�gfilenamefsystem/base/target.scm�
	U
��		W	
��			W	��		\	��		\	��		\	��		X	��	 	c	��	$	c	��	(	c	��	,	X	��	0	d	��	4	d	��	8	d	��	<	X	��	@	f	��	D	f	��	H	f	��	L	X	��	P	h	��	T	h	��	X	h	��	\	X	��	`	i	��	d	i	��	h	i	��	l	X	��	p	j	��	v	j	��	x	j	��	|	X	���	k	���	k	���	k	���	X	���	l	���	l	���	l	���	X	���	m	���	m	���	X	���	X	���	X	���	X	���	X	���	Y	���	Y	���	Y	/���	Y	���	X	��4	�gnamegtriplet-pointer-size�g
documentationf1Return the size of pointers in bytes for TRIPLET.�C9Rfgh�]
4-56xgt
		gfilenamefsystem/base/target.scm�
	o
��		p	��		p	��		gnamegtriplet-cpu�C7Rgfh(�]	4-5�4-56�gt
		!gstart		!gfilenamefsystem/base/target.scm�
	r
��		s	��		s	��		s	��		t	��	!	t	��		!gnamegtriplet-vendor�ChRgfh �]	4-4-5�5�6�gt
		 gstart		 gfilenamefsystem/base/target.scm�
	v
��		w	��	
	w	+��		w	'��		w	��		w	��		w	��	 	x	��			 gnameg
triplet-os�CeR+h�][C�gfilenamefsystem/base/target.scm�
	{
��		
gnamegtarget-type�g
documentationf<Return the GNU configuration triplet of the target platform.�CR7h�]456�gfilenamefsystem/base/target.scm�
	
��	�	��	�	��		
gnameg
target-cpu�g
documentationf+Return the CPU name of the target platform.�CRhh�]456�gfilenamefsystem/base/target.scm�
�
��	�	��	�	��		
gnameg
target-vendor�g
documentationf.Return the vendor name of the target platform.�CReh�]456�gfilenamefsystem/base/target.scm�
�
��	�	��	�	��		
gnameg	target-os�g
documentationf8Return the operating system name of the target platform.�CR-h�][C�gfilenamefsystem/base/target.scm�
�
��		
gnamegtarget-endianness�g
documentationf4Return the endianness object of the target platform.�CR.h�][C�gfilenamefsystem/base/target.scm�
�
��		
gnamegtarget-word-size�g
documentationf7Return the word size, in bytes, of the target platform.�CRC"gm
		,gfilenamefsystem/base/target.scm�		
��	-	'	��	/	'	��	1	'	��	3	'	��	6	$
��	7	)	��	D	)
��	E	*	��	J	*	'��	R	*	��	U	*
��	V	+	��	c	+
���	-
��	4
��	<
��	�	U
��
S	o
��@	r
��4	v
��
	{
��
�	
����
����
��t�
��F�
��	H
C6PK*[�^�}DDbase/pmatch.gonu�[���GOOF----LE-8-2.0,]4h3]gguile�	�	gdefine-module*�	�	�	gsystem�	gbase�	gpmatch�		�	
gfilenameS�	fsystem/base/pmatch.scm�	gexportsS�	
�	gset-current-module�	�	�	gmake-syntax-transformer�	�	�	gmacro�	g$sc-dispatch�	�	�	gany�	geach-any�	��	��	g
syntax-object�	glet�	gtop�	�	 gribcage�	!gdummy�	"ge�	#gcs�	$!"#�	%gm-3c4e5dc25-86�	&%�	'&�	(fl-3c4e5dc25-8b�	)fl-3c4e5dc25-8c�	*fl-3c4e5dc25-8d�	+()*�	, $'+�	- �	.gx�	/.�	0&�	1fl-3c4e5dc25-88�	21�	3 /02�	4,-3�	5ghygiene�	65�	746�	8gv�	9846�	:gpmatch1�	;:46�	<gsyntax-violation�	=<�	><�	?f-source expression failed to match any pattern�	@�	Agif�	B!8�	Cgm-3c4e5dc25-92�	DC�	ED�	Ffl-3c4e5dc25-97�	Gfl-3c4e5dc25-98�	HFG�	I BEH�	JD�	Kfl-3c4e5dc25-94�	LK�	M /JL�	NI-M�	OAN6�	PN6�	QOPP�	Rgfree-id�	Sgelse�	T-M�	UST6�	VRU�	WV��	XW�	Yge0�	Z!8Y"�	[D�	\fl-3c4e5dc25-9c�	]fl-3c4e5dc25-9d�	^fl-3c4e5dc25-9e�	_fl-3c4e5dc25-9f�	`\]^_�	a Z[`�	ba-M�	cb6�	dgguard�	edT6�	fRe�	gf��	hg��	ih��	ji��	kj��	lk��	mgpat�	ngg�	o!8mnY"#�	pD�	qfl-3c4e5dc25-a6�	rfl-3c4e5dc25-a7�	sfl-3c4e5dc25-a8�	tfl-3c4e5dc25-a9�	ufl-3c4e5dc25-aa�	vfl-3c4e5dc25-ab�	wfl-3c4e5dc25-ac�	xqrstuvw�	y opx�	zy-M�	{z6�	|gfk�	}|z6�	~glambda�	~z6��:z6��gppat���z6��Az6��gand���z6��}����������������!8mY"#��D��fl-3c4e5dc25-b8��fl-3c4e5dc25-b9��fl-3c4e5dc25-ba��fl-3c4e5dc25-bb��fl-3c4e5dc25-bc��fl-3c4e5dc25-bd���������� ������-M���6��|�6��~�6��:�6����6��������g_��gm-3c4e5dc25-c6��������fl-3c4e5dc25-c8����� /����-�����6��R��������gkt��gkf��!8�������fl-3c4e5dc25-d4��fl-3c4e5dc25-d5��fl-3c4e5dc25-d6��fl-3c4e5dc25-d7�������� ������-���A�6��gnull?����6��gquote����6��R���������glit��!8��������fl-3c4e5dc25-dd��fl-3c4e5dc25-de��fl-3c4e5dc25-df��fl-3c4e5dc25-e0��fl-3c4e5dc25-e1��������� ������-���A�6��gequal?����6����6��gunquote����6��R���������gvar��!8�����fl-3c4e5dc25-e8��fl-3c4e5dc25-e9��fl-3c4e5dc25-ea��fl-3c4e5dc25-eb��fl-3c4e5dc25-ec��������� ������-����6��������gy��!8.��������fl-3c4e5dc25-f3��fl-3c4e5dc25-f4��fl-3c4e5dc25-f5��fl-3c4e5dc25-f6��fl-3c4e5dc25-f7��fl-3c4e5dc25-f8���������� ������-���A�6��gpair?����6���6��gvx����6��gcar����6��gvy����6��gcdr����6����6����fl-3c4e5dc25-100��fl-3c4e5dc25-101��fl-3c4e5dc25-102��fl-3c4e5dc25-103��fl-3c4e5dc25-104��������� ������-���A�6�geq?��6���6�C5hxZ]4	

54>"G479;h L]��CDgdummy
		ge		gcs						C>?h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/base/pmatch.scm�
	'
��		"g
macro-typegsyntax-rules�gpatternsgegcsg...C5R4:@Qh<]C4gdummy
		gv					CXch[]���CSgdummy
		
gv		
ge0			
ge			
		
	Cl{}�����	h@�]�������������C�gdummy
		@gv		@gpat			@gg			@ge0			@ge			@gcs			@		@	C�������h8|]���������Ctgdummy
		4gv		4gpat			4ge0			4ge			4gcs			4		4	C>?hhq]!45$@45$@45$@45$	@
6igx
		ggtmp		ggtmp		"	ggtmp		9	ggtmp		P	ggfilenamefsystem/base/pmatch.scm�
	+	��		gg
macro-typegsyntax-rules�gpatternsgvgvgelsege0geg...gvgpatgguardggg...ge0geg...gcsg...gvgpatge0geg...gcsg...C5:R4��h\]CTgdummy
		gv		gkt			gkf						C���h\]CTgdummy
		gv		gkt			gkf						C����h m]Cegdummy
		gv		glit			gkt			gkf						C��hm]Cegdummy
		gv		gvar			gkt			gkf						C���������	hPz]Crgdummy
		Igv		Igx			Igy			Igkt			Igkf			I		I	C��h m]Cegdummy
		gv		glit			gkt			gkf						C>?h��]145$@45$@45$@45$	@4
5$@45$
@6�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp		~�gfilenamefsystem/base/pmatch.scm�
	8	��	�g
macro-typegsyntax-rules�gpatternsgvg_gktgkfgvgktgkfgvgquoteglitgktgkfgvgunquotegvargktgkfgvgxgy�gktgkfgvglitgktgkfC5�RCRgm
		(gfilenamefsystem/base/pmatch.scm�		$
��	s
C6PK*[�v�f�s�sbase/message.gonu�[���GOOF----LE-8-2.0�s]�4h�;]gguile�	�	gdefine-module*�	�	�	gsystem�	gbase�	gmessage�		�	
gfilenameS�	fsystem/base/message.scm�	gimportsS�	
gsrfi�	gsrfi-1�	
�	�	gsrfi-9�	
�	�	gice-9�	gmatch�	�	�	�	gexportsS�	g*current-warning-port*�	g*current-warning-prefix*�	gwarning�	g
warning-type?�	gwarning-type-name�	gwarning-type-description�	 gwarning-type-printer�	!glookup-warning-type�	"g%warning-types�	# !"	�	$gset-current-module�	%$�	&$�	'gformat�	(f~a:~a:~a�	)g	assoc-ref�	*gfilename�	+f<stdin>�	,gline�	-gcolumn�	.f<unknown-location>�	/glocation-string�	0gparameter-fluid�	1gcurrent-warning-port�	2g
make-fluid�	3f;;; �	4g<warning-type>�	5g%make-warning-type-procedure�	6gmake-syntax-transformer�	76�	86�	9gmake-warning-type�	:gmacro�	;g$sc-dispatch�	<;�	=;�	>g_�	?gany�	@>???�	Ag
syntax-object�	Bglambda�	Cgm-44b57084b9-69a�	Dgtop�	ECD�	Fgribcage�	Ggt-44b57084b9-697�	Hgt-44b57084b9-698�	Igt-44b57084b9-699�	JGHI�	KEEE�	Lfl-44b57084b9-69f�	Mfl-44b57084b9-6a0�	Nfl-44b57084b9-6a1�	OLMN�	PFJKO�	QF�	Rgx�	SR�	TE�	Ufl-44b57084b9-69c�	VU�	WFSTV�	Xgshift�	Yg	proc-name�	Zgargs�	[YZ�	\D�	]\\�	^fl-1e8ba8b5a-60�	_fl-1e8ba8b5a-61�	`^_�	aF[]`�	bgkey�	cgvalue�	dgname�	egformals�	fgbody�	gbcdef�	h\\\\\�	ifl-1e8ba8b5a-53�	jfl-1e8ba8b5a-54�	kfl-1e8ba8b5a-55�	lfl-1e8ba8b5a-56�	mfl-1e8ba8b5a-57�	nijklm�	oFghn�	pgmake-procedure-name�	qp�	r\�	sfl-1e8ba8b5a-43�	ts�	uFqrt�	v\�	wfl-1e8ba8b5a-42�	xw�	yFSvx�	zEPQWXQQQQaouy
�	{ghygiene�	|{
�	}ABz|�	~\PQW�	{��Ad~��gdescription��A�~��gprinter��A�~�������gmake-struct��gm-44b57084b9-695���D��gt-1e8ba8b5a-133��gt-1e8ba8b5a-132��gt-1e8ba8b5a-131�������gm-1e8ba8b5a-134���D�������fl-1e8ba8b5a-138��fl-1e8ba8b5a-139��fl-1e8ba8b5a-13a�������F�����g	ctor-args�����fl-1e8ba8b5a-120�����F�v���gctor��gfield������fl-1e8ba8b5a-11c��fl-1e8ba8b5a-11d������F�]���gform��g	type-name��gconstructor-spec��gfield-names��������\\\\��fl-1e8ba8b5a-111��fl-1e8ba8b5a-112��fl-1e8ba8b5a-113��fl-1e8ba8b5a-114��������F�����g
record-layout��gfunctional-setters��gsetters��gcopier��ggetters��gconstructor��ggetter-identifiers��gfield-identifiers������������\\\\\\\\��fl-1e8ba8b5a-e9��fl-1e8ba8b5a-e7��fl-1e8ba8b5a-e5��fl-1e8ba8b5a-e3��fl-1e8ba8b5a-e1��fl-1e8ba8b5a-df��fl-1e8ba8b5a-dd��fl-1e8ba8b5a-db������������F�����fl-1e8ba8b5a-da�����FSv����PQWXQ�QQQ��Q�����A��|��A4~��A
�|����������}����geach-any��>ʌ��gsyntax-violation��������fWrong number of arguments��gidentifier?��������\QW��A5���������f-source expression failed to match any pattern��grecord-type-vtable��������gpwpwpw��gdefault-record-printer��������d����gset-struct-vtable-name!��������gvtable-offset-user��������g%warning-type?-procedure��>?��gm-44b57084b9-6ab���D��gt-44b57084b9-6aa��������fl-44b57084b9-6b0�����F�����fl-44b57084b9-6ad�����FS������Q�XQQQQaouy
��AB�|��gobj��gt-1e8ba8b5a-224��gt-1e8ba8b5a-21e��gt-1e8ba8b5a-21f��gt-1e8ba8b5a-220��gt-1e8ba8b5a-223��gt-1e8ba8b5a-222��gt-1e8ba8b5a-221�����������gm-1e8ba8b5a-225���D���������fl-1e8ba8b5a-229�fl-1e8ba8b5a-22a�fl-1e8ba8b5a-22b�fl-1e8ba8b5a-22c�fl-1e8ba8b5a-22d�fl-1e8ba8b5a-22e�fl-1e8ba8b5a-22f��	F��
g	copier-id�
�fl-1e8ba8b5a-21c�
�Fv
�g	ctor-name��fl-1e8ba8b5a-214��Fv���fl-1e8ba8b5a-212��Fv�glayout��fl-1e8ba8b5a-210��Fv�g
immutable?��fl-1e8ba8b5a-20e� �!Fv �"gfield-count�#"�$fl-1e8ba8b5a-20c�%$�&F#v%�'g
getter-ids�('�)fl-1e8ba8b5a-209�*)�+F(v*�,g	field-ids�-,�.fl-1e8ba8b5a-206�/.�0F-v/�1gpredicate-name�2g
field-spec�3���12�4\\\\\\�5fl-1e8ba8b5a-1f9�6fl-1e8ba8b5a-1fa�7fl-1e8ba8b5a-1fb�8fl-1e8ba8b5a-1fc�9fl-1e8ba8b5a-1fd�:fl-1e8ba8b5a-1fe�;56789:�<F34;�=��Q�XQ	QQQQQQQQ!Q&Q+Q0<���>A�=|�?>�@gand�AA@=|�Bgstruct?�CAB=|�DC>�Egeq?�FAE=|�Gg
struct-vtable�HAG=|�IH>�J\�Q��KA4J�LFIK�MADL�N�?M�O\Q��PA�O�Qgthrow-bad-struct�RQ�SQ�Tg%warning-type-name-procedure�Ugfree-id�Vg
%%on-error�Wgm-44b57084b9-6b7�XWD�YX�Zfl-44b57084b9-6b9�[Z�\FSY[�]XQ\XQQQQaouy�^AV]|�_U^�`_?�ag%%type�bgt-1e8ba8b5a-14b�cgt-1e8ba8b5a-14c�dgt-1e8ba8b5a-14d�egt-1e8ba8b5a-14e�fgt-1e8ba8b5a-14f�ggt-1e8ba8b5a-150�hgt-1e8ba8b5a-151�ibcdefgh�jgm-1e8ba8b5a-152�kjD�lkkkkkkk�mfl-1e8ba8b5a-156�nfl-1e8ba8b5a-157�ofl-1e8ba8b5a-158�pfl-1e8ba8b5a-159�qfl-1e8ba8b5a-15a�rfl-1e8ba8b5a-15b�sfl-1e8ba8b5a-15c�tmnopqrs�uFilt�vggetter�wgindex�xvw�yfl-1e8ba8b5a-149�zfl-1e8ba8b5a-14a�{yz�|Fx]{�}�'
�~\\\�fl-1e8ba8b5a-144��fl-1e8ba8b5a-145��fl-1e8ba8b5a-146������F}~����Q\XQuQQQ|Q�����Aa�|��U���>`�?��gck��gerr��gs������XX��fl-44b57084b9-6bc��fl-44b57084b9-6bd������F�����X�Q\XQQQQaouy
��A��|��gquote��A��|��\�Q\��A4����������g%%index��A��|��U���>`�?��fl-44b57084b9-6c1��fl-44b57084b9-6c2������F�����X�Q\XQQQQaouy
��A��|��A��|���Q\��A
����������g%%copier��A��|��U���>`�?��fl-44b57084b9-6c6��fl-44b57084b9-6c7������F�����X�Q\XQQQQaouy
��A��|��A��|��g%%<warning-type>-set-fields��\�Q\��A�����������gt-44b57084b9-6b6�����fl-44b57084b9-6cb�����F�Y���X�Q\XQQQQaouy
��AB�|����Q\XQuQQQ|Q�����A��|�����gif��A��|��AE�|��AG�|������\�Q\��A4��������g
struct-ref��A��|���Q\��A
��������AQ�|��A��|��A�����������������������\Q\��AT���g#%warning-type-description-procedure��gm-44b57084b9-6d2���D�����fl-44b57084b9-6d4�����FS�����Q�XQQQQaouy��AV�|��U����?���Q�XQuQQQ|Q�����Aa�|��U���>��?������fl-44b57084b9-6d7��fl-44b57084b9-6d8������F�������Q�XQQQQaouy
��A��|��A��|��\�Q���A4����������A��|��U���>��?��fl-44b57084b9-6dc��fl-44b57084b9-6dd������F�������Q�XQQQQaouy
��A��|��A��|���Q���A��������A��|�U�>�?�fl-44b57084b9-6e1�fl-44b57084b9-6e2��F����Q�XQQQQaouy
�	A�|�
A�|�\Q��A��

�
�gt-44b57084b9-6d1��fl-44b57084b9-6e6��F���Q�XQQQQaouy
�AB|��Q�XQuQQQ|Q����A�|��A�|�AE|�AG|��\Q��A4�� A�|�!Q��"A!�# "�$AQ|�%A�|�&A�'%&�($'�)#(�*)�+\Q��,A�+�-g%warning-type-printer-procedure�.gm-44b57084b9-6ed�/.D�0/�1fl-44b57084b9-6ef�21�3FS02�4/Q3XQQQQaouy�5AV4|�6U5�76?�8�Q3XQuQQQ|Q����9Aa8|�:U9�;>7:?�<//�=fl-44b57084b9-6f2�>fl-44b57084b9-6f3�?=>�@F�<?�A/@Q3XQQQQaouy
�BA�A|�CA�A|�D\@Q3�EA4D�FCE�GF�HA�8|�IUH�J>7I?�Kfl-44b57084b9-6f7�Lfl-44b57084b9-6f8�MKL�NF�<M�O/NQ3XQQQQaouy
�PA�O|�QA�O|�RNQ3�SA	R�TQS�UT�VA�8|�WUV�X>7W?�Yfl-44b57084b9-6fc�Zfl-44b57084b9-6fd�[YZ�\F�<[�]/\Q3XQQQQaouy
�^A�]|�_A�]|�`\\Q3�aA�`�b_a�cb�dgt-44b57084b9-6ec�ed�ffl-44b57084b9-701�gf�hFe0g�i/hQ3XQQQQaouy
�jABi|�k�hQ3XQuQQQ|Q����lA�k|�ml�nA�k|�oAEk|�pAGk|�qpl�r\hQ3�sA4r�toqs�uA�k|�vhQ3�wA	v�xulw�yAQk|�zA�k|�{A r�|z{�}yl|�~ntx}�jm~��\Q3��A-���geach��??������?����?����?����g%%set-fields��gdummy��gcheck?��gexpr�����v���gm-44b57084b9-708���D���������fl-44b57084b9-70d��fl-44b57084b9-70e��fl-44b57084b9-70f��fl-44b57084b9-710��fl-44b57084b9-711���������F��������fl-44b57084b9-70a�����FS����gt-1e8ba8b5a-16a��gt-1e8ba8b5a-16c��gt-1e8ba8b5a-16b�������gm-1e8ba8b5a-16d���D�������fl-1e8ba8b5a-171��fl-1e8ba8b5a-172��fl-1e8ba8b5a-173�������F�����fl-1e8ba8b5a-167��fl-1e8ba8b5a-168��fl-1e8ba8b5a-169�������F}~�����Q�XQ�QQQ���
��A��|��\�Q���A4���A���A���A ��������gmap��������glist��gunsupported-warning��f warn about unknown warning types��f&~awarning: unknown warning type `~A'~%��gunused-variable��freport unused variables��f%~a~A: warning: unused variable `~A'~%��gunused-toplevel��f'report unused local top-level variables��f>~a~A: warning: possibly unused local top-level variable `~A'~%��gunbound-variable��f!report possibly unbound variables��f/~a~A: warning: possibly unbound variable `~A'~%��garity-mismatch��f=report procedure arity mismatches (wrong number of arguments)��f2~a~A: warning: wrong number of arguments to `~A'~%��f;~a~A: warning: possibly wrong number of arguments to `~A'~%��gduplicate-case-datum��f-report a duplicate datum in a case expression��fF~a~A: warning: duplicate datum ~S in clause ~S of case expression ~S~%��gbad-case-datum��fEreport a case datum that cannot be meaningfully compared using `eqv?'��fi~a~A: warning: datum ~S cannot be meaningfully compared using `eqv?' in clause ~S of case expression ~S~%��f,report wrong number of arguments to `format'��gwrong-num-args��f~a~A: `format' warning~%��f6~a~A: warning: wrong number of arguments to `format'~%��gnon-literal-format-string��f*~a~A: warning: non-literal format string~%��gwrong-format-string��f(~a~A: warning: ~S: wrong format string~%��g
wrong-port��f(~a~A: warning: ~S: wrong port argument~%��gsyntax-error��g"unexpected-conditional-termination��f%~a~A: warning: ~S: unexpected `~~]'~%��glist->string��gstring-fold-right��gappend��\n��gunexpected-semicolon��f%~a~A: warning: ~S: unexpected `~~;'~%��gunterminated-conditional��f-~a~A: warning: ~S: unterminated conditional~%��gunterminated-iteration��f+~a~A: warning: ~S: unterminated iteration~%��gwrong-format-arg-count��fL~a~A: warning: ~S: wrong number of `format' arguments: expected ~A, got ~A~%��f
any number��f
~aup to ~a��f
~aat least ~a��gnumber->string��f
~a~a to ~a��g
simple-format��fO~a~A: warning: ~S: unsupported format option ~~~A, use (ice-9 format) instead~%��gfind��f#~A: unknown warning type `~A': ~A~%�C5h�3�]4	
#54&>"G'()*+,-.	hH
]	�$645$"45�456Cgloc
		Bgt		*gfilenamefsystem/base/message.scm�
	+
��		,	��			,	��		-	��		.	��		.	!��		.	��		.	��	'	.	,��	+	/	��	1	/	!��	3	/	��	4	/	��	5	0	��	;	0	��	=	0	��	?	-	��	A	1	��		Bgnameglocation-string�C/R40i1i5R42i35R4h�]�C�gname
		gdescription		gprinter			gfilenamefsystem/base/message.scm�
	E
��			gnameg%make-warning-type-procedure�C5R489:=@�ht]Clgt-44b57084b9-697
		gt-44b57084b9-698		gt-44b57084b9-699						C��9�hZ]L6Rga
		gfilenamefsystem/base/message.scm�		E
��		C>�hJ]L6Bgfilenamefsystem/base/message.scm�		E
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/message.scm�
	E
��		nC59R���4ߨ4�4>"G	�5i�4R4h�]�$��CCxgobj
		gfilenamefsystem/base/message.scm�
	E
��		gnameg%warning-type?-procedure�C�R48:=�Nh8]C0gt-44b57084b9-6aa
		
		
C���hZ]L6Rga
		gfilenamefsystem/base/message.scm�		E
��		C>�hJ]L6Bgfilenamefsystem/base/message.scm�		E
��		
CPh]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/message.scm�
	E
��		nC5R4Sh�]�&
�C6zgs
		gfilenamefsystem/base/message.scm�
	E
��		gnameg%warning-type-name-procedure�CTR48:=���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h8]C0gt-44b57084b9-6b6
		
		
C���hZ]L6Rga
		gfilenamefsystem/base/message.scm�		E
��		C>�hJ]L6Bgfilenamefsystem/base/message.scm�		E
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/message.scm�
	E
��	�C5R4Sh�]�&�C6�gs
		gfilenamefsystem/base/message.scm�
	E
��		gnameg#%warning-type-description-procedure�C�R48:=���h:]��C2gerr
		gs					C��h:]��C2gerr
		gs					C	h:]��C2gerr
		gs					C�*h8]C0gt-44b57084b9-6d1
		
		
C���hZ]L6Rga
		gfilenamefsystem/base/message.scm�		E
��		C>�hJ]L6Bgfilenamefsystem/base/message.scm�		E
��		
C,h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/message.scm�
	E
��	�C5R4S h �]�&	�C6}gs
		gfilenamefsystem/base/message.scm�
	E
��		gnameg%warning-type-printer-procedure�C-R48 :=;BGh:]��C2gerr
		gs					CJPUh:]��C2gerr
		gs					CX^ch:]��C2gerr
		gs					C�h8]C0gt-44b57084b9-6ec
		
		
C�� �hZ]L6Rga
		gfilenamefsystem/base/message.scm�		E
��		C>�hJ]L6Bgfilenamefsystem/base/message.scm�		E
��		
C�h]C		
C��h��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/message.scm�
	E
��	�C5 R48�:=������h v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/base/message.scm�
	E
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5�R4�i5he]@]gargs
		gfilenamefsystem/base/message.scm�
	N	��		O		��		C��'�h�][6�gport
		gunused		gname			gfilenamefsystem/base/message.scm�
	_	
��		`	��			C��'�h�][6�gport
		gloc		gname			gfilenamefsystem/base/message.scm�
	e	
��		f	��			C��'�h�][6�gport
		gloc		gname			gfilenamefsystem/base/message.scm�
	k	
��		l	��			C��'�h�][6�gport
		gloc		gname			gfilenamefsystem/base/message.scm�
	q	
��		r	��			C��'��h(�]$[6[6�gport
		&gloc		&gname			&gcertain?			&gfilenamefsystem/base/message.scm�
	w	
��		x	��		y	��		|	��		&	C��'�h�][6�gport
		gloc		gdatum			gclause			g	case-expr			gfilenamefsystem/base/message.scm�
�	
��	�	��			C��'�h�][6�gport
		gloc		gdatum			gclause			g	case-expr			gfilenamefsystem/base/message.scm�
�	
��	�	��			C'��'���������������h�]
&6�C�gc
		gr		gfilenamefsystem/base/message.scm�
�	%��	
�	'��	�	3��	�	+��	�	+��			C����h�]
&6�C�gc
		gr		gfilenamefsystem/base/message.scm�
�	%��	
�	'��	�	3��	�	+��	�	+��			C����h�]
&6�C�gc
		gr		gfilenamefsystem/base/message.scm�
�	%��	
�	'��	�	3��	�	+��	�	+��			C����h�]
&6�C�gc
		gr		gfilenamefsystem/base/message.scm�
�	%��	
�	'��	�	3��	�	+��	�	+��			C����h�]
&6�C�gc
		gr		gfilenamefsystem/base/message.scm�
�	%��	
�	'��	�	3��	�	+��	�	+��			C?���������h�]
&6�C�gc
		gr		gfilenamefsystem/base/message.scm�
�	%��	
�	'��	�	3��	�	+��	�	+��			C'h�7-13"5"5"�";"�"A"�"�"k�$W��&8"
[6�$�(�[6"���"���[6[6�$)�(�&
[6"��i"��e"��a�$@��&*�$�(�	[6"��"��"��"���$@��
&*�$�(�[6"���"���"���"����$n��&X�$M��
&7�$,�(!�[44556"��Z"��V"��R"��N"��J"��F�$n��&X�$M��&7�$,�(!�[44556"���"���"���"���"���"����$n��&X�$M��&7�$,�(!�[44556"��`"��\"��X"��T"��P"��L�$n��&X�$M��&7�$,�(!�[44556"���"���"���"���"���"����$���&��$����$����$���
	
�$�
�(�
�[4455&	&"
4 [	5"<	&4![5"#	�$4"5"4#[	56"���"���"���"���"���"���"����$d��$&N�$C���$.�(#�%[44&556"��l"��h"��d"��`"��\/gport
		�gloc		�grest			�gw		:�gx		:�gw	��gw	�gx	�gw	�gw	$^gx	$^gw	ARgw	o�gx	o�gw	��gx	��gw	��gw	�Pgx	�Pgw	Hgx	Hgw	<gw	a�gx	a�gw	z�gx	z�gw	��gw	�Bgx	�Bgw	�:gx	�:gw	.gw	S>gx	S>gw	l6gx	l6gw	}2gx	}2gw		�.gx	
�.gw	�&gw	O�gx	O�gw	h�gx	h�gw	}�.gfilenamefsystem/base/message.scm�
�	
��	
�	��	P�	��	W�	��	o�	����	����	����	����	����	���	��I�	��V�	����	����	����	����	%����	����	����	����	��&�	��,�	��/�	��4�	%��8�	��:�	��<�	��@�	����	����	����	����	%����	����	����	����	���	���	��!�	��&�	%��*�	��,�	��.�	��2�	����	����	����	����	%����	����	����	!����	����	%����	����	����	����	!����	����	���	���	��	�	$���	��&�	��*�	����	����	����	����	%����	����	����	����	��K		�	
	C5"R�4Sh n]L�&
�"	45�Cfgwt
		 gfilenamefsystem/base/message.scm�
�	��	�	��	�	
��		 C"h�]O6�gname
		gfilenamefsystem/base/message.scm�
�
��	�	��		gnameglookup-warning-type�g
documentationf2Return the warning type NAME or `#f' if not found.�C!R!1'�/4h`�-134545"456�$�&	�45@"���"����gtype
			Zglocation			Zgargs				Zgwt			Zgport			Zgfilenamefsystem/base/message.scm�
�
��	
�	��	�	��	�	��	#�	��	$�	��	0�	��	0�	��	3�	��	7�	��	:�	��	E�	��	H�	��	R�	��			Z	
	gnamegwarning�g
documentationfjEmit a warning of type TYPE for source location LOCATION (a source
property alist) using the data in ARGS.�CRC�gm
		,grtd
��gfilenamefsystem/base/message.scm�		
���	+
���	>	���	:
���	B	���	B	���	B	���	@
���	E
���	N	��P	]		��/�	N	��/�	L
��1��
��3��
��	3�
C6PK*[;�m��base/language.gonu�[���GOOF----LE-8-2.0�]l4h$]gguile�	�	gdefine-module*�	�	�	gsystem�	gbase�	glanguage�		�	
gfilenameS�	fsystem/base/language.scm�	gimportsS�	
gsyntax�	
�	�	�	gexportsS�	gdefine-language�	g	language?�	glookup-language�	g
make-language�	g
language-name�	glanguage-title�	glanguage-reader�	glanguage-printer�	glanguage-parser�	glanguage-compilers�	glanguage-decompilers�	glanguage-evaluator�	glanguage-joiner�	glanguage-for-humans?�	 g!language-make-default-environment�	!glookup-compilation-order�	"glookup-decompilation-order�	#ginvalidate-compilation-cache!�	$gdefault-environment�	%g*current-language*�	& !"#$%�	'g
re-exportsS�	(gcurrent-language�	)(�	*gset-current-module�	+*�	,*�	-gmake-record-type�	.f
<language>�	/gname�	0gtitle�	1greader�	2gprinter�	3gparser�	4g	compilers�	5gdecompilers�	6g	evaluator�	7gjoiner�	8gfor-humans?�	9gmake-default-environment�	:/0123456789�	;g
<language>�	<gmake-fresh-user-module�	=grecord-constructor�	>g%compute-initargs�	?grecord-predicate�	@gmake-procedure-with-setter�	Agrecord-accessor�	Bgrecord-modifier�	Cgmake-syntax-transformer�	DC�	EC�	Fgmacro�	Gg$sc-dispatch�	HG�	IG�	Jg_�	Kgany�	LJK��	Mg
syntax->datum�	NM�	OM�	Pg
datum->syntax�	QP�	RP�	Sgbegin�	T#�	Ugdefine�	VgnameS�	Wgquote�	Xgsyntax-violation�	YX�	ZX�	[f-source expression failed to match any pattern�	\gresolve-module�	]gspec�	^]�	_g
module-bound?�	`g
module-ref�	agerror�	bfno such language�	cg*compilation-cache*�	dg*decompilation-cache*�	egreverse!�	fgmemq�	ggor-map�	hgcompute-translation-order�	ig	assoc-ref�	jgand=>�	kgparameter-fluid�C5h�

]4	
&')5	4,>"G4-i.:5;R/0123�456�7�8�9<i�4=i;i5>h.-13L4L5@&gargs
						


COR4?i;i5R4@i4Ai;i/54Bi;i/55R4@i4Ai;i054Bi;i055R4@i4Ai;i154Bi;i155R4@i4Ai;i254Bi;i255R4@i4Ai;i354Bi;i355R4@i4Ai;i454Bi;i455R4@i4Ai;i554Bi;i555R4@i4Ai;i654Bi;i655R4@i4Ai;i754Bi;i755R4@i4Ai;i854Bi;i855R4@i4Ai;i954Bi;i955 R4EFILORSTUVWh(x-13���Cpgname
			(gspec			(gfilenamefsystem/base/language.scm�
	7
��		8	��			(
Chl]	45L4?6dgargs
		gv			gfilenamefsystem/base/language.scm�		7
��		CZ[h(j]	45$O@6bgy
		'gtmp		'gfilenamefsystem/base/language.scm�
	7
��		'C5R\^_`abh0�]	4��545$66�gname
		.gm		.gfilenamefsystem/base/language.scm�
	<
��		=	��		=	��		=	��		=	��		>	��		>	��	&	?	��	*	@	��	.	@	��		.gnameglookup-language�CRcRdRdch�]  C�gfilenamefsystem/base/language.scm�
	E
��		F	��		F	��		G	��		G	��		

gnameginvalidate-compilation-cache!�C#Refgh~]L�L��L�6vgpair
		gfilenamefsystem/base/language.scm�
	T	��		U	��		U	2��	
	U	&��		U	��		ChX�]45$3L&645$CLO4L5645"����gfrom
		Qgseen		Qgfilenamefsystem/base/language.scm�
	N	��		P	
��	
	O	��		R	��		S	��	(	O	��	8	V	��	@	T	
��	A	Q	��	Q	Q	��		Q	gnameglp�Chh8�]45$OQ6456�gfrom
		6gto		6glanguage-translators			6glp			'gfilenamefsystem/base/language.scm�
	I
��		K		��	
	J	��		N	��	%	N	��	'	N	��	,	L	$��	6	L	��			6	gnamegcompute-translation-order�ChRichh8]�45$C45�� C�gfrom
		7gto		7gkey			7gt			7gorder		(	7gfilenamefsystem/base/language.scm�
	X
��		Y	
��		Y	��	
	Z	��		Z	��		[	��	(	[	��	/	]	��	4	\	
��
		7	gnameglookup-compilation-order�C!Ridjheh@]�45$C4455�� Cgfrom
		>gto		>gkey			>gt			>gorder		/	>gfilenamefsystem/base/language.scm�
	`
��		a	
��		a	��	
	b	��		b	��		d	��	!	e	��	/	d	��	/	d	��	6	g	&��	;	g	
��		>	gnameglookup-decompilation-order�C"R h(]445$"4556�glang
		!gfilenamefsystem/base/language.scm�
	j
��		l	��		m	��		m	��		m	��		l	��	!	l	��		!gnamegdefault-environment�g
documentationfDReturn the default compilation environment for source language LANG.�C$R4ki(i5%RCgm
		0gslots
	u�gconstructor	u�gfilenamefsystem/base/language.scm�		
��	>	*
��	O	0	
��	T	1	���	*
���	<
���	B	���	B
���	C	���	C
��o	E
��	�	I
��
�	X
��j	`
��
�	j
��
�	v	��
�	v
��	
�
C6PK*[��3�L�Lbase/syntax.gonu�[���GOOF----LE-8-2.0�L]4h�]gguile�	�	gdefine-module*�	�	�	gsystem�	gbase�	gsyntax�		�	
gfilenameS�	fsystem/base/syntax.scm�	gexportsS�	
g%compute-initargs�	gdefine-type�	g
define-record�	gdefine-record/keywords�	grecord-case�	gtransform-record�	
�	gset-current-module�	�	�	gstring->symbol�	gstring-trim-both�	gsymbol->string�	gsymbol-trim-both�	glist->char-set�	<>�	g
trim-brackets�	gmake-syntax-transformer�	�	 �	!gmacro�	"g$sc-dispatch�	#"�	$"�	%g_�	&gany�	'%&��	(g
syntax->datum�	)(�	*(�	+g
datum->syntax�	,+�	-+�	.g
kw-arg-ref�	/gprinterS�	0gcommon-slotsS�	1gbegin�	2gappend�	32�	42�	5gmap�	6gdefine�	7g
symbol-append�	8g-�	9gmake-procedure-with-setter�	:glambda�	;gx�	<;�	=g
struct-ref�	>gv�	?;>�	@gstruct-set!�	A>�	Bgiota�	Cglength�	Dgsyntax-violation�	ED�	FD�	Gf-source expression failed to match any pattern�	Hgmake-record-type�	Igquote�	Jg	list-tail�	Kg
module-gensym�	Lfdefrec�	Mgmake-�	Nglet�	Ogcond�	Pgnull?�	Qgelse�	Rg_x�	Sgcar�	Tgset!�	Ugcdr�	VR�	Wgmake-struct�	Xg?�	Ygrecord-predicate�	Zgrecord-accessor�	[grecord-modifier�	\gslots�	]glist�	^gcons�	_gconstructor�	`grecord-constructor�	agargs�	bgapply�	c
a\�	db_c�	e:ad�	fe�	ggassq�	hgerror�	ifunbound slot�	jgkeyword?�	kgkeyword->symbol�	lgmemq�	mgfilter�	ngpair?�	ofunknown slot�	pfslot already set�	qftoo many initargs�	rgeach-any�	s&r��	t%s��	ug
syntax-object�	vgr�	wgtop�	xw�	ygribcage�	zgrecord�	{gclause�	|z{�	}xx�	~fl-3d2ad63ef-21d�	fl-3d2ad63ef-21e��~��y|}���y��;��x��fl-3d2ad63ef-21a�����y�����x�����ghygiene�����uv����grtd��u�����greverse!��glp��gclauses��gout�������xxx��fl-3d2ad63ef-265��fl-3d2ad63ef-266��fl-3d2ad63ef-267�������y�����gprocess-clause�����x��fl-3d2ad63ef-225�����y�����v���fl-3d2ad63ef-221��fl-3d2ad63ef-222������y�}���x��������	��uQ����uh����funhandled record��u�����uv�������������gfree-id�������s������ge0��ge1������fl-3d2ad63ef-26f��fl-3d2ad63ef-270������y�}���x���������
��uQ�����&���fbad else clause placement��grest�������fl-3d2ad63ef-275��fl-3d2ad63ef-276��fl-3d2ad63ef-277�������y�����x���������
��u;����uQ����sr����&���&&���r���ginfix�����fl-3d2ad63ef-22e�����y�����gtag��gfields��gexprs�������fl-3d2ad63ef-22b��fl-3d2ad63ef-22c��fl-3d2ad63ef-22d�������y�����x������������u�������geach��&&�������&�s��geq?��gf��gaccessor���������xxxxx��fl-3d2ad63ef-233��fl-3d2ad63ef-234��fl-3d2ad63ef-235��fl-3d2ad63ef-236��fl-3d2ad63ef-237���������y�����x������������
��u�����u�����uN����5��5��uv�������&&r��glet*��g	processed��v����fl-3d2ad63ef-25e��fl-3d2ad63ef-25f��fl-3d2ad63ef-260�������y�����x��������	��u�����g
struct-vtable��u�����uO���frec�frtd�g->�gunquote�fbad -> form�g<�g>�gand�greverse�	gif�
	�
�C5h�9r]4	
54>"Gh�]44556�gsym
		gpred		gfilenamefsystem/base/syntax.scm�
	
��			��			$��			��			��			gnamegsymbol-trim-both�CRh�]456�gsym
		gfilenamefsystem/base/syntax.scm�
	
��			��			(��	
		��			��		gnameg
trim-brackets�CR4 !$'*-./01454h(�]L$�L"�4L�5��C�gdef
		&gfilenamefsystem/base/syntax.scm�
	(	��		)	��	
	)	(��	
	*	/��		*	,��		+	,��		)	��	!	-	��	#	)	��
		&C6789:<=;?@A
h@�]44L55	
	���C�gcommon-slot
		?gi		?gfilenamefsystem/base/syntax.scm�
	/	��		0	��		0	!��		0	0��		1	0��		0	!��		0	��		?	CBCh��-13�$�"�$�"4545$"44O54O4	4
5555�Czgname
		�grest		�gname		(�gopts		(�gt		>	Pgprinter		P�gcommon-slots		P�gfilenamefsystem/base/syntax.scm�
	#
��		$	��		$	��		$	��		%	��	 	%	��	#	%	��	(	%	*��	(	$	��	-	&	��	6	'	��	>	'	��	M	'	=��	P	&	��	V	(	��	Z	(	��	j	/	��	v	5	"��	y	5	(���	5	"���	/	���	(	��		�
Chj]	45L4?6bgargs
		gv			gfilenamefsystem/base/syntax.scm�		#
��		CFGh(h]	45$O@6`gy
		'gtmp		'gfilenamefsystem/base/syntax.scm�
	#
��		'C5R4 !$'*-5ht]�$�CClgslot
		gfilenamefsystem/base/syntax.scm�
	?	��		?	-��			?	)��		?	:��		C16HIh(�]("���$C�4L�5�C�gslots
		%gfilenamefsystem/base/syntax.scm�
	E	��		F	��			F	��		F	;��		F	2��		F	-��		F	��		G	��		H	!��		H	-��	!	H	1��	#	H	-��	$	H	��		%gnameglp�CJCKL7M4NOPQNRSTUV
hHy]�L��LLL	���Cqgo
		Egfilenamefsystem/base/syntax.scm�
	L	��		M	��		M	��		M	;��		M	��		ECWXY6789ZI[h8�]4L5LLC}gsname
		4gfilenamefsystem/base/syntax.scm�
	T	��		U	��		U	��		U	.��		U	��		U	��		4Ch�-13	�$�"�$��"454545$	"���	OQ454
4554
54545�4O5
���454O5����C�g	name-form
		gslots		gname		gprinter		+g
slot-names		6gstem		?glp		u�greqs	��gopts	��gtail	��
gfilenamefsystem/base/syntax.scm�
	<
��		=	��		=	��		=	%��		=	��		>	��	"	>	��	%	>	)��	+	=	��	.	?	��	6	=	��	9	A	��	?	=	��	C	B	��	J	C	(��	R	B	��	]	D	)��	b	D	5��	g	D	D��	h	B	��	u	E	���	E	���	I	���	I	&���	I	���	E	���	J	���	J	$���	J	���	E	���	K	
���	K	���	K	$���	K	���	K	
���	L	���	K	
���	B	���	S	���	S	$���	S	���	B	���	T		��	B	��-		
Chj]	45L4?6bgargs
		gv			gfilenamefsystem/base/syntax.scm�		<
��		CFGh(h]	45$O@6`gy
		'gtmp		'gfilenamefsystem/base/syntax.scm�
	<
��		'C5R4 !$'*-5ht]�$�CClgslot
		gfilenamefsystem/base/syntax.scm�
	`	��		`	-��			`	)��		`	:��		C16HI7MN\]^Ih(�]�$���CC�gslot
		#gfilenamefsystem/base/syntax.scm�
	g	#��		h	)��			h	%��		i	)��		i	2��		i	)��		i	>��		i	)��		j	)��
		#C_`fXY6789ZI[h8�]4L5LLC}gsname
		4gfilenamefsystem/base/syntax.scm�
	p	��		q	��		q	��		q	.��		q	��		q	��		4Ch��-13�$�"�$��"454545$	"���4	
5
45���4	54O5����C�g	name-form
		�gslots		�gname		�gprinter		+�g
slot-names		6�gstem		?�gfilenamefsystem/base/syntax.scm�
	]
��		^	��		^	��		^	%��		^	��		_	��	"	_	��	%	_	)��	+	^	��	.	`	��	6	^	��	9	b	��	?	^	��	C	c	��	J	d	(��	R	c	��	]	e	)��	b	e	5��	g	e	D��	h	c	��	p	f	��	t	f	��	x	f	��	z	c	��		g	���	c	���	o	���	o	$���	o	���	c	���	p		���	c	��!		�
Chj]	45L4?6bgargs
		gv			gfilenamefsystem/base/syntax.scm�		]
��		CFGh(h]	45$O@6`gy
		'gtmp		'gfilenamefsystem/base/syntax.scm�
	]
��		'C5R5ghih@�]�$�"4L5$�C�$�CLL6�gslot
		@gname		@gt			@gfilenamefsystem/base/syntax.scm�
	y		��		z	��			z	��		z	(��		z	��		{	��		{	
��	,	|	��	0	{	
��	3	|	!��	8	}	 ��	@	}	��
		@Cjklgmnhopq
h��]""�(O64�5$i4�545$"4455�$	
645$
	6������"��t(
	6����$�"���"��5"��&�gargs
	�gslots	�gin		�g
positional		�gout		�gsym		1�gslot	��gfilenamefsystem/base/syntax.scm�
	w
��			��	�	��		y	��	�	��	#�	��	%�	��	)�	��	*�	��	/�	"��	1�	��	1�	��	4�	��	@�	
��	F�	��	K�	��	U�	��	V�	��	Z�	��	^�	��	b�	
��	c�	
��	o�	��	s�	 ��	y�	��	|�	��	~�	����	,����	!����	����	����	
����	����	
����	����	����	
����	����	����	$����	����	����	���		���		-���		��/	�	gnameg%compute-initargs�C
R4 !$t��$��hT]L�6Lgfilenamefsystem/base/syntax.scm�		�	��	�	��		
C���hu]��L�6mge0
		ge1		gfilenamefsystem/base/syntax.scm�	�	��	�	��			C�D���h�]��6�ge0
		ge1		grest			gfilenamefsystem/base/syntax.scm�	�	&��	�	&��	�	��			C�($h]C		
C�+78(h(�]4L4L4555�4L5�C�gv0
		%gf0		%gf1			%gfilenamefsystem/base/syntax.scm�	�	(��	
�	7��	�	L��	�	O��	�	7��	�	(��	�	!��	�	(��	$�	!��
		%	Cs+78(h(�]4L4L4555�4L5�C�gf0
		%gf1		%gfilenamefsystem/base/syntax.scm�	�	(��	
�	7��	�	L��	�	O��	�	7��	�	(��	�	!��	�	(��	$�	!��
		%	CFG	hh�]45$@45$LLLO@45$LLLO@6�gfields
		agtmp	
	agtmp		!	agtmp		A	agfilenamefsystem/base/syntax.scm�
�	��		agnameglp�C$�h]C		
Csh:]�C2ge0
		ge1					CFG������hX]�CPgtmp-3d2ad63ef-23e
		
gtmp-3d2ad63ef-23d		
		
	Ch(p]45���Chgtag
		#gf		#gaccessor			#ge0			#ge1			#		#	Ch�B]L4455OLQ4545$4?")45$4?"
4	54
5$4?"
4	5L�6:g<foo>
	�gf0	�ge0		�grest		�ginfix		�glp		 	3gtmp		;	zgtmp		W	wgtmp		}�gtmp	��
gfilenamefsystem/base/syntax.scm�	�	��	
�	'��	�	��	�	��	 �	��	}�	
����	����	��		�	CFGh��]"45$O@45$O@45$@45$LLO@	
6�gclauses
		ygout		ygtmp		
	ygtmp		&	ygtmp		B	ygtmp		Y	ygfilenamefsystem/base/syntax.scm�
�	��		y	gnameglp�C$����h(Q]L�CIgr
		#grtd		#g	processed			#		#	CFG	hP�]OLQ4545$O@6�grecord
		Kgclause		Kglp			!gtmp		$	Kgtmp		/	Kgfilenamefsystem/base/syntax.scm�	�	��	�	��	�	��	$�		��		K	CFGh(j]	45$O@6bgx
		'gtmp		'gfilenamefsystem/base/syntax.scm�
�	��		'C5R4 !$'*-K278�Ih��]#"�(C��$�������$
�"����$6�44L44L55��55"����44L55�"��^�"��Q"��F�gx
	�grecord-stem	�gslots		�gin		�gout		�gslot		 �garg		 �gfilenamefsystem/base/syntax.scm�
�	��	�	��	�	��	�	��	�	��	�	��		��		��	 	��	'	��	+	��	.	��	8	��	;	��	?	��	B	��	C	��	F	$��	I�	��	L�	��	R�	��	V�	��	X�	2��	\�	��	a�	��	d	8��	g	8��	i	$��	m	��	u	��	x
	!��	z
	0��	{�	��	~�	����	����	����	2����	����	���
	0���
	*���
	���	���	����	����	����	��0	�	gnamegfurther-predicates�C782h�]#"�(C��$�������$,�44L55�"����$6�44L44L55��55"��r�"��e���44L55�"��0"��%gx
	�grecord-stem	�gslots		�gin		�gout		�gslot		 �garg		 �gslot	��gfilenamefsystem/base/syntax.scm�

	��		��		��		��		��		��		��		��	 	��	'	��	+	��	.	��	1	��	4�	��	:�	��	>�	��	@	2��	D	��	I	��	L	"��	O	��	W	��	Z	��	^	��	a	��	b	��	e	$��	h	��	k�	��	q�	��	u�	��	w	2��	{	���	���	1���	1���	$���	���	���	���	���!	���"	���"	.���"	&���	����	����	����	���	2���	���	���"	���"	���!	���	���	���	��;	�	gnameglet-clauses�CC7M845h �]�$�&L��6CC�gy
		 gfilenamefsystem/base/syntax.scm�
*	��	+	'��		+	��	+	6��	+	>��	+	"��	,	2��	,	"��			 Chhx�]�$g�&O45	�$9��4�4L554L�4LO�55�C	
6�4L�5�CC�gx
		sgform	$	Ygs		.	>gfilenamefsystem/base/syntax.scm�
#	��	$	��		$	��	%	��	%	��	$	��	&	��	&	��	 &	
��	#'	��	$'	��	'(	��	+(	%��	.(	7��	.(	,��	1�	��	7�	��	;�	��	@(	��	A(	��	F)	��	G*	��	S.	��	U*	��	W(	��	]/	��	a/	��	d0	��	e0	 ��	l0	4��	n0	 ��	o0	��!		sgnamegtransform-expr�CQ78�N5h��]!�&C�����44L55L44LL55��	44LL55�$
4
L5"��C�gclause
	�gstem	�gslots		�gbody		�grecord-type		3�gfilenamefsystem/base/syntax.scm�
1	��	2	��	2	��	2	��	4	��	5	��	6	��	4	
��	 7	��	$7	.��	%�	��	+�	��	/�	��	17	B��	37	��	37	��	78	��	A9	��	D9	 ��	P9	��	Q8	��	U:	��	X:	��	d:	��	g;	��	k;	��	l<	��	z=	��	{8	��	�gnamegprocess-clause�C��578h�]4L5LCygslot
		gfilenamefsystem/base/syntax.scm�
@	��	�	��	�	��	�	��	A	��		COgQ2h�h�L-1345454�5OOOO	QQQQ		
4O�5��
4	5
4
5$
"4
5
�CDgtype-and-common
		�grecord		�gclauses			�gr		�grtd		�g	type-stem		�gfurther-predicates		N�glet-clauses		N�gtransform-expr		N�gprocess-clause			N�gclauses	
��gfilenamefsystem/base/syntax.scm�
�
��	
�	��	�	��	�	��	�	
��	�	��	�	
��	�	��	�	"��	�	��	�	��	v>	���@	���B	���@	���>	���C	���C	���D	���D	���D	���D	���F	���F	%���F	���>	��		�	
	Chk]	45L4?6cgargs
		gv			gfilenamefsystem/base/syntax.scm�	�
��		CFGh(i]	45$O@6agy
		'gtmp		'gfilenamefsystem/base/syntax.scm�
�
��		'C5RCjgm
		(gfilenamefsystem/base/syntax.scm�		
��	
���	
���	w
��	9�
C6PK*[�y�����base/lalr.gonu�[���GOOF----LE-8-2.0p�]b4h�g]gguile�	�	gdefine-module*�	�	�	gsystem�	gbase�	glalr�		�	
gfilenameS�	fsystem/base/lalr.scm�	gimportsS�	
gsrfi�	gsrfi-9�	
�	�	�	gexportsS�	glalr-parser�	gprint-states�	gmake-lexical-token�	glexical-token?�	glexical-token-category�	glexical-token-source�	glexical-token-value�	gmake-source-location�	gsource-location?�	gsource-location-input�	gsource-location-line�	gsource-location-column�	gsource-location-offset�	 gsource-location-length�	!g"source-location->source-properties�	"g	lr-driver�	#g
glr-driver�	$ !"#�	%gset-current-module�	&%�	'%�	(f2.5.0�	)g*lalr-scm-version*�	*gprocess-use-modules�	+*�	,*�	-gice-9�	.gpretty-print�	/-.�	0/�	1gpprint�	2gsymbol?�	3g
lalr-keyword?�	4gmake-syntax-transformer�	54�	64�	7g
BITS-PER-WORD�	8gmacro�	9g$sc-dispatch�	:9�	;9�	<g_�	=gany�	><=��	?g
syntax->datum�	@?�	A?�	Bg
datum->syntax�	CB�	DB�	Egsyntax-violation�	FE�	GE�	Hf-source expression failed to match any pattern�	Ig
logical-or�	Jglogior�	Kg
lalr-error�	Lgerror�	Mgsupports-source-properties?�	Ngsource-property�	Ogloc�	Pg
lexical-token�	Qgset-source-property!�	Rgthrow-bad-struct�	SR�	TR�	Ugnote-source-location�	Vg%make-lexical-token-procedure�	W<===�	Xg
syntax-object�	Yglambda�	Zgm-1e9d51c93-35�	[gtop�	\Z[�	]gribcage�	^gt-1e9d51c93-32�	_gt-1e9d51c93-33�	`gt-1e9d51c93-34�	a^_`�	b\\\�	cfl-1e9d51c93-3a�	dfl-1e9d51c93-3b�	efl-1e9d51c93-3c�	fcde�	g]abf�	h]�	igx�	ji�	k\�	lfl-1e9d51c93-37�	ml�	n]jkm�	ogshift�	pg	proc-name�	qgargs�	rpq�	s[�	tss�	ufl-1e8ba8b5a-60�	vfl-1e8ba8b5a-61�	wuv�	x]rtw�	ygkey�	zgvalue�	{gname�	|gformals�	}gbody�	~yz{|}�	sssss��fl-1e8ba8b5a-53��fl-1e8ba8b5a-54��fl-1e8ba8b5a-55��fl-1e8ba8b5a-56��fl-1e8ba8b5a-57���������]~���gmake-procedure-name�����s��fl-1e8ba8b5a-43�����]�����s��fl-1e8ba8b5a-42�����]j����\ghnohhhhx���
��ghygiene���
��XY����gcategory��sghn�����X�����gsource��X�����Xz���������gmake-struct��gm-1e9d51c93-30���[��gt-1e8ba8b5a-133��gt-1e8ba8b5a-132��gt-1e8ba8b5a-131�������gm-1e8ba8b5a-134���[�������fl-1e8ba8b5a-138��fl-1e8ba8b5a-139��fl-1e8ba8b5a-13a�������]�����g	ctor-args�����fl-1e8ba8b5a-120�����]�����gctor��gfield������fl-1e8ba8b5a-11c��fl-1e8ba8b5a-11d������]�t���gform��g	type-name��gconstructor-spec��gfield-names��������ssss��fl-1e8ba8b5a-111��fl-1e8ba8b5a-112��fl-1e8ba8b5a-113��fl-1e8ba8b5a-114��������]�����g
record-layout��gfunctional-setters��gsetters��gcopier��ggetters��gconstructor��ggetter-identifiers��gfield-identifiers������������ssssssss��fl-1e8ba8b5a-e9��fl-1e8ba8b5a-e7��fl-1e8ba8b5a-e5��fl-1e8ba8b5a-e3��fl-1e8ba8b5a-e1��fl-1e8ba8b5a-df��fl-1e8ba8b5a-dd��fl-1e8ba8b5a-db������������]�����fl-1e8ba8b5a-da�����]j�����ghnoh�hhh��h�����X�����XP����X
�����������������geach-any��<ጤ�E��E��fWrong number of arguments��gidentifier?��������shn��XV����grecord-type-vtable��������gpwpwpw��gdefault-record-printer����������z��gset-struct-vtable-name!��������gvtable-offset-user��������g%lexical-token?-procedure��<=��gm-1e9d51c93-46���[��gt-1e9d51c93-45�������fl-1e9d51c93-4b��]���fl-1e9d51c93-48��]j���hohhhhx���
�XY��gobj�	gt-1e8ba8b5a-224�
gt-1e8ba8b5a-21e�gt-1e8ba8b5a-21f�gt-1e8ba8b5a-220�
gt-1e8ba8b5a-223�gt-1e8ba8b5a-222�gt-1e8ba8b5a-221�	

�gm-1e8ba8b5a-225�[��fl-1e8ba8b5a-229�fl-1e8ba8b5a-22a�fl-1e8ba8b5a-22b�fl-1e8ba8b5a-22c�fl-1e8ba8b5a-22d�fl-1e8ba8b5a-22e�fl-1e8ba8b5a-22f��]�g	copier-id��fl-1e8ba8b5a-21c� �!]� �"g	ctor-name�#"�$fl-1e8ba8b5a-214�%$�&]#�%�'��(fl-1e8ba8b5a-212�)(�*]'�)�+glayout�,+�-fl-1e8ba8b5a-210�.-�/],�.�0g
immutable?�10�2fl-1e8ba8b5a-20e�32�4]1�3�5gfield-count�65�7fl-1e8ba8b5a-20c�87�9]6�8�:g
getter-ids�;:�<fl-1e8ba8b5a-209�=<�>];�=�?g	field-ids�@?�Afl-1e8ba8b5a-206�BA�C]@�B�Dgpredicate-name�Eg
field-spec�F0���DE�Gssssss�Hfl-1e8ba8b5a-1f9�Ifl-1e8ba8b5a-1fa�Jfl-1e8ba8b5a-1fb�Kfl-1e8ba8b5a-1fc�Lfl-1e8ba8b5a-1fd�Mfl-1e8ba8b5a-1fe�NHIJKLM�O]FGN�P�hohhhhh!h&h*h/h4h9h>hCO���QXP��RQ�Sgand�TXSP��Ugstruct?�VXUP��WVQ�Xgeq?�YXXP��Zg
struct-vtable�[XZP��\[Q�]sh�^XP]��_Y\^�`TW_�aR`�bsh�cX�b��dg!%lexical-token-category-procedure�egfree-id�fg
%%on-error�ggm-1e9d51c93-52�hg[�ih�jfl-1e9d51c93-54�kj�l]jik�mhhlohhhhx����nXfm��oen�po=�qg%%type�rgt-1e8ba8b5a-14b�sgt-1e8ba8b5a-14c�tgt-1e8ba8b5a-14d�ugt-1e8ba8b5a-14e�vgt-1e8ba8b5a-14f�wgt-1e8ba8b5a-150�xgt-1e8ba8b5a-151�yrstuvwx�zgm-1e8ba8b5a-152�{z[�|{{{{{{{�}fl-1e8ba8b5a-156�~fl-1e8ba8b5a-157�fl-1e8ba8b5a-158��fl-1e8ba8b5a-159��fl-1e8ba8b5a-15a��fl-1e8ba8b5a-15b��fl-1e8ba8b5a-15c��}~������]y|���ggetter��gindex������fl-1e8ba8b5a-149��fl-1e8ba8b5a-14a������]�t����:��sss��fl-1e8ba8b5a-144��fl-1e8ba8b5a-145��fl-1e8ba8b5a-146�������]������hloh�hhh�h�����Xq����e���<p�=��gck��gerr��gs������hh��fl-1e9d51c93-57��fl-1e9d51c93-58������]�����h�hlohhhhx���
��X�����gquote��X�����s�hl��XP�����������g%%index��X�����e���<p�=��fl-1e9d51c93-5c��fl-1e9d51c93-5d������]�����h�hlohhhhx���
��X�����X������hl��X
�����������g%%copier��X�����e���<p�=��fl-1e9d51c93-61��fl-1e9d51c93-62������]�����h�hlohhhhx���
��X�����X�����g%%lexical-token-set-fields��s�hl��X������������gt-1e9d51c93-51�����fl-1e9d51c93-66�����]�i���h�hlohhhhx���
��XY������hloh�hhh�h�����X��������gif��X�����XX����XZ��������s�hl��XP���������g
struct-ref��X������hl��X
���������XR����X�����X������������������������shl��Xd����g%lexical-token-source-procedure��gm-1e9d51c93-6d���[�����fl-1e9d51c93-6f�����]j�����h�ohhhhx�����Xf����e����=���h�oh�hhh�h�����Xq����e���<��=������fl-1e9d51c93-72��fl-1e9d51c93-73������]�������h�ohhhhx���
��X�����X�����s�h��XP������X����e�<�=�fl-1e9d51c93-77�fl-1e9d51c93-78��	]���
�	h�ohhhhx���
�X�
��X�
��
	h��X
����X����e�<�=�fl-1e9d51c93-7c�fl-1e9d51c93-7d��]����h�ohhhhx���
�X���X���sh��X�����gt-1e9d51c93-6c� �!fl-1e9d51c93-81�"!�#] �"�$�#h�ohhhhx���
�%XY$��&�#h�oh�hhh�h����'X�&��('�)X�&��*XX&��+XZ&��,+'�-s#h��.XP-��/*,.�0X�&��1#h��2X1��30'2�4XR&��5X�&��6X-��756�84'7�9)/38�:%(9�;sh��<X�;��=g%lexical-token-value-procedure�>gm-1e9d51c93-88�?>[�@?�Afl-1e9d51c93-8a�BA�C]j@B�D?hCohhhhx����EXfD��FeE�GF=�H�hCoh�hhh�h����IXqH��JeI�K<GJ=�L??�Mfl-1e9d51c93-8d�Nfl-1e9d51c93-8e�OMN�P]�LO�Q?PhCohhhhx���
�RX�Q��SX�Q��TsPhC�UXPT��VSU�WV�XX�H��YeX�Z<GY=�[fl-1e9d51c93-92�\fl-1e9d51c93-93�][\�^]�L]�_?^hCohhhhx���
�`X�_��aX�_��b^hC�cX	b��dac�ed�fX�H��gef�h<Gg=�ifl-1e9d51c93-97�jfl-1e9d51c93-98�kij�l]�Lk�m?lhCohhhhx���
�nX�m��oX�m��pslhC�qX�p��roq�sr�tgt-1e9d51c93-87�ut�vfl-1e9d51c93-9c�wv�x]u@w�y?xhCohhhhx���
�zXYy��{�xhCoh�hhh�h����|X�{��}|�~X�{��XX{���XZ{����|��sxhC��XP��������X�{���xhC��X	�����|���XR{���X�{���X���������|���~�����z}���shC��X=����geach��==������=����=����=����g%%set-fields��gdummy��gcheck?��gexpr���������gm-1e9d51c93-a3���[���������fl-1e9d51c93-a8��fl-1e9d51c93-a9��fl-1e9d51c93-aa��fl-1e9d51c93-ab��fl-1e9d51c93-ac���������]��������fl-1e9d51c93-a5�����]j����gt-1e8ba8b5a-16a��gt-1e8ba8b5a-16c��gt-1e8ba8b5a-16b�������gm-1e8ba8b5a-16d���[�������fl-1e8ba8b5a-171��fl-1e8ba8b5a-172��fl-1e8ba8b5a-173�������]�����fl-1e8ba8b5a-167��fl-1e8ba8b5a-168��fl-1e8ba8b5a-169�������]�������h�oh�hhh���
��X�����s�h���XP����X����X����X���������gmap��������glist��gsource-location��g%make-source-location-procedure��<=====��gm-1e9d51c93-bc���[��gt-1e9d51c93-b7��gt-1e9d51c93-b8��gt-1e9d51c93-b9��gt-1e9d51c93-ba��gt-1e9d51c93-bb����������������fl-1e9d51c93-c1��fl-1e9d51c93-c2��fl-1e9d51c93-c3��fl-1e9d51c93-c4��fl-1e9d51c93-c5���������]��������fl-1e9d51c93-be�����]j������h�ohhhhx���
��XY����ginput��s�h���X�����gline��X�����gcolumn��X�����goffset��X�����glength��X������������gm-1e9d51c93-b5���[����h�oh�hhh��h�����X�����X�����X
�������������������sh���X�����g
pwpwpwpwpw���������g%source-location?-procedure��gm-1e9d51c93-d1���[��gt-1e9d51c93-d0��������fl-1e9d51c93-d6���]���fl-1e9d51c93-d3��]j���hohhhhx���
�XY���hohhhhh!h&h*h/h4h9h>hCO���X��	�
XS��XU���
XX��XZ���sh�X���
�
�	�sh�X���g %source-location-input-procedure�gm-1e9d51c93-dd�[��fl-1e9d51c93-df��]j�hohhhhx����Xf�� e�! =�"�hoh�hhh�h����#Xq"��$e#�%<!$=�&�'fl-1e9d51c93-e2�(fl-1e9d51c93-e3�)'(�*]�&)�+*hohhhhx���
�,X�+��-X�+��.s*h�/X�.��0-/�10�2X�"��3e2�4<!3=�5fl-1e9d51c93-e7�6fl-1e9d51c93-e8�756�8]�&7�98hohhhhx���
�:X�9��;X�9��<8h�=X
<��>;=�?>�@X�"��Ae@�B<!A=�Cfl-1e9d51c93-ec�Dfl-1e9d51c93-ed�ECD�F]�&E�GFhohhhhx���
�HX�G��IX�G��Jg%%source-location-set-fields�KsFh�LXJK��MIL�NM�Ogt-1e9d51c93-dc�PO�Qfl-1e9d51c93-f1�RQ�S]PR�TShohhhhx���
�UXYT��V�Shoh�hhh�h����WX�V��XW�YX�V��ZXXV��[XZV��\[W�]sSh�^X�]��_Z\^�`X�V��aSh�bX
a��c`Wb�dXRV��eX�V��fX]��gef�hdWg�iY_ch�jUXi�ksh�lXk��mg%source-location-line-procedure�ngm-1e9d51c93-f8�on[�po�qfl-1e9d51c93-fa�rq�s]jpr�tohsohhhhx����uXft��veu�wv=�x�hsoh�hhh�h����yXqx��zey�{<wz=�|oo�}fl-1e9d51c93-fd�~fl-1e9d51c93-fe�}~��]�|��o�hsohhhhx���
��X�����X�����s�hs��X������������X�x���e���<w�=��fl-1e9d51c93-102��fl-1e9d51c93-103������]�|���o�hsohhhhx���
��X�����X������hs��X�����������X�x���e���<w�=��fl-1e9d51c93-107��fl-1e9d51c93-108������]�|���o�hsohhhhx���
��X�����X�����s�hs��XJ�����������gt-1e9d51c93-f7�����fl-1e9d51c93-10c�����]�p���o�hsohhhhx���
��XY������hsoh�hhh�h�����X��������X�����XX����XZ��������s�hs��X����������X������hs��X���������XR����X�����X������������������������shs��Xm����g!%source-location-column-procedure��gm-1e9d51c93-113���[�����fl-1e9d51c93-115�����]j�����h�ohhhhx�����Xf����e����=���h�oh�hhh�h�����Xq����e���<��=������fl-1e9d51c93-118��fl-1e9d51c93-119������]�������h�ohhhhx���
��X�����X�����s�h���X������������X�����e���<��=��fl-1e9d51c93-11d��fl-1e9d51c93-11e������]�������h�ohhhhx���
��X�����X������h���X	�����������X�����e���<��=��fl-1e9d51c93-122��fl-1e9d51c93-123������]�������h�ohhhhx���
��X�����X�����s�h���XJ�����������gt-1e9d51c93-112�����fl-1e9d51c93-127�����]�������h�ohhhhx���
��XY�����h�oh�hhh�h����X����X���XX��XZ���s�h��X���	�
X����h��X	��

�XR��X���X����	
���sh��X���g!%source-location-offset-procedure�gm-1e9d51c93-12e�[��fl-1e9d51c93-130��]j�hohhhhx����Xf�� e�! =�"�hoh�hhh�h����#Xq"��$e#�%<!$=�&�'fl-1e9d51c93-133�(fl-1e9d51c93-134�)'(�*]�&)�+*hohhhhx���
�,X�+��-X�+��.s*h�/X�.��0-/�10�2X�"��3e2�4<!3=�5fl-1e9d51c93-138�6fl-1e9d51c93-139�756�8]�&7�98hohhhhx���
�:X�9��;X�9��<8h�=X	<��>;=�?>�@X�"��Ae@�B<!A=�Cfl-1e9d51c93-13d�Dfl-1e9d51c93-13e�ECD�F]�&E�GFhohhhhx���
�HX�G��IX�G��JsFh�KXJJ��LIK�ML�Ngt-1e9d51c93-12d�ON�Pfl-1e9d51c93-142�QP�R]OQ�SRhohhhhx���
�TXYS��U�Rhoh�hhh�h����VX�U��WV�XX�U��YXXU��ZXZU��[ZV�\sRh�]X�\��^Y[]�_X�U��`Rh�aX	`��b_Va�cXRU��dX�U��eX\��fde�gcVf�hX^bg�iTWh�jsh�kXj��lg!%source-location-length-procedure�mgm-1e9d51c93-149�nm[�on�pfl-1e9d51c93-14b�qp�r]joq�snhrohhhhx����tXfs��uet�vu=�w�hroh�hhh�h����xXqw��yex�z<vy=�{nn�|fl-1e9d51c93-14e�}fl-1e9d51c93-14f�~|}�]�{~��nhrohhhhx���
��X�����X�����shr��X������������X�w���e���<v�=��fl-1e9d51c93-153��fl-1e9d51c93-154������]�{���n�hrohhhhx���
��X�����X������hr��X	�����������X�w���e���<v�=��fl-1e9d51c93-158��fl-1e9d51c93-159������]�{���n�hrohhhhx���
��X�����X�����s�hr��XJ�����������gt-1e9d51c93-148�����fl-1e9d51c93-15d�����]�o���n�hrohhhhx���
��XY������hroh�hhh�h�����X��������X�����XX����XZ��������s�hr��X����������X������hr��X	���������XR����X�����X ������������������������shr��Xl����gm-1e9d51c93-164���[���������fl-1e9d51c93-169��fl-1e9d51c93-16a��fl-1e9d51c93-16b��fl-1e9d51c93-16c��fl-1e9d51c93-16d���������]��������fl-1e9d51c93-166�����]j������h�oh�hhh���
��X�����s�h���X�����X����X����X����X����X �����������gmake-vector��glist->vector��greverse��
��gmax��gdisplay��fError in map-goto��gnewline��gexpt��gbidon��fError in add-lookback-edge : ��gassv��gassq��greduce��gleft��gright��gnone��f %% Shift/Reduce conflict (shift ��f	, reduce ��f) on '��f' in state ��f"%% Reduce/Reduce conflict (reduce ��gdefault��gaccept��gfor-each��gnumber?��glist-ref��g	*default*��g*error*������gleft:��gright:��g	nonassoc:��f+invalid operator precedence specification: ���猤��茤�gnonassoc�����������gmember�f"duplicate definition of terminal: �finvalid terminal: �gassoc�fNonterminal previously defined:�fInvalid nonterminal:�f/Nonterminal definition must be a non-empty list�g*eoi*�geoi�	�
�
L�
�g*start*�gcar�
f-Grammar must contain at least one nonterminal�gcdar�gappend�g:�g$1��f<Grammar definition must have a non-empty list of productions�fInvalid token list: �fundefined symbol : �gprec:�f*prec: directive should be at end of rule: �fInvalid prec: directive: �f!Invalid terminal or nonterminal: �gsymbol->string�f Invalid terminal or nonterminal:�fTInvalid 'error' production. A single terminal symbol must follow the 'error' token.:�gvector�gstring->symbol�g
string-append� f-�!gnumber->string�"f$�#f/At least one production needed for nonterminal:�$gvector->list�%��&g___stack�'g___sp�(g
___goto-table�)g___push�*g
yypushback�+&'()*�,'()�-glet*�.gtok�/g
vector-ref�0g-�1.�2.�3�12.�43�5f@�6.�7�16.�87�9�:�;'�<goutput:�=gwith-output-to-file�>gdefine�?fMalformed lalr-parser form�@fInvalid option:�Agexpect:�Bgdriver:�Cgglr�Dg
out-table:�EfState table�Ff-----------�Gfstate �Hf   �If --> �Jf. �Kf �Lf	   (rule �Mf)�Nfdefault action�Of : Error�Pf : Accept input�Qf : reduce using rule �Rf : shift and goto state �SfNo generated parser available!�Tgstring?�Uginteger?�Vgmemq�Wglr�XWC�Ygcombine-locations�Zg*max-stack-size*�[g
vector-length�\f%Syntax error: unexpected end of input�]f!Syntax error: unexpected token : �^fSyntax error: invalid token: �_g
take-right�`gdrop�agfilename�C5h�L�]4	
$54'>"G()R4,0>"G4,>"G.i1R2i3R4678;>ADhP]	CHgfilenamefsystem/base/lalr.upstream.scm�
	S	��		
Chr]	45L4?6jgargs
		gv			gfilenamefsystem/base/lalr.upstream.scm�		S	��		CGHh(p]	45$O@6hgy
		'gtmp		'gfilenamefsystem/base/lalr.upstream.scm�
	S	��		'C57R46I8;>ADJhx-13��Cpgx
			gy			gfilenamefsystem/base/lalr.upstream.scm�
	T	��		T	#��			
Chr]	45L4?6jgargs
		gv			gfilenamefsystem/base/lalr.upstream.scm�		T	��		CGHh(p]	45$O@6hgy
		'gtmp		'gfilenamefsystem/base/lalr.upstream.scm�
	T	��		'C5IR46K8;>ADLh{]Csgmsg
		gobj		gfilenamefsystem/base/lalr.upstream.scm�
	U	��		U	%��			Chr]	45L4?6jgargs
		gv			gfilenamefsystem/base/lalr.upstream.scm�		U	��		CGHh(p]	45$O@6hgy
		'gtmp		'gfilenamefsystem/base/lalr.upstream.scm�
	U	��		'C5KRMNOPQThp�]45$^45$"�$
��"$24�&�"	45>"G""C�glvalue
		ngtok		ngfilenamefsystem/base/lalr.upstream.scm�
	V	��		W	
��	
	W	��		X	��		X	*��		X	��		W	��	"	Y	
��	5	W	��	6	Z	��	<	Z	%��	?	Z	*��	[	Z	��		n	gnamegnote-source-location�CURPh�]�C�gcategory
		gsource		gvalue			gfilenamefsystem/base/lalr.upstream.scm�
	x
��			gnameg%make-lexical-token-procedure�CVR468;W�hn]Cfgt-1e9d51c93-32
		gt-1e9d51c93-33		gt-1e9d51c93-34						C���h`]L6Xga
		gfilenamefsystem/base/lalr.upstream.scm�		x
��		C<�hP]L6Hgfilenamefsystem/base/lalr.upstream.scm�		x
��		
C�h]C		
CGHhp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/lalr.upstream.scm�
	x
��		nC5R���P�4�P>"G	��Vi�PRPh�]�$��CCgobj
		gfilenamefsystem/base/lalr.upstream.scm�
	x
��		gnameg%lexical-token?-procedure�C�R468;�ah6]C.gt-1e9d51c93-45
		
		
C���h`]L6Xga
		gfilenamefsystem/base/lalr.upstream.scm�		x
��		C<�hP]L6Hgfilenamefsystem/base/lalr.upstream.scm�		x
��		
Cch]C		
CGHhp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/lalr.upstream.scm�
	x
��		nC5RPTh�]�&
�C6�gs
		gfilenamefsystem/base/lalr.upstream.scm�
	x
��		gnameg!%lexical-token-category-procedure�CdR468;���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h6]C.gt-1e9d51c93-51
		
		
C���h`]L6Xga
		gfilenamefsystem/base/lalr.upstream.scm�		x
��		C<�hP]L6Hgfilenamefsystem/base/lalr.upstream.scm�		x
��		
C�h]C		
CGHh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/lalr.upstream.scm�
	x
��	�C5RPTh�]�&�C6�gs
		gfilenamefsystem/base/lalr.upstream.scm�
	x
��		gnameg%lexical-token-source-procedure�C�R468;��h:]��C2gerr
		gs					Ch:]��C2gerr
		gs					Ch:]��C2gerr
		gs					C�:h6]C.gt-1e9d51c93-6c
		
		
C���h`]L6Xga
		gfilenamefsystem/base/lalr.upstream.scm�		x
��		C<�hP]L6Hgfilenamefsystem/base/lalr.upstream.scm�		x
��		
C<h]C		
CGHh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/lalr.upstream.scm�
	x
��	�C5RPTh �]�&	�C6�gs
		gfilenamefsystem/base/lalr.upstream.scm�
	x
��		gnameg%lexical-token-value-procedure�C=R468;KRWh:]��C2gerr
		gs					CZ`eh:]��C2gerr
		gs					Chnsh:]��C2gerr
		gs					C��h6]C.gt-1e9d51c93-87
		
		
C���h`]L6Xga
		gfilenamefsystem/base/lalr.upstream.scm�		x
��		C<�hP]L6Hgfilenamefsystem/base/lalr.upstream.scm�		x
��		
C�h]C		
CGHh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/lalr.upstream.scm�
	x
��	�C5R46�8;������h v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						CGHh(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/base/lalr.upstream.scm�
	x
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5�R�h�]�C�ginput
		gline		gcolumn			goffset			glength			gfilenamefsystem/base/lalr.upstream.scm�
�
��			gnameg%make-source-location-procedure�C�R468;��h�]C�gt-1e9d51c93-b7
		gt-1e9d51c93-b8		gt-1e9d51c93-b9			gt-1e9d51c93-ba			gt-1e9d51c93-bb						C���ha]L6Yga
		gfilenamefsystem/base/lalr.upstream.scm�	�
��		C<�hQ]L6Igfilenamefsystem/base/lalr.upstream.scm�	�
��		
C�h]C		
CGHhp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/lalr.upstream.scm�
�
��		nC5R������4��>"G	���i��R�h�]�$��CC�gobj
		gfilenamefsystem/base/lalr.upstream.scm�
�
��		gnameg%source-location?-procedure�C�R468;�h6]C.gt-1e9d51c93-d0
		
		
C���ha]L6Yga
		gfilenamefsystem/base/lalr.upstream.scm�	�
��		C<�hQ]L6Igfilenamefsystem/base/lalr.upstream.scm�	�
��		
Ch]C		
CGHhp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefsystem/base/lalr.upstream.scm�
�
��		nC5R�Th�]�&
�C6�gs
		gfilenamefsystem/base/lalr.upstream.scm�
�
��		gnameg %source-location-input-procedure�CR468;%,1h:]��C2gerr
		gs					C4:?h:]��C2gerr
		gs					CBHNh:]��C2gerr
		gs					C�jh6]C.gt-1e9d51c93-dc
		
		
C���ha]L6Yga
		gfilenamefsystem/base/lalr.upstream.scm�	�
��		C<�hQ]L6Igfilenamefsystem/base/lalr.upstream.scm�	�
��		
Clh]C		
CGHh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/lalr.upstream.scm�
�
��	�C5R�Th�]�&�C6�gs
		gfilenamefsystem/base/lalr.upstream.scm�
�
��		gnameg%source-location-line-procedure�CmR468;{��h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h6]C.gt-1e9d51c93-f7
		
		
C���ha]L6Yga
		gfilenamefsystem/base/lalr.upstream.scm�	�
��		C<�hQ]L6Igfilenamefsystem/base/lalr.upstream.scm�	�
��		
C�h]C		
CGHh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/lalr.upstream.scm�
�
��	�C5R�Th �]�&	�C6�gs
		gfilenamefsystem/base/lalr.upstream.scm�
�
��		gnameg!%source-location-column-procedure�C�R468;���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C�h7]C/gt-1e9d51c93-112
		
		
C���ha]L6Yga
		gfilenamefsystem/base/lalr.upstream.scm�	�
��		C<�hQ]L6Igfilenamefsystem/base/lalr.upstream.scm�	�
��		
Ch]C		
CGHh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/lalr.upstream.scm�
�
��	�C5R�Th �]�&	�C6�gs
		gfilenamefsystem/base/lalr.upstream.scm�
�
��		gnameg!%source-location-offset-procedure�CR468;%,1h:]��C2gerr
		gs					C4:?h:]��C2gerr
		gs					CBHMh:]��C2gerr
		gs					C�ih7]C/gt-1e9d51c93-12d
		
		
C���ha]L6Yga
		gfilenamefsystem/base/lalr.upstream.scm�	�
��		C<�hQ]L6Igfilenamefsystem/base/lalr.upstream.scm�	�
��		
Ckh]C		
CGHh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/lalr.upstream.scm�
�
��	�C5R�T h �]�&	�C6�gs
		gfilenamefsystem/base/lalr.upstream.scm�
�
��		gnameg!%source-location-length-procedure�ClR46 8;z��h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h7]C/gt-1e9d51c93-148
		
		
C�� �ha]L6Yga
		gfilenamefsystem/base/lalr.upstream.scm�	�
��		C<�hQ]L6Igfilenamefsystem/base/lalr.upstream.scm�	�
��		
C�h]C		
CGHh��]145$@45$@45$@45$	@4
5$O@45$4
O?$@66�gx
	�gtmp	�gtmp		"�gtmp		9�gtmp		P�gtmp		g�gtmp	��gfilenamefsystem/base/lalr.upstream.scm�
�
��	�C5 R46J8;������h v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						CGHh(�]	45$@6�gx
		"gtmp		"gfilenamefsystem/base/lalr.upstream.scm�
�
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5JR468;>ADh8�]"$�$C�����"���
"����gv1
		1gv2		1gn			1gi			*gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�		��	�	��	�	$��	�	$��	 �	��	!�	��	$�	��	*�	��		1	gnameg	bit-union�C����h�
]"$�L��L��L�
�$tM�
�$IM�$4L�>"G"#M�L�4L��>"G"4L�>"G"4L�>"G"LL�6gp
	�gs4	�gx		
�gruleno		�gy		�gsymbol		0�gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	
�	$��	
�	��	�	)��	�	��	�	'��	�	$��	�	��	#�	��	'�	 ��	+�	��	0�	.��	0�	 ��	6�	+��	:�	"��	?�	0��	C�	&��	D�	&��	I�	-��	P�	&��	b�	(��	i�	(��	j�	(��	o�	/��	r�	7��	w�	(����	&����	-����	&����	 ����	'����	 ����	����	��$	�	gnamegloop2�Ch@�]
�$0OLLLLLLQLL��6C�gs1
		=gs3		=gloop2			;gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	6�	5��	7�	#��	;�	��		=	gnamegloop�Ch��]�45N45N45N45N
45NM
M�N45"#(""�4��5�"���
"���4L>"G4L>"G4M5N4M54M�
54M54MM��5
	"RM�$	
�$DM
��
�$,M�$",M����

"���"	"�M�
�$�$"M�"���$�

"��a
�"PM�
�$-���
	���	���"����
"��

"���"��GO	LL
Q4
>"G"



"���	
4L>"G4L>"G4L	>"G4L
>"GC�gterms
	�g
terms/prec	�gvars		�ggram		�ggram/actions		�gl		A	dgcount		A	dgno-of-rules		o�gno-of-items		o�gsqueue	�@grcount	�@grsets		�@grelts	
�@gr	�'gs2	�'gp	
�'g*r	�'gsymbol	�.gr1	2�g
any-tokens	2�gsymbol	7�gruleno	x�gr2	~�gp2	~�gsymbol	��gloop	�$gfilenamefsystem/base/lalr.upstream.scm�
	��		 ��		��		��		��		��		��		��	&	��	'		��	/		��	4
	��	6
	��	7	��	A	��	G
	��	P	&��	S	7��	X	?��	[	7��	\	.��	d	 ��	d	��	o	��	t		���		���|	���|	���}	���~	���~	���~	���	����	����	����	���}	����	����	����	����	
����	����	����	1����	 ����	����	����	���	"���	���	���	���	 ���	(��'�	��2�	��7�	#��7�	��=�	��A�	��D�	!��J�	*��U�	9��]�	��c�	��f�	$��t�	��u�	,��x�	��~�	 ����	0����	"����	(����	$����	:����	7����	*����	=����	7����	*����	*����	1����	:����	*����	.����	(����	 ����	����	��'�	��A		��Q		��a		��q		��_	�	Ch�]N4N3N2N1N0N/N.N-N,N+N*4�5N)N(N'N&N%N$N#N"N!N NNNNNNNNNNNNNNNNNLLLL1LLL2L3LLLLL	L
LLL
LO6gtokens
	�ggram	�gfilenamefsystem/base/lalr.upstream.scm�
�	��		��		��		��		��		��	 	��	!	��	"	��	#	��	 $	��	#%	��	$'	��	*'	5��	,'	��	.'	��	1(	��	4)	��	7*	��	:+	��	=,	��	@-	��	C.	��	F/	��	I0	��	L1	��	O2	��	R3	��	U4	��	X5	��	[6	��	^7	��	a8	��	d9	��	g:	��	j;	��	m<	��	p=	��	s>	��	v@	��	yA	��	zB	��	|B	���	��-	�	gnameggen-tables!�C�h��]K�NN4M5N4M5N4M�5N"�(C��"n(�	"���M	�M	�"8
(M
	����	�	"���M
��
��
"����
"�����	"���
"��`�gno-of-rules
	�gno-of-items	�ggram		�gp		.�gitem-no		.�grule-no		.�gnt		:�gprods		@�git-no2		@�grl-no2			@�grhs	
	i�git-no3		i�gfilenamefsystem/base/lalr.upstream.scm�
E	��	F	��	F	��	G	��	H	��	H	��	I	��	I	��	 J	��	%J	��	(J	��	*J	��	.L	��	4M	��	9N	��	:N	
��	@O	��	FP	��	IQ	��	WQ	��	^S	��	eT	��	iU	��	oV	��	tX	6��	xX	��	{Y	#��	~Y	/���Y	<���Y	���[	6���[	���\	#���\	-���\	���U	���U	%���U	���O	���O	���O	���L	��+	�	gnamegpack-grammar�C�h��]0HH4M�
5K4M	�5K"NM�$AM�
�$"JJ���J���"����"���"

"���4M
5N"XM�$M")
�$")J����"���J�"���M��"���C
"����gdelts
	�gdset	�gi		"	pgj		"	pglhs		0	lgi	��gj	��gs	��gx	��gq	��
gfilenamefsystem/base/lalr.upstream.scm�
_	��		`	��	`	��	`	��	a	��	"c	��	'd	
��	+d	��	0e	��	0e	
��	6f	��	:f	��	Eh	/��	Fh	'��	Gh	��	Ni	��	Qj	��	Tj	 ��	\j	��	_k	��	ik	��	pc	��	{m	���m	���o	���p	
���p	���q	���r	���r	���t	"���t	���u	"���u	0���u	*���u	���q	���q	"���q	:���q	���q	
���v	���w	���w	���o	��.	�
gnamegset-derives�C�hX�]04M5N"mM�$`"Q(	�"���MM���	��$"M�$M4LM�5�""�"���M�"���"
"���"�$�"}M�$"���M�"$("$�4LM��5"���"����$
�"���M��"���
"��y""��d"%M�$M4LM�5��"���C
"����gi
		}gsp		ngsym		5	ngcontinue
�gi�gcont	�gx	�gl	��gz	��gy	�gi
(Mgfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	$��	
�	��	�	��	�	��	�	
��	�	��	�	
��	#�	��	&�	��	,�	��	3�	>��	4�	-��	5�	��	5�	��	<�	��	@�	��	E�	��	N�	,��	W�	9��	Y�	,��	Z�	��	e�	��	k�	��	n�	
��	s�	��	y�	
��	}�	����	����	����	
����	����	����	����	����	����	����	����	'����	'����	B����	/����	'����	 ����	����	����	����	����	����	����	���	��	�	���	
���	��(�	��-�	
��1�	��6�	"��?�	-��A�	"��B�	��E�	��K�	��M�	��C	T
gnameg
set-firsts�C�h�u]4M5N4L>"G"SM�$H"$("&�4LM��5"���M�"���M��"���C
"���mgi
	 	sgl	-	Qgfd		-	Qgx	_	qgfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	
�	��	 �	��	%�	
��	)�	��	-�	��	3�	��	<�	 ��	=�	 ��	D�	<��	E�	(��	I�	 ��	Q�	��	Q�	��	V�	"��	W�	=��	_�	��	_�	
��	h�	��	k�	��	q�	��	s�	��		z
gnamegset-fderives�C��h@�]9H4M5K"a("_M��	��$:M�$-"("J���"���M�"���""�"���"���"�M�${J�$aM�"J�$/��$���"�����"�����"���"����"��|"�$���"���6"���"��@�gcore
	@gruleset	@gcsp			tgsym		#	tgdsp		;	Ugruleno	�2gcsp	�2gitemsetv	�2gitemno	��gc	��g	itemsetv2	��gc	&g	itemsetv2	&
gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	"�	'��	#�	��	#�	
��	*�	��	.�	��	3�	��	;�	��	A�	��	J�	-��	L�	��	O�	��	U�	��	U�	��	Z�	!��	`�	��	k�	��	q�	��	t�	����	����	
����	����	����	
���	���	���	���	���	���	���	���	���	���	+���	%���	���	���	+���	���	���	+���	���	���	��	��	
��	��	��		��		%��		�� 		��&
	��&	
��2�	��6�	/��@�	��=	@gnamegclosure�C��h8�](4M
5N4M5N
4M�
>"G4L>"G4	
5

��	�	�NMN	N
"��$��4L	�54L>"G4L>"G4L>"GM
�$]4	
5
�
�M�M	�M$M�M�N"NMN"�"��DCM"��:�gp
	B	lg
this-state
	p.gx	z,gis	�,gp	�gx	��gx	��gx	��gfilenamefsystem/base/lalr.upstream.scm�
'	��		��		��	
	��		��		��		��	"	��	+)	��	;�	"��	B	��	I�	"��	N�	"��	T�	"��	Z	��	[�	"��	`!	��	b!	��	f"	��	i#	��	p+	��	s,	
��	w,	��	z-	��	z-	
��	}.	����	"���.	���-	
���/	���0	���1	���2	���2	����	#����	����	"����	����	#����	����	#����	����	#���	���	!���	���	��
�	���	���	���	��&4	��,4	��.+	��7	6
gnameggenerate-states�C�h�<]!N"M�$M��"���"
"���"w�$l�M�
�$I4LM5NM�(M���MM��"��M��"�"���""���4M5NC4gitemset
	�gi			%gisp	0�gi		:�gsym		A�gx		[�gfilenamefsystem/base/lalr.upstream.scm�
7	��	9	��	9	��		:	��	;	
��	;	��	=	&��	=	��	>	��	!>	��	%:	��	0@	��	3A	
��	7A	��	:B	��	:B	
��	AC	��	AB	
��	GD	��	KD	��	LF	%��	VF	��	[G	��	[G	��	cH	��	jJ	=��	mJ	7��	nJ	��	wK	6��	xK	���M	,���M	&���M	���N	6���N	���O	���O	���@	���Q	���Q	��)	�gnamegnew-itemsets�C�h0�]9M�45"!(
�"���"���
"���M�(4L5M�
�C"��	��$}".�$ ���$��"����"�"�	�"���$
�
�C�(4L5�
�C�"��o�(4L5�
�C�"��I"��A�gsym
	,gisp	,gn		,gisp1			7gk			7gkey		B,gsp		I,gx		X	igsp1		m$gc		r	|gi1	��gt	��gc	��gc	��gx	��gx	gfilenamefsystem/base/lalr.upstream.scm�
U	��	V	��	V	��	
W	��	V	��	X	��	Y	��	"Z	��	)[	��	.[	-��	/[	(��	7[	��	7X	��	BV	��	I\	��	IV	��	Q]	��	R^	��	X^	
��	c_	)��	d_	��	h�	"��	ma	
��	rb	'��	rb	��	y�	"��	}b	���b	���c	���d	 ���d	���e	#���f	#���e	 ���d	���g	"���g	+���g	���h	���c	���c	9���c	-����	"���c	���b	���i	���i	����	"���j	���j	���k	���k	���l	$���l	����	"���n	���n	��j	��j	��k	��k	��l	$��l	���	"��n	��$n	��$a	
��D	,gnameg	get-state�C��hhj]!M�454	
5M
��M�$MN"	�	�M�M�NM�NCbgsym
		cgisp		cgn			cgp			cgn			)gfilenamefsystem/base/lalr.upstream.scm�
q	��	r	��	r	��	
s	��	r	��	�	"��	r	��	u	��	&�	"��	/�	"��	4w	
��	8w	��	<w	��	G�	"��	N�	"��	Uz	��	Vz	��	Y{	��	[{	��	^|	��	`|	��		cgnameg	new-state�Ch �](C4L�54L�5�C�gl
		gfilenamefsystem/base/lalr.upstream.scm�
�	
��	�	��		�	��	�	��	�	!��	�	��	�	*��	�	0��	�	*��	�	��		gnamegloop�C�h(�]OLQ44M55NC�gloop
		!gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	
��	�	��	�	
��	#�	��		%
gnameg
append-states�Ch8]	(CM��
�$
�4L�5�C�"����gl
		1gitem		1gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��		�	��	�	2��	�	 ��	�	��	�	��	�	��	�	 ��	�	)��	$�	/��	&�	)��	'�	��	+�	 ��	1�	��		1gnamegloop�C��h��]OLQ45�$T4	
5
�
�45�	�M$M�M�NCNMNCC�gcore
		{gitemset		{gloop			grs			{gp		-	ygx		3	>gx		E	Pgfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	!�	
��	%�	��	&�	#��	-�	
��	3�	"��	3�	��	;�	#��	?�	��	E�	��	M�	#��	W�	#��	]�	��	d�	+��	e�	��	h�	'��	j�	��	q�	(��	s�	��	w�	��		{	gnamegsave-reductions�Ch��]M	��N4L
>"G4L	>"G4L>"G4L>"G4L>"G4L>"G4L>"G4L>"G4LM>"GL6�gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	/��	�	��	�	��	
�	��	�	��	�	��	+�	��	;�	��	K�	��	[�	��	k�	��	{�	����	����	��	�
gnameglalr�C�h@]4M5N""�$�M
����"���CM"����gl
		2gx		0gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	�	
��	�	��	�	��	�	
��	"�	"��	&�	"��	'�	��	*�	��	0�	��	2�	��		:
gnamegset-accessing-symbol�C�h8�]4M5N" �$�M
���"���CM"����gl
		0gx		.gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	�	
��	�	��	�	��	�	
��	"�	#��	%�	��	(�	��	.�	��	0�	��		8
gnamegset-shift-table�C�h8�]4M5N" �$�M
���"���CM"����gl
		0gx		.gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	�	
��	�	��	�	��	�	
��	"�	#��	%�	��	(�	��	.�	��	0�	��		8
gnamegset-reduction-table�C�hX$] "@M�$1
�$��"����45
"���C


"���gp
		Fgcurmax		Fglength			Fgx			Fgfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	�	��	�	��	�	��	�	��	#�	%��	-�	��	0�	��	1�	��	D�	��	F�	��		S
gnamegset-max-rhs�Ch�]�(�C�"����gl
		gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��		�	��	�	
��	�	��	�	
��		gnameglast�C��h�X]@OQ4M
5N	4M
�5N"M
�$�M�M�M�$[��$"$M4	�5�M��"$���"���M	��"���M	��"��nMM
�4545N"*�$"$MM4
5��"���
"���4	�5N45N"wM
�$lM	�$
�"���M�$<")(
�"���M����"���	�"����"���C

"��

"��wPglast
	
�gcount	(�gi		(�grp		B�gsp		B�gt		R	~gc	�"gj	�gnelem	��gi	&�gnp	&�grp	J�gj	Vgnp2	Vgfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	�	"��	"�	��	$�	��	(�	��	-�	
��	1�	��	8�	��	=�	��	B�	��	B�	��	L�	��	P�	#��	R�	��	R�	��	e�	��	h�	0��	o�	#��	q�	0��	r�	$��	u�	!��	v�	 ����	����	#����	����	1����	����	����	 ����	����	����	 ����	����	����	����	����	����	����	����	#����	����	>����	����	,����	���	���	���	���	���	��&	��+	��/	��4	��8	��;	��E	��J	 ��J	��R	��V	��\	��_	(��i	"��p
	>��q
	$��t	+��w	3��	$��	����	#���	���	"���	���	����	��P	�
gnameg
initialize-LA�C��h��]`4M�
5N4M�
5"��$k"K�$7M��M�$MM�����"����"����"���4�	�5"���"M�$�M���"���" M�$"M���"���
"���NMMM�MM�4M5N4M5N"�(C�
�"R("S�	M	�

M�$$
�
��M�M	�"
	�"���	�"����"��}M"��u

"���
M"��r�gtemp-map
	�gng	�gsp		�gi		'	rgng2		'	rgsymbol		4	egs		x�gk	��gi	��gi	��gsp	
�gx	�gstate1	�gi	!sgstate2		.jgsymbol	
5ggk	E`gfilenamefsystem/base/lalr.upstream.scm�
	��		��		 ��		��	
	��		��		!��		��		��		��		��	#	��	'	��	*	��	.	��	3	9��	4	 ��	4	��	;	��	?	��	H	,��	I	'��	J	��	M	!��	P	)��	X	��	[	��	e	��	j	��	r	��	r	��	s	��	x	2��	x	$��	�	#���	���	���	��� 	��� 	���"	���#	���#	���#	8���#	���&	���'	���&	���(	.���(	���&	���&	���*	���+	���,	���-	%���-	���.	#��.	��
0	��2	 ��2	���	#��2	��!4	��.6	)��.6	��57	)��56	��<8	 ��@8	��E9	)��E9	 ��N:	?��O:	"��V;	"��]<	"��m4	1��s4	��x�	#��~4	���0	)���0	���	���	��V	�
gnamegset-goto-map�C���h��]""t�$+4>"G4>"G
C�	�M��$C�$
�"����"���M�M���"��x�gstate
	�gsymbol	�glow			zghigh			zgmiddle		B	zgs		I	zgfilenamefsystem/base/lalr.upstream.scm�
?	��	@	��	B	
��	B	��	D	��	D	��	D	��	 D	��	)D	>��	?F	#��	BF	��	BF	
��	IG	��	IF	
��	PI	��	TH	��	\K	��	`H	��	cL	��	mL	��	rN	��	zN	��	z@	��	@	���A	-���A	���A	���@	��	�	gnamegmap-goto�C���hX�]`4M	5N"*M	�$"$MM4
5��"���
"���4M	5"�M	�$�M�M�M�$�"��$�M��M�$-M�$�4L5�"����"���M�			�4			�5


���
	�"��|�$45�""	�"��P"��"��"


"���L6�gi
		:gnelem	#	0greads
	IVgi	OFgrowp		OFgrowf		]Bgstateno		d?gsp		k<gj		wgedges		wgsymbol	��gb		��gx	
��gy	��gfilenamefsystem/base/lalr.upstream.scm�
Q	��	R	��	R	��	S	��	S	��	S	��	#S	8��	&�	��	1S	'��	4S	��	:S	��	BU	��	IU	��	OW	��	TX	��	XX	��	]Y	��	]Y	��	dZ	��	dY	��	k[	��	kY	��	s\	��	w]	��	z^	��	~^	���_	?���_	&���_	���`	���`	���a	"���a	���b	)���b	7���b	1���b	"���d	)���d	"���f	.���f	 ����	����	
����	
����	"����	����	
����	����	#����	����	���g	'���g	 ��h	��h	��
i	1��i	��]	���	#��]	;��']	��.j	��1j	��9j	��FW	��Vk	��C	V
gnameginitialize-F�C��h��]:4545".�$"(���"���
"���"n�$"h��$G"7�$,��������"���""���"�"���
"���"!�$"����"���
"���C�gr-arg
	�gn	�gnew-end		�gnew-R		�gi			Hgx		,	?gi		S�gsp		e�gsp2		r�gx		|�gy	��gi	��gfilenamefsystem/base/lalr.upstream.scm�
|	��	}	��	~	��	}	��		��	�	��	#	��	)�	��	,�	��	,�	��	5�	
��	<�	
��	B	��	H	��	S�	��	X�	��	\�	��	e�	��	e�	��	j�	��	n�	
��	r�	��	u�	��	y�	��	|�	��	|�	����	����	����	*����	"����	����	-����	����	����	����	����	����	����	����	����	����	"����	����	����	����	��/	�	gnameg	transpose�ChPP]"*(C�M��$C�"���M�	�"���Hgstateno
		Igsymbol		Igj			0gstno			0gst2			0gs		5	?gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	�	��	�	��	�	��	 �	��	&�	��	0�	��	0�	��	5�	"��	5�	��	<�	#��	I�	��		I	gnameg	get-state�C����h(X]�OLLQ4M5N"�M�$"�M�MM
��"��$��"M�


�$"4
5�	�	"���M�$"�M��"�$"
�$$M
��$

"���
�
"���$M
M
���"M4>"G4>"G4>"G"M�
"��d"z$
�"���M
�	��$AM	�$%M���
�4L
�5�
"���

"���

"���	��
"��q
M�	"��kM�"M�"��?�"��
"��4LMM5NCPg	get-state
	&gi	 gstate1		:	gsymbol1		:	grulep		B�gedges		B�g*rulep		L�grp		R�gstateno		R�gstates			R�g*rp	
	W�gst		j�gk	�;gfound	�*gi	
�*gdone	?�gstp	?�grp2	
?�gedgp	?�g*rp	W�gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	 �	��	%�		��	)�	��	2�	��	9�	.��	:�	��	:�	��	B�	��	E�	��	I�	
��	L�	��	L�	��	R�	��	W�	��	W�	��	]�	��	a�	��	b�	"��	j�	��	o�	!��	v�	-����	����	#����	���n	$���n	
���n	���o	���p	���p	���p	���q	���q	���q	���r	���s	���s	���u	���y	*���y	���x	���v	���v	 ���v	���w	��	w	 ��w	��w	>��*o	��0o	��8o	��?�	��E�	��H�	&��R�	 ��W�	+��W�	 ��^�	&��b�	"��g�	&��p�	2��q�	-��t�	-��w�	-��x�	3��}�	=����	3����	-����	&����	&����	����	+����	+����	����	����	 ����	$����	����	����	����	����	���	���	���	���	��$�	��[	&
gnamegbuild-relations�Chp~](MM�"X�$M">�$.M�M��4LM>"G�"����"���M�"���C
"���vgn
		lgi	
	egsp			XgLA-i		,	OgF-j		,	Ogfilenamefsystem/base/lalr.upstream.scm�
�	��	�	
��	�	��	
�	��	�	��	�	��	�	��	�	��	!�	��	&�	��	+�	,��	,�	��	,�	��	1�	��	I�	��	O�	��	R�	��	X�	��	X�	��	]�	��	c�	��	e�	��		l
gnamegcompute-lookaheads�Ch�]1M�NMM�MM�L��$�"��$y�
M��$4L>"G"M�M��$MM��"M�M�4LM>"G�"���""��t"M��$F">MM�M�NMM��$C4LM�M�M>"G"���"���C�gi
	gheight	grp		grp2		+�gj		5�gF-i		�gF-j		�gj	�	gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	�	��	�	��	�	��	�	��	#�	��	'�	
��	+�	��	.�	��	2�	��	5�	��	5�	��	=�	��	>�	��	B�	��	C�	��	]�	��	b�	��	c�	��	g�	��	p�	/��	q�	��	z�	!��	�	!��	�	����	����	����	����	����	����	����	
����	����	����	����	����	����	����	����	����	����	#����	#����	��	�	��	�	��2	gnamegtraverse�C�h��]1HHHHO	LLLQM	�K4M�
5K4M�
5K
K"CM�$8
J��$$��$4>"G""�"���C
"����grelation
	�ginfinity	�gINDEX		�gVERTICES		�gtop		�gtraverse		�gi		W�gfilenamefsystem/base/lalr.upstream.scm�
�	��	8�	��	;�	��	@�	��	C�	��	F�	��	K�	"��	N�	��	W�	��	\	
��	`	��	f	��	g	��	k	��	p	��	q	��	u	��	v	���	���	����	��	�gnamegdigraph�Ch�]�M�NC�grule
		gsym		gfilenamefsystem/base/lalr.upstream.scm�
	��		��	
	
��		��			gnamegadd-rule-precedence!�C��o����#������hH�]SM�45�$���$C"�
�M����M���4M5$�M����"c"QM�


�$	"J�
M�$
M�M����	"���		"���
M�
	"���		�$"-	�$"&"&"	�$M&
�����C��C�$C	

�M�M�$MM��"M�M	�N	M&
�����C��C
�$u
�$i
�

�M�M�$MM��"M�M	�N	M&
�����C�45�C"��"���M��C�gstate
	Cgsymbol	Cg
new-action		Cg
state-actions		Cgactions		Cgcurrent-action		2grule		4gt		N�gsym		Y	fgi		n�gprec			n�gitem	
	s�gi1	��gsym	��gsym-prec	�g	sym-assoc	�g	rule-prec		�gkey	�gn	b�gl	��gn	��gl	�gfilenamefsystem/base/lalr.upstream.scm�
O	��	P	��	P	��	
Q	��	P	��	R	��	R	��	S	"��	S	��	&T	��	*T	��	1b	7��	4b	��	;	��	<	��	C	
��	D	��	F	��	N	��	Y	"��	Y	��	`	��	a	��	n"	��	s$	��	s$	��	y&	��	}&	
���(	���(	���)	���)	���+	4���+	���	���	���+	���,	���"	���"	���"	���7	���;	
���:	���;	%���<	
���:	���<	%���=	���:	���=	%��>	��
:	��>	%��?	%��b	��-�	��1d	%��4e	3��9e	R��;e	A��<e	)��Af	3��Df	)��Ob	��Sk	&��Wk	T��Xk	`��]l	&��bl	;��bl	/��i�	��m�	��t�	"��u�	��~�	���l	M���j	%���D	���D	����	���m	%���n	3���n	R���n	A���n	)���o	3���o	)���W	���W	���W	���W	3���W	���[	���[	@���[	O���[	[���\	���\	0���\	$����	����	����	"����	����	���\	B���Z	��D	��D	��
�	��]	��^	(��^	G��^	6��^	��_	(��_	6��(_	��=q	2��@q	,��Aq	��z	C	gnameg
add-action�Ch8�]
"*M�$C4L>"G�"���"����gstate
		7gaction		7gi			0gfilenamefsystem/base/lalr.upstream.scm�
t	��	u	��	v	��	u	��	w	��	*u	��	0u	��		7	gnamegadd-action-for-all-terminals�C�#�������h y]4>"G6qgmessage
		gfilenamefsystem/base/lalr.upstream.scm�
I	��	J	
��	K	
��		C
hh�]pHO
OLLLLLLLLLQLQK4M5N"�M�$"�M�$L��$>"�M
��"��$�
M��M
�"t	M�$g
	�

�$4	>"G"
	�$	����
	"���	�
	��
	"���"

�

	"��y�"��S"sM
�"��>��$WM	�$FM&4
	���>"G"4
	���>"G""���""���""M�$_"L�$A�M�M�$4M�>"G"�"���"	�"���"�"��
"��4M
>"G4J5M�$	J6C�gconflict-messages
	cg
add-action	cgadd-action-for-all-terminals		cgi		N/gred		`�gk		|Ggj	�9grule	�5glav	�5gtoken		�gx	
�gy	�gz	�g
in-la-set?	
��gshiftp	�&gk	�gstate	�gsymbol	�
gfilenamefsystem/base/lalr.upstream.scm�
4	��	>A	��	Ay	��	Fy	,��	Hy	��	Jy	��	N{	��	S|		��	W{	��	`}	��	`}	��	h~	��	l�	#��	n~	��	r~	��	{�	0��	|�	��	|�	����	����	����	����	$����	'����	$����	$����	����	����	 ����	����	4����	"����	(����	$����	(����	+����	&����	"����	-����	=����	-����	-����	&����	-����	9���	H���	&���	���	3��&�	��)�	 ��/�	��9�	��>�	 ��D�	��G	��K�	#��M	��Q	��V	+��Z	��^�	��b�	��c�	��h�	4��m�	#��n�	7��o�	4��t�	����	����	"����	+����	#����	.����	+����	����	����	����	����	����	����	����	 ����	����	!����	����	����	����	����	&����	���	��
�	���	���	#���	��){	��/{	��7�	��>�	��C�	��LG	
��UG	
��YG	��aH	
��i	c
gnamegbuild-tables�C��h�d])H"a�$V���4J545$*
�$$���"	�J�K""�"���""���"<(C���$���"����"���J
"���\gacts
	�gaccums	�gl				jgx			fgy		 	cgl		v�gmax		v�gsym		v�gx	��	gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��		�	��	�	��	�	
��	�	��	�	��	�	��	 �	��	#�	��	-�	��	1�	%��	5�	��	;�	��	@�	)��	A�	$��	B�	��	I�	+��	M�	%��	O�	��	Z�	��	`�	��	j�	��	v�	��	|�	
����	����	����	����	����	����	����	"����	*����	����	����	����	��'	�gnamegmost-common-action�C��h�]4L�5��C�gact
		gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	
�	#��	�	��	�	��	�	
��		Ch�]LO6�gacts
		gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��		gnamegtranslate-terms�C���h �]45	�$��L�"�C�gx
		gfilenamefsystem/base/lalr.upstream.scm�
�	/��	�	>��	�	;��	�	6��	�	@��	�	;��	�	1��		C���h�]4L�5��C�gact
		gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	
�	#��	�	��	�	��	�	
��		C	h��])OQ"zM�$CM�M��$<45M$"44LO55��"M4O5���"���
"���gterms
	�gmost-common-action	�gtranslate-terms		�gi		�gacts		'�gact		:	kgfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�		��	 �	��	'�	��	'�	��	.�	��	/�	��	3�	��	4�	��	:�	��	B�	!��	H�	.��	P�	:��	S�	!��	T�	!��	W�	"��	f�	!��	g�	��	h�	��	u�	��	v�	����	����	����	����	��	�gnamegcompact-action-table�C���L����L�	
��
�h|]���45�Ctgx
		gfilenamefsystem/base/lalr.upstream.scm�
3	(��	3	:��	3	D��	3	4��		Ch�	]{�$��$�"��$c��$��&"&"�$��(6��45�	"�
(�"��{
�

�$)4
5$4	
>"G""4

>"G
�
�
	�
"��~�
"��m6�$)45$4	>"G""4
>"G��
�"���"1�$e�		�$R	�

�$>4
5$"	4
5$

6�	�"���
6645��	45��
4545�45�$6"Z
�$0
�4L	5
�45��
"���45	
454?6�����

"���"���
"��E66	gtokens
	�ggrammar	�gk		�glst		�g	rev-terms		�grev-terms/prec		�g
prec-level		�gterm		~gt		*	Ngprec		g	vgprec		vgoptype			vgl	
	~g	rev-terms		~grev-terms/prec		~gterm	
�glst	��grev-nonterm-defs	��gdef		��gnonterm	
��gt	��gterms		��g
terms/prec	

�gnonterm-defs	�gnonterms	!�gdefs	
;�gruleno	;�g	comp-defs	;�gnonterm-def	Ergcompiled-def	Trgcompiled-nonterm-defs	y�gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��		�	��	�	��	�	��	�	��	�	��	�	��	�	��	�	��	#�	��	'�	��	*�	��	*�	��	R�	��	U�	%��	Y�	��	]	 ��	a	��	d�	#��	g�	/��	g�	#��	j�	��	p�	��	r�	��	s�	��	v�	��	~�	����	����	#����	����	(����	����	����	����	����	����	����	����	����	����	����	����	���	���	%���	���	���	���	5���	��	 ��	���	�� �	��!�	��-�	��.�	��2�	��9�	��J�	��N�	��U�	��`	��e	��i		(��m		��p		��~	���
	���	���	���	���	���	���	���	'���	����	���	���	%���	!���	%���	���	-���	!���	(���	(���	!���	-���	!���	$���	V���	����	���	B���	R���	<���	'���	���	-��	B��	R��		<��
	'��
	��
	'��	��	-��	6��!	'��!	��$	��,	��0	��4 	$��5 	T��7 	��;!	��>%	��B%	��E&	3��E&	��H'	3��T&	��Y+	+��\,	5��c,	+��h-	+��r+	 ��s/	;��y/	���3	#���5	#���0	 ���!	���!	9���!	E����	���!	9���!	3���$	3���!	���
	���
	8���
	����	����	"����	"����	����	����	Q����	����	����	���	�	gnamegrewrite-grammar�CLh8�]	4LL5$C4LL5$M�C6�gx
		5gPosInNT		5gPosInT		5gfilenamefsystem/base/lalr.upstream.scm�
<	��	=	��	=	��	>	��	@	��	@	��	'A	��	,B	��	1C	��	5C	��		5gnamegencode�CLh�F](C��4L5$"	4L5$4L5�C�${�&j��$Z��(J4��L5$3(%4LL4L��L5>"G"��cL666666>gl
	�gfirst	�grest		�gt			6gfilenamefsystem/base/lalr.upstream.scm�
F	��	G	��		H	��	
I	��	J	��	I	��	L	��	L	��	+L	)��	:K	��	=M	��	DM	��	HN	��	LK	��	OO	��	QO	&��	UN	��	XP	 ��	YP	��	]P	��	`Q	 ��	eP	��	fR	��	kR	!��	pR	��	tP	��	zS	��	{U	���U	7���U	D���U	7���U	���V	���W	$���W	���X	 ���X	���X	 ���X	���X	 ���X	���Z	���Z	���Z	���Z	��.	�gnamegloop�Ch(�]
OLLLLQ6�grhs
		'gruleno		'gloop			'gfilenamefsystem/base/lalr.upstream.scm�
E	��	F	��		'	gnamegprocess-prec-directive�C���Lh8�]	4L5$"	4L5$C6�gx
		2gt		$gfilenamefsystem/base/lalr.upstream.scm�
t	��	u	+��	u	'��	u	<��	(u	��	.v	.��	2v	"��		2CLL� !"!h0�]L�$C4445554L�5�C�gj
		*gfilenamefsystem/base/lalr.upstream.scm�
�	*��	�	0��	�	,��	�	0��	�	6��	�	7��	�	8��	�	8��	�	7��	 �	6��	!�	6��	&�	>��	(�	6��	)�	0��		*gnamegloop-j�C�#h��]lHOOLQLLQ45K��$�4�5"i�$\4�	�	��5�4��5
4O>"G"s�$h�&V��$""4	��5�$"����$4
>"G""�"���""���"Y45
444	555OQ45��	�
�
�
	"����$4�&'��$��	�
���
�
	"���"��p"��l"��h
6�
	"���
�6�gnonterm-def
	�gruleno	�gterms		�gnonterms		�gNo-NT		�gencode		�gprocess-prec-directive		�gname		J�glst		P�gi			P�grev-productions-and-actions	
	P�grhs		g�grest		l�gprod	
	{�grhs	�gt	��gt	��g
rhs-length	"tgloop-j	IYgaction	[tgfilenamefsystem/base/lalr.upstream.scm�
8	��	2:	��	=h	��	>h	
��	Bh	��	Cj	��	Hj	$��	Jj	��	Jj	��	Pk	
��	Sn	��	Wn	��	Xp	��	]p	5��	bp	?��	gp	��	gp	��	lq	��	lp	��	or	��	vr	/��	yr	)��	{r	��	{p	��	~t	���]	���^	���^	���`	���`	&���`	���a	"���a	���a	���b	 ���b	(���b	 ���b	���a	���c	'���c	 ���c	���`	���d	���d	���d	��e	��e	��]	���	)��"�	��&�	$��(�	0��)�	7��,�	8��2�	9��3�	9��;�	8��=�	7��@�	*��I�	*��Z�	$��[�	��[�	��b�	��g�	%��j�	��t�	��t{	��w{	��{{	��~|	 ���|	+���{	���}	"���}	���{	���~	���	����	.����	#����	���~	���o	���k	
���k	���m	3���k	
���i	���i	F���i	��\	�	gnamegrewrite-nonterm-def�Ch8]"$�$��$C��"���C
"����gx
		5glst		5glst			*gi			*gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��		�	��	
�	��	�	��	�	
��	�	��	�	(��	 �	2��	(�	"��	*�	��		5	gnamegpos-in-list�Ch`C](C(C���$4L�5�C�$4L�5�C�"���;gL1
		YgL2		Ygx			Ygy			Ygfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	#��	�	
��	#�	��	'�	��	*�	��	1�	"��	3�	��	4�	��	:�	��	>�	��	A�	��	F�	��	J�	��	K�	��	O�	��	Y�	��		Y	gnamegloop�Ch�]
OQ6�glst1
		glst2		gloop		
	gfilenamefsystem/base/lalr.upstream.scm�
�	��	
�	��			gnamegsunion�Ch@�]	(L�C�L�$L�CL�$4L�5�CC�gl1
		:gx		:gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	
�	
��	�	��	�	
��	�	��	�	��	!�	��	'�	��	+�	��	.�	��	3�	!��	5�	��	6�	��		:gnamegloop�Ch�]
OQ6�gelem
		glst		gloop			gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��			gnamegsinsert�Ch8�](C��4L5$4L5�C"����gl
		2gx		2gy			2gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��		�	
��	
�	��	�	��	�	
��	�	��	�	��	"�	��	)�	��	2�	��		2gnamegloop�Ch�]
OQ6�gp
		glst		gloop			gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��			gnameglalr-filter�C��h8](C�M�M�$�4L�5�C�"���gl
		7gstate	
	7gsymbol			7gfilenamefsystem/base/lalr.upstream.scm�
3	��	4	��		5	��	
6	,��	
6	��	7	,��	6	��	8	#��	8	��	$9	)��	%:	)��	*:	/��	,:	)��	-9	#��	1;	)��	7;	#��		7gnamegloop�Ch8�]	$$OLLQ4	�5"C�gshifts
		3gloop		*gfilenamefsystem/base/lalr.upstream.scm�
0	��	1	��	
2	��	3	��	%�	#��	'3	��	/<	��	21	
��			3C$h �]4LLO4M55�C�gfilenamefsystem/base/lalr.upstream.scm�
-	��	.	��	/	
��	=	��	/	
��	.	��		
gnamegbuild-goto-table�C%�Y"+,�-!."/&0'�"458h�]�$u�4L��5M&	��"�	��4	4
55�4	4

55�4L�5���CCgi
	�gl	�grest			~gns			~gfilenamefsystem/base/lalr.upstream.scm�
L	#��	M	)��		M	%��	N	5��	
O	3��	O	F��	O	C��	O	3��	N	)��	Q	,��	!Q	H��	%Q	3��	'R	7��	2R	Z��	3R	W��	6R	7��	?S	7��	DS	O��	GS	L��	HS	I��	KS	7��	NQ	,��	OU	0��	RU	@��	VU	O��	ZU	@��	\U	0��	^U	-��	`X	1��	cX	A��	gX	P��	kX	A��	mX	1��	oX	.��	qZ	.��	vZ	4��	zZ	.��	{W	-��	|T	,��	}P	+��	[	)��*	�	gnamegloop�C):;/&0'�h�])�M&"����45$"OLQ45"
�$"S	�4
M&"M&
45"455����Cgp
	�gact	�gnt		�grhs		#�gn		,�gloop		@	Tgfilenamefsystem/base/lalr.upstream.scm�
E	��	F	��	F	
��		G	��	
G	.��	G	��	H	��	I	��	J	��	J	��	"J	-��	#J	��	&J	:��	,J	��	0K	��	6K	��	@L	#��	Y\	#��	]]	��	a]	��	c^	��	i_	��	p_	/��	q_	��	w_	N��	{_	9��	|_	Z���_	^���`	=���`	(���a	,���a	L���a	,���b	,���b	>���b	,���_	���K	���G	��(	�Ch�]4LO5��C�ggram/actions
		gfilenamefsystem/base/lalr.upstream.scm�
A	��	B	��	D	
��	B	��		gnamegbuild-reduction-table�C�<=1>�h u]4LL>"G6mgfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	�	��		
Ch8)]45$�����O6C!goptions
		1gcode		1goption			1gparser-name			/g	file-name			/gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	�	��	�	��	�	��	�	��	�	
��	/�	��		1	gnamegoutput-parser!�C3�L?�L@h0�]	4�M5$
4�5�"$6C�goption
		0gp		0gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	�	��	�	��	�	
��	�	��	�	��	�	��	�	��	"�	��	&�		��	*�	��	.�	
��		0C�ABC#"�D=�E�FG��HIJKLM�	h0�]14>"G"
M�
�$	�"���
�M�4M�>"G4>"G"�M��$4>"G"
�$E4M�$MM��"M�>"G4>"G�"���4>"G4
�>"G4>"G6M�"��F"����gx
	*gi	"gv		"grlno		4"gnt		;"gi		hgv		mgfilenamefsystem/base/lalr.upstream.scm�
!	��	!	(��	!	1��	!	(��	�	��	�	��	�	��	#�	��	'�	��	*�	��	0�	��	1�	��	4�	��	;�	��	;�	��	>�	��	E�	��	J�	��	S�	9��	W�	B��	\�	9��	h�	��	m�	��	m�	��	t�	��	x�	��	y�	��	}�	����	����	����	����	����	����	����	"����	����	����	����	����	!����	����	����	����	����	!����	����	����	!����	���	���	!���	���	���	���	��"�	��"�	��:	*CH�N��O�PQRSh�b]HM$j4>"G4>"G4>"G4>"G4>"G"
(C�
�	�M�4>"G4>"G4>"G4>"G4LLLLLLO>"G4>"G"M("K�����4>"G	&4
>"G"U45$84M�M�$MM��"M�>"G"4>"G&4
>"G"t&4>"G"V
�$*4>"G4
�>"G"$4>"G4>"G4>"G�"���"���4>"G�"���M"���4>"G4>"GCZgl
	`jgcore	kjgi		qjgitems		xjgactions		jgl	�Igsym	Igact	Ign	Vu	gfilenamefsystem/base/lalr.upstream.scm�
�	��		��			
��	
	��		
��		"��	+	
��	/	��	4	
��	=	"��	M	,��	`	
��	f	��	k	��	k	��	q�	"��	q	��	x�	"��	x	��		 ��		���	���	���	���	%���	1��� 	���!	���#	����	��	��		��
	��	��	��	��	��)	��-	��.	��2	��7	��D		��N		��O
	��V
	)��V
	��]�	��a�	��h�	"��i�	��r�	��z
	���	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	���	���	���	���	��+�	��=
	��C
	��I�	��R%	��d&	��j&	��j	
��s	
��w	��|	
���	
��Y	�
gnamegprint-states�C
h��]#4LO>"G45$��"
N
45$��&"N"4L5M	M4L
54L	54
5$4��4LLLLLLLLO>"G"4L>"GC�goptions
	�gtokens	�grules		�goption		$	:goption		C	mgdriver-type		O	fggram/actions		v�gcode	��goption	��g	file-name	��
gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	��	 �	��	$�	��	$�	��	,�	��	/�	*��	7�	��	;�	��	?�	��	C�	��	C�	��	K�	��	N�	��	O�	
��	U�	3��	Y�	��	[�	9��	a�	E��	c�	��	n�	��	v�	��	|�	����	8����	L����	����	����	����	����	����	����	����	����	
����	����	��&	�	gnamegbuild-driver�C"D�Th(�]�$45	�$��6CC�goption
		#gfilenamefsystem/base/lalr.upstream.scm�
m	��	n	��		n	
��	
o	��	o	��	n	
��	p	��	p	��			#C<�Th0�]�$$45	�$���$	���6CCC�goption
		/gfilenamefsystem/base/lalr.upstream.scm�
r	��	s	��		s	
��	
t	��	t	��	s	
��	u	��	u	��	 s	
��	%v	��	)v	��		/CA�Uh8�]�$&45	�$4��5$��
�CCCC�goption
		1gfilenamefsystem/base/lalr.upstream.scm�
x	��	y	��		y	
��	
z	��	z	��	y	
��	{	��	{	��	 {	��	$y	
��	'|	��	*|	��
		1CB�VXh0�]�$%45	�$���$
��6CCC�goption
		0gfilenamefsystem/base/lalr.upstream.scm�
	��	�	��		�	
��	
�	��	�	��	�	
��	�	��	�	��	 �	
��	%�	��	*�	��		0C5h�-13`H1H0H/H.H-H,H+H*H)H(H'H&H%H$H#H"H!H HHHHHHHHHHHHHHHHHHH
HHH
H	HHHHHHHH2O53O4O5O6O7O8O9	O:
O;O<O=
O>O
?O@OAOBOCODOEOFO
GHOIOJOKOLOMONOOOP Q!R"S#T$OU%OV&W"�"n^�$_^�__�$H4'_�5$14(_�J15$_[�\]^�^]\["���Z[_^�6Z[_^�6Z[_^�6)*^6Y^]\["���+OXO459?MN0/,-*)('&%$#"! 

	Q3Q4Q5RSQ6R6Q7Q8>:=$%(8!" 7	Q9(S	
Q:<Q;"# Q<;
Q=&'Q>JKIGEDCBA@*Q?!
 Q@$ QA& QBQC*
 QD$)
QEQF
FK*)QGHF
)QI *2QJ2*)QK-QL/0,-.#+
 QM TQNPQOLQQP
QU+QV0/!WVU3+.1QXKKKKKKKKK	K
KKK
KKKKKKKKKKKKKKKKKKK K!K"K#K$K%K&K'K(K)K*,K+K,K-
K.K/K0-.�/0�12�34�K1XZY"��g�g	arguments
		grrhs	:grlhs		:gritem		:gnullable		:gderives		:gfderives		:gfirsts		:gkernel-base		:g
kernel-end			:gshift-symbol	
	:g	shift-set		:gstate-table		:gacces-symbol	
	:greduction-table		:gshift-table		:g
consistent		:g
lookaheads		:gLA		:gLAruleno		:glookback		:ggoto-map		:g
from-state		:gto-state		:gincludes		:gF		:gaction-table		:gnitems		:gnrules		:gnvars		:gnterms		:gnsyms		:gnstates	 	:gfirst-state	!	:g
last-state	"	:gfinal-state	#	:gfirst-shift	$	:g
last-shift	%	:gfirst-reduction	&	:glast-reduction	'	:gnshifts	(	:gngotos	)	:gtoken-set-size	*	:gdriver-name	+	:gthe-terminals/prec	,	:grule-precedences	-	:gexpected-conflicts	.	:g
the-terminals	/	:gthe-nonterminals	0	:g*valid-options*	1	:glst	Y{�gproc	Z{�goptions	[�gtokens	\�grules	]�glst	^�gp	_��g	bit-union	2ggen-tables!	3gpack-grammar	4gset-derives	5g
set-firsts	6gset-fderives	7gclosure	8ggenerate-states	9gnew-itemsets	:g	get-state	;g	new-state	<g
append-states	=gsave-reductions	>glalr	?gset-accessing-symbol	@gset-shift-table	Agset-reduction-table	Bgset-max-rhs	Cg
initialize-LA	Dgset-goto-map	Egmap-goto	Fginitialize-F	Gg	transpose	Hgbuild-relations	Igcompute-lookaheads	Jgdigraph	Kgadd-rule-precedence!	Lgbuild-tables	Mgcompact-action-table	Ngrewrite-grammar	Ogrewrite-nonterm-def	Pgpos-in-list	Qgsunion	Rgsinsert	Sglalr-filter	Tgbuild-goto-table	Ugbuild-reduction-table	Vgoutput-parser!	Wgbuild-driver	X`gfilenamefsystem/base/lalr.upstream.scm�
�
��{�	���	����	
����	����	����	
����	����	����	����	"����	����	����	����	����	����	����	����	2����	����	����	����	����	����	����	����	����	
����	����	����	����	����	����	���	���l	���l	���q	���q	���w	���w	��~	��~	��k	���	��.		


Chr]	45L4?6jgargs
		gv			gfilenamefsystem/base/lalr.upstream.scm�	�
��		CGHh(p]	45$O@6hgy
		'gtmp		'gfilenamefsystem/base/lalr.upstream.scm�
�
��		'C5R�T �	h��]B�&		�"	45�&		�"	45�&		�"	45�&		�"	45�&
�"	45�&
�"	45�$�45$t45$d45$T45$D
�$",
�$"
�$"
�""""$e�&
�"	45�&�"	45�&		�"	45	�	��C�$o�&
�"	45�&�"	45�&		�"	45��		�C�&
�"	45�&�"	45�&		�"	45��		�CC�gsrc-location-1
	�gsrc-location-2	�goffset-1		n�goffset-2		n�glength-1		n�glength-2		n�gt	�gt	�gt	ginput	��gline	��gcolumn	��ginput	�gline	�gcolumn	�glength		�ginput	ggline	ggcolumn	gglength		ggfilenamefsystem/base/lalr.upstream.scm�
�
��	�	��	 �	��	;�	��	V�	��	n�	��	y�	����	����	����	����	����	����	-����	����	����	����	-����	����	����	����	����	���	���	���	�� �	(��%�	��*�	(��/�	��3�	��6�	!��P�	!��j�	!����	����	����	����	!����	!���	!���	$���	!����	��	!��-	!��G	!��d	$��g	!��g	��1	�	gnamegcombine-locations�CYR�ZR�[hP)]4	4M5�
5"
�$M���"���"4M5�"���NC!g	new-stack
		Kgi		7gfilenamefsystem/base/lalr.upstream.scm�
-	��	.	��	.	'��	.	"��	.	��	.	��	/	��	0	��	 0	��	)2	'��	*2	��	-3	��	33	��	7/	��	8/	��	?/	��	E/	��	I4	��		K
gnameg___growstack�C[h�]M4M5�$L6C�gfilenamefsystem/base/lalr.upstream.scm�
6	��	7	��	7	��	7	��	8	��		
gnameg
___checkstack�CUhX{]M	��NMM�4L�5�M	�N4L>"GMM�MM�45�Csgdelta
		Qgnew-category		Qglvalue			Qgtok			Qgstate			Qg	new-state		 	Qgfilenamefsystem/base/lalr.upstream.scm�
:	��		;	��	
;	��	;	��	<	��	<	��	=	��	=	/��	=	��	 =	��	 <	��	'>	��	)>	��	*?	��	@@	��	EA	��	FA	(��	OA	��		Q	gnameg___push�Chr]NCjgfilenamefsystem/base/lalr.upstream.scm�
&	��	'	��		
gnameg___pushback�Ch�]L�MMLLLO6�gst
		gfilenamefsystem/base/lalr.upstream.scm�
C	��	D	��	D	��		gnameg	___reduce�Ch0�]M	�N4L>"GMM��MM�C�gtoken
		*g	attribute		*gfilenamefsystem/base/lalr.upstream.scm�
F	��	G	��		G	��	
H	��	I	��	!I	��	(J	��		*	gnameg___shift�CLhPO]"B
�$NCM�4L�5$NL��6	�"���M"���Ggtok
		Pgsp		Hgstate			Hgact		'	Hgfilenamefsystem/base/lalr.upstream.scm�
P	��	Q	��	
R	
��	R	��	S	
��	T	��	T	
��	U	��	 U	��	%U	&��	'U	��	'T	
��	/V	��	3X	��	8Y	��	=Y	��	BZ	��	HZ	��	HQ	��		Pgnameg
___recover�C�PVh�G]4L��5M	�N4L>"GMM	��MM	��"�M�$�&
�""&	�NC45$ 4L�5MM��MM���CM$M"4M5NNMN"��~"��z?gstate
	�gtok	�gsync-set		�gtok		A	fgi		f�gact	��gfilenamefsystem/base/lalr.upstream.scm�
\	��	]	��	]	"��	
]	��	]	��	]	��	^	��	^	��	_	��	/`	��	1`	��	8a	��	;a	��	?b	��	Ac	��	Fo	��	Jo	��	Mo	��	Wp	��	fc	��	ld	��	pd	
��	te	��	wf	���f	���g	���g	&���g	���g	���h	*���h	���i	0���i	���"	���"	4���"	���#	���$	���l	���b	��)	�	gnameg___sync�CP��\]^�
h�7] "�M$4MM�M�$�&
�""L�45$��"����$�&M�C&\&4M>"GC4MM>"G4L>"GM
�$N"
NN"��%
�$)4LM>"G&"N"���4L
�>"G"���4MM>"GCMM�L��$	���"4	5�$>
�$4L
�>"G"M
$M	"4M5NN
MN	"M
$M	"4M5NN
MN	"��<"��8/gstate
	@gtok		:gi	:@gl		A	ggy		L	dgact		g@gstate
E�gactsL�gdefact	_�	gfilenamefsystem/base/lalr.upstream.scm�
s	��	t	��	u	��	v	��	v	
��	w	��	o	��	o	��	!o	��	+p	��	:v	
��	Ax	%��	Ax	��	DM	
��	LM	��	TN	��	WN	��	_N	��	gv	
��	lz	��	pz	��	t	��	xz	��	|�	����	���z	����	����	����	����	$����	����	����	$����	����	����	����	����	����	����	.����	����	����	���z	����	���	-���	"���	5���	���	���	���	���	��*�	��+{	��/{	��6{	��E�	��E�	
��L�	��L�	
��Q�	��U�	��X�	*��_�	
��c�	��j�	��n�	��r�	)��v�	��w�	��z�	����	���"	���"	4���"	���#	���$	���"	���"	4���"	���#	���$	����	���t	��V	�
gnameg___run�C�Zh �]NN4
5N
NL6�glexerp
		gerrorp		gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	
�	��	*	��	*	��	+	��	�	��			C
h%]{H	HHHHHHO
OOO
OOOOQ

QQQ
QQ	Q	
QKKK
KKKK		OCgaction-table
	g
goto-table	greduction-table		g	___lexerp			g	___errorp			g___stack			g___sp			g
___curr-input			g___reuse-input			g___input				g___growstack	
	wg
___checkstack		wg___push		wg	___reduce	
	wg___shift		wg
___recover		wg___sync		wg___run		wgfilenamefsystem/base/lalr.upstream.scm�

��		gnameg	lr-driver�C"R�P����_`�Uh8�]4	�5�4L�5�45��C{gdelta
		4gnew-category		4glvalue			4gstack			4gtok			4gstack			4gstate			4g	new-state		"	4gfilenamefsystem/base/lalr.upstream.scm�
�	��	�	��	�	"��	�	��	�	��	�	��	�	��	�	��	�	.��	!�	��	"�	��	"�	��	'�	��	2�	��	3�	��		4	gnamegpush�C�h0]I"�$���"��$���&"���&"4	5�		M�N	"���
�$'M		��			M�N	"���
�	4L	�LLO5			�"��U�"��3L�4L5$�"��"���$45"���C"����gprocess
	-gstacks	g
active-stacks		gstack		gstate		gactions		�g
active-stacks		�gaction		(�g
other-actions		(�gparse			R	^gsymbol			t�g	new-stack		��gstate		��g	new-stack		��gaction-list	��gpair	��gfilenamefsystem/base/lalr.upstream.scm�
		��		��			��	
	
��		$��		��		$��		��		��		��	"	��	%		1��	(
	1��	(		��	0	1��	4	��	@	%��	D
	1��	H	��	I	5��	R	0��	R	%��	Y�	��	[�	��	j	%��	n	%��	r	��	t	6��	}�	��	~�	���	%����	����	���	%���	>���	6����	����	����	���	%���	B���	&���	"���	���	���	K���	7����	����	����	����	
����	
��	��		��
	
��	��	2��	��	��$	��%	=��-	��?	-Ch��]NNNNM�N"{4M5NM�$�&
�""4M5N4LLLLLLO>"G4M5�$"���""���MC�glexerp
	�gerrorp	�gtok		#	Hgsymbol		H�g	processes		Q	~gfilenamefsystem/base/lalr.upstream.scm�
	��	�	��		�	��	
�	��	�	��	
�	��	�	��	#	��	�	��	�	��	�	��	�	��	!�	��	#�	��	(�	��	,�	��	/�	��	9�	��	H�	��	K�	��	Q�	��	T�	��	V�	��	W�	����	���	
���	���	
����	��	�	Ch0$]#HHHHKKKKOCgaction-table
		.g
goto-table		.greduction-table			.g	___lexerp			.g*input*			.g*processes*			.g*parses*			.gfilenamefsystem/base/lalr.upstream.scm�
�
��	�	��	�	��		.	gnameg
glr-driver�C#R`h(�]
�$�$
��6CC�gl
		!gn		!gfilenamefsystem/base/lalr.upstream.scm�
(
��	)	��	
)	��	
)	��	)		��	*	��	*	��	*		��			!	gnamegdrop�C`R`�h�]45�6�gl
		gn		gfilenamefsystem/base/lalr.upstream.scm�
.
��	/	
��	/	
��	/	��			gnameg
take-right�C_Ra�T��	h`�]�&
�"	45��&�"	45��&		�"	45�C�gloc
		^gfilenamefsystem/base/lalr.scm�
	/
��		0	��		0	��		0	��	$	1	
��	<	0	��	A	2	��	Z	0	��			^gnameg"source-location->source-properties�C!RC~gm
		,grtd
{�grtd
$g$�gfilenamefsystem/base/lalr.scm�		
��gfilenamefsystem/base/lalr.upstream.scm�	.		��	1	
��	2	N	��	G	O	��	b	Q	��	i	R	���	V	���	x
��!*�
��(��
��(�
��>�
��I��
��J�(
��K}.
��gfilenamefsystem/base/lalr.scm�L�	/
��	L�
C6PK*[�N�A8A8base/compile.gonu�[���GOOF----LE-8-2.0)8]�4h]gguile�	�	gdefine-module*�	�	�	gsystem�	gbase�	gcompile�		�	
gfilenameS�	fsystem/base/compile.scm�	gimportsS�	
gsyntax�	
�	�	glanguage�	�	�	gmessage�	�	�	gvm�	�	�	gice-9�	gregex�	�	�	goptargs�	�	�	 greceive�	! �	"!�	#"�	$gexportsS�	%gcompiled-file-name�	&gcompile-file�	'gcompile-and-load�	(gread-and-compile�	)g	decompile�	*%&'()�	+gset-current-module�	,+�	-+�	.gerror�	/f"thunk may only be entered once: ~a�	0g	call-once�	1g
string-append�	2f.XXXXXX�	3gmkstemp!�	4fwb�	5gwith-throw-handler�	6gcatch�	76�	86�	9g
stat:perms�	:gstat�	;glognot�	<gumask�	=gchmod�	>g
close-port�	?grename-file�	@gdelete-file�	Agcall-with-output-file/atomic�	Bg	language?�	Cglookup-language�	Dgensure-language�	Egsystem-error�	Fgmkdir�	GgEEXIST�	HgENOENT�	Igensure-directory�	Jgdirname�	Kgthrow�	Lg%compile-fallback-path�	Mgcanonicalize-path�	Ngstring-prefix?�	Of/�	Pg
string-length�	Qg
string-ref�	Rg	substring�	Sg%load-compiled-extensions�	Tgstring-null?�	Ugwarn�	Vf!invalid %load-compiled-extensions�	Wf.go�	Xgoutput-fileS�	YX��	ZgfromS�	[Z	��	\gtoS�	]\	��	^genvS�	_^	��	`goptsS�	a`	��	bgcanonicalizationS�	cb	��	dY[]_ac�	egcurrent-language�	fgobjcode�	ggdefault-environment�	hgrelative�	ig %file-port-name-canonicalization�	jf,failed to create path for auto-compiled file�	kgopen-input-file�	lg
file-encoding�	mgset-port-encoding!�	nfUTF-8�	oglanguage-printer�	pZ��	q\	��	r^	��	s`	��	tb	��	upqrst�	vgvalue�	wgcurrent-module�	xgmap�	ygcdr�	zglookup-compilation-order�	{fno way to compile�	|fto�	}gcompile-passes�	~gcompile-fold�	glanguage-joiner��greverse��gfind-language-joint��fBMultiple expressions read and compiled, but language has no joiner��gdefault-language-joiner��glanguage-reader��geof-object?��glanguage-parser��gread-and-parse��pqrs��g
parameter?��������g	scm-error��gwrong-type-arg��fparameterize��fNot a parameter: ~S��gmemq��gwarningsS��gfor-each��glookup-warning-type��gwarning��gunsupported-warning��glookup-decompilation-order��fno way to decompile��gdecompile-passes��gdecompile-fold��^����[]s��gassembly�C5hp+�]4	
#$*54->"G./h(r]M$4L>"G"NCjgfilenamefsystem/base/compile.scm�
	+	��		,	
��			-	��	
	-	��		-	��	#	.	
��		%
ChJ]CBgfilenamefsystem/base/compile.scm�
	0	��		
C./h(r]M$4L>"G"NCjgfilenamefsystem/base/compile.scm�
	+	��		,	
��			-	��	
	-	��		-	��	#	.	
��		%
ChX�]	HO4O>"GV4>X4>"GCX4>"GF�gthunk
		Tgentered		Tgfilenamefsystem/base/compile.scm�
	(
��		)	��		*	��		Tgnameg	call-once�C0R12340589:hZ]4L56Rgfilenamefsystem/base/compile.scm�
	=	��		=	<��	
	=	0��		
Ch_-13CWgargs
			gfilenamefsystem/base/compile.scm�
	=	��			


C;<=>?	hx�]4LL>"G4LO5$"
44554L��>"G4L>"GLL6�gt
	#	>gperms
	>	[gfilenamefsystem/base/compile.scm�
	9		��		:	��		=	��	#	=	��	2	>	��	5	>	$��	;	>	��	>	=	��	A	?	
��	K	?	��	P	?	
��	\	@	��	u	A	��		u
C>@h(o-134L>"GL6ggargs
			!gfilenamefsystem/base/compile.scm�
	B		��	
	C	��	!	D	��			!


Ch R]LLLLLOLLO6Jgfilenamefsystem/base/compile.scm�
	7	��		8	��		
Ch@"-.,3#4545O6gfilename
		>gproc		>g	reference			>gtemplate			>gtmp		)	>gfilenamefsystem/base/compile.scm�
	3
��		4	��		4	+��		4	��		4	��	!	5	��	'	5	!��	)	5	��	)	4	��	>	6	��		>	gnamegcall-with-output-file/atomic�CARBCh�]45$C6�gx
		gfilenamefsystem/base/compile.scm�
	F
��		G	��	
	G	��		I	��		gnamegensure-language�CDR6EFhR]L6Jgfilenamefsystem/base/compile.scm�
	Q	��		R	��		
CGHIJKhX]
�$�"�$C�$44L5>"GL66gk
		Rgsubr		Rgfmt			Rgargs			Rgrest			Rgerrno			Rgfilenamefsystem/base/compile.scm�
	S	��		T	��			T	��		T	%��		T	��		V	
��		U	��	#	Z	
��	'	U	��	(	[	
��	+	[	��	6	[	
��	D	\	
��	R	^	
��		R	Ch�]OO6�gdir
		gfilenamefsystem/base/compile.scm�
	O
��		P		��		P	��		gnamegensure-directory�CIRL1MNOPQRSTUVW8IJh]]4L56Ugfilenamefsystem/base/compile.scm�
�	��	�	4��	
�	"��		
Ch`-13CXgargs
			gfilenamefsystem/base/compile.scm�
�	��			


Ch��]	$�44545$"B45	�$245:�$44
54	55""	�$"4
	�5$4	>"G
"	�54O5$CCC�gfile
	�gcanon		ngt	q�gf��gfilenamefsystem/base/compile.scm�
	l
��		~	��				��	�	$��	�	��		q	��		q	��		q	��	#	p	��	*	r	��	3	r	��	7	p	��	8	s	��	B	s	��	F	r	��	G	u	��	K	u	��	L	u	��	U	u	/��	_	u	��	q	x	��	q	x	��		y	���	y	���	y	���	x	���	z	���	z	���	z	���	|	���	}	���		���		����	����		��$	�gnamegcompiled-file-name�C%Rdefghi%.jklmnIJAoD(^Z\`h0�]44L554LLLLL5	6�gport
		)gfilenamefsystem/base/compile.scm�
�	��	�	��	�	��	�	��	�	��	)�	
��		)Ch�-/03
##45##	45##Y$"!45$"	4	54
545	4	$	"
>"G445>"G4O>"GZCZF~gfile
	�goutput-file	�gfrom		�gto		�genv		�gopts		�gcanonicalization		�gt		n�gcomp	��gin	��genc		��gfilenamefsystem/base/compile.scm�
�
��	#�	��	1�	��	:�	��	I�	��	S�	)��	a�	��	h�	!��	n�	��	}�	����	����	����	����	����	����	����	����	����	����	%����	����	����	����	����	��	�
goutput-fileS�gfromS	�gtoS	�genvS	�goptsS	�gcanonicalizationS	�gnamegcompile-file�C&Ruevwhi(kZ\`^
hxn-/03#45##45##Y445	
>	ZCZFfgfile
		sgfrom		sgto			sgenv			sgopts			sgcanonicalization			sgfilenamefsystem/base/compile.scm�
�
��	�	,��	(�	D��	1�	 ��	>�	8��	H�	-��	Q�	��	T�	��	o�	��
		s
gfromS�gtoS	�genvS	�goptsS	�gcanonicalizationS	�gnamegcompile-and-load�C'Rxyz.{|h0�]45$"
456�gfrom
		/gto		/gopts			/gt			-gfilenamefsystem/base/compile.scm�
�
��	�	��	�	��	�	��	"�	��	&�	+��	*�	��	/�	��			/	gnamegcompile-passes�C}RhP8](D4�L>G�$""���0gpasses
		Mgx		Mge			Mgcenv			Mgfirst?			Mgx		 	Mge		 	Mgnew-cenv		 	Mgfilenamefsystem/base/compile.scm�
�	��	�	��	�	��	�	 ��	�	!��	�	 ��	#�	��	,�	��	6�	��	M�	
��		M	gnameglp�Ch �]OQ6�gpasses
		gexp		genv			gopts			glp			gfilenamefsystem/base/compile.scm�
�
��	�	��			gnamegcompile-fold�C~R�z.{|hhW]"&(C45$C���"���445$"
455"���Ogfrom
		bgto		bgin			,glang			,gt		8	Vgfilenamefsystem/base/compile.scm�
�
��	�	��	�	��	�	��	�	��	 �	��	#�	��	,�	��	,�	��	-�	��	0�	��	8�	��	G�	��	K�	#��	O�	<��	S�	��	X�	��	b�	��		b	gnamegfind-language-joint�C�R.�h(�]"L6�$�(�C"���"��ޯgexps
		(genv		(gfilenamefsystem/base/compile.scm�
�	��	
�		��	�	��	�	��	�	
��	�	��	�	!��	�	��	�	��
		(	Ch�]OCyglang
		
gfilenamefsystem/base/compile.scm�
�
��		
gnamegdefault-language-joiner�C�R���h8
]445545$C45$6Cglang
		8gport		8gcenv			8gexp			8gt		'	8gfilenamefsystem/base/compile.scm�
�
��	�	
��	�	��	�	
��	�	��	�	��	�	��	!�	��	'�	��	5�	0��		8	gnamegread-and-parse�C�R�efgD�������e�>��Z\^g`~}h��]#445L545$b4L>"G44L5$"4L5455	L
L$"4L5
L6	4445LL5L>G�"��J�gexps
	�genv	�gcenv		�gx		�gt		9	Qgjexp	��gjenv	��gjcenv	��gfilenamefsystem/base/compile.scm�
�	��	�	��	�	#��	�	��	�	
��	�	��	�	��	�	��	2�	��	3�	��	9�	��	H�	��	R�	��	\�	��	l�	��	s�	%��	�	����	����	 ����	0����	 ����	����	����	����	��	�	gnameglp�C
h��-/03
#45##	45#45454545$"4	
>"G�4	�5YO		Q	4	>ZCZF�gport
	�gfrom	�gto		�genv		�gopts		�gfrom		P�gto		P�gjoint		]�gt-3ee4cd0d75-1ff		a�glp		��
gfilenamefsystem/base/compile.scm�
�
��	�	!��	(�	��	1�	 ��	@�	!��	C�	��	J�	��	P�	��	U�	��	]�	��	a�	����	����	����	��	�
gfromS�gtoS	�genvS	�goptsS	�gnamegread-and-compile�C(R�evg������h �]	45$C6�gw
		gt			gfilenamefsystem/base/compile.scm�
�	��	�	��		�	��	�	#��	�	��		C~}h��-/03#45##	45#45�$!��4>"G"4	4
5>GC�gx
	�gfrom	�gto		�genv		�gopts		�gwarnings		K	xgwarnings		X	qgexp	��genv	��gcenv	��
gfilenamefsystem/base/compile.scm�
�
��	�	��	(�	��	1�	��	@�	��	C�	��	K�	��	P�	��	T�	��	W�	��	X�	��	[�	
��	y�	��	|�	����	����	��	�
gfromS�gtoS	�genvS	�goptsS	�gnamegcompile�CRxy�.�|h0�]45$"
456�gfrom
		/gto		/gopts			/gt			-gfilenamefsystem/base/compile.scm�

��		��		��		��	"	��	&	-��	*	��	/	��			/	gnamegdecompile-passes�C�R�h8](D4�>G�6gpasses
		2gexp		2genv			2gopts			2gexp			2genv			2gfilenamefsystem/base/compile.scm�


��		��		��	
	��	
	��	
	��	!
	��	*	��	2	��
		2	gnamegdecompile-fold�C�R�v���hP-/03####456gx
		Ngenv		Ngfrom			Ngto			Ngopts			Ngfilenamefsystem/base/compile.scm�

��	$	��	.	��	7	��	<	��	N	��		N
genvS�gfromS	�gtoS	�goptsS	�gnameg	decompile�C)RC�gm
		,gfilenamefsystem/base/compile.scm�		
���	(
���	3
���	F
��c	O
��)	l
����
����
���
����
��r�
���
��h�
��#��
��'L�
��(�
��)�

��+n
��	+p
C6PK*[=��M�Mxref.gonu�[���PK*[�br>*?*?�Mvm/trap-state.gonu�[���PK*[ȣ<��(�vm/frame.gonu�[���PK*[�WMM�vm/instruction.gonu�[���PK*[Zk�W����v�vm/coverage.gonu�[���PK*[i�v�@@�Cvm/trace.gonu�[���PK*[7*9Q99
)cvm/objcode.gonu�[���PK*[j~Y��=�=
�fvm/program.gonu�[���PK*[��p�t�tפvm/traps.gonu�[���PK*[�V/$$�vm/vm.gonu�[���PK*[,��#�&�&
vm/inspect.gonu�[���PK*[���:�&�&
IEforeign.gonu�[���PK*[e�RJMDMD.lrepl/server.gonu�[���PK*[��)?d'd'��repl/error-handling.gonu�[���PK*[C��ŵ���c�repl/command.gonu�[���PK*[�'�f�,�,W�repl/repl.gonu�[���PK*[<5�^77v�repl/common.gonu�[���PK*[�<67y,y,
��repl/debug.gonu�[���PK*[�L�W:�:��repl/coop-server.gonu�[���PK*[��Wl``
�base/ck.gonu�[���PK*[����
��base/types.gonu�[���PK*[�A5M���rbase/target.gonu�[���PK*[�^�}DD�base/pmatch.gonu�[���PK*[�v�f�s�s��base/message.gonu�[���PK*[;�m���base/language.gonu�[���PK*[��3�L�L}7base/syntax.gonu�[���PK*[�y�����W�base/lalr.gonu�[���PK*[�N�A8A8@
base/compile.gonu�[���PKx�x