GOOF----LE-8-2.0]�4h�]
gguile�	

�	gdefine-module*�	�	�	goop�	ggoops�	gactive-slot�		�	
gfilenameS�	foop/goops/active-slot.scm�	gimportsS�	
ginternal�	
�	
�	
�	gexportsS�	g<active-class>�	
�	gset-current-module�	�	�	�	gtoplevel-define!�	�	�	g
make-class�	g<class>�	gnameS�	gdefined?�	�	 �	!gis-a?�	"!�	#!�	$�	%�	&gmemq�	'g<object>�	('�	)'�	*gclass-precedence-list�	+*�	,*�	-gclass-redefinition�	.-�	/-�	0gcompute-get-n-set�	1gmake�	21�	31�	4g	<generic>�	54�	64�	7gadd-method!�	87�	97�	:g<method>�	;:�	<:�	=gspecializersS�	>g<top>�	?>�	@>�	AgformalsS�	Bgclass�	Cgslot�	DBC�	EgbodyS�	Fgif�	Ggeq?�	Hgslot-definition-allocation�	IHC�	JgactiveS�	KGIJ�	Lglet*�	Mgindex�	Ngslot-ref�	Ogquote�	Pgnfields�	QOP�	RNBQ�	SMR�	Tg
s�	Ugcdr�	VUC�	WTV�	Xg
before-ref�	Ygget-keyword�	Zgbefore-slot-refS�	[YZT�	\X[�	]g	after-ref�	^gafter-slot-refS�	_Y^T�	`]_�	agbefore-set!�	bgbefore-slot-set!S�	cYbT�	dac�	eg
after-set!�	fgafter-slot-set!S�	gYfT�	heg�	igunbound�	jgmake-unbound�	kj
�	lik�	mSW\`dhl�	ng	slot-set!�	og
+�	poM�	qnBQp�	rglist�	sglambda�	tg
o�	ut
�	vXt�	wglet�	xgres�	yg%fast-slot-ref�	zytM�	{xz�	|{
�	}gand�	~gnot�	geqv?��xi��~���]t��}]����w|�x��Fv�k��FX����su���g
v��t���at���gbegin��g%fast-slot-set!���tM���et���}e��������F����Fa����s����r����Lmq���gnext-method���
��FK�����
��gmake-procedureS��g	procedureS�C5
h|]4	
54>
"G"+44ii
5>"xG"q4 5
$b4#i%5$K4&i)4,i5
5$-4/i4ii
5>"G""��t""��l""��d4 05
�$"0i�$!4043605>"G"90i43<=i@ADE��HJNPYZ^bfjnyjh��]	L$F4L5
$74
L5
L$#
L
�$"4L>
"G"
C64
L5
L$#
L
�$"4L>
"G"
C�g
o
	�gres		Jgres	W�gfilenamefoop/goops/active-slot.scm�
	*	��		+	��			,	��		,	��		-	#��		-	��	$	.	��	)	.	.��	-	.	��	2	.	B��	N	0	��	O	1	��	W	1	��	_	2	��	d	2	*��	h	2	��	m	2	>��	�
C�hh�]L$54L
5$&4
L

>"GL$L
6CC4
L

>"GL$L
6C�g
o
		cg
v		cgfilenamefoop/goops/active-slot.scm�
	5	��		6	��			7	��		7	��		9	��	1	:	��	9	:	*��	>	<	��	Y	=	��	a	=	&��		c	
Ch��
]:4

5
&z45
�4545454	54
54�>"GO
OCL
6�
gclass
	�gslot	�gindex		�g
s		�g
before-ref		)�g	after-ref		5�gbefore-set!		A�g
after-set!		M�gunbound		T�	gfilenamefoop/goops/active-slot.scm�
	 
��		!	��		!	��		"	��		"	*��		"	��		"	��		#	��		"	��	 	$	��	)	"	��	,	%	��	5	"	��	8	&	��	A	"	��	D	'	��	M	"	��	P	(	��	T	"	��	W	)	��	]	)	��	`	)	"��	e	)	���	*	���	 
��	�	
Chj]

O
Cbgreal-next-method
		

gfilenamefoop/goops/active-slot.scm�
	 
��		

C�56tg
m
		,g
t
��gfilenamefoop/goops/active-slot.scm�		
��	1	
���	 
��	

C6