Da

✏️ Editing: active-slot.go

GOOF----LE-8-2.0������]���4��h�������]�g��guile�	��	g��define-module*�	��	��	g��oop�	g��goops�	g��active-slot�		��	
g��filenameS�	f��oop/goops/active-slot.scm�	g��importsS�	
g��internal�	
��	��	��	g��exportsS�	g��<active-class>�	��	g��set-current-module�	��	��	��	g��toplevel-define!�	��	��	g��
make-class�	g��<class>�	g��nameS�	g��defined?�	��	 ��	!g��is-a?�	"!��	#!��	$��	%��	&g��memq�	'g��<object>�	('��	)'��	*g��class-precedence-list�	+*��	,*��	-g��class-redefinition�	.-��	/-��	0g��compute-get-n-set�	1g��make�	21��	31��	4g��	<generic>�	54��	64��	7g��add-method!�	87��	97��	:g��<method>�	;:��	<:��	=g��specializersS�	>g��<top>�	?>��	@>��	Ag��formalsS�	Bg��class�	Cg��slot�	DBC��	Eg��bodyS�	Fg��if�	Gg��eq?�	Hg��slot-definition-allocation�	IHC��	Jg��activeS�	KGIJ��	Lg��let*�	Mg��index�	Ng��slot-ref�	Og��quote�	Pg��nfields�	QOP��	RNBQ��	SMR��	Tg��s�	Ug��cdr�	VUC��	WTV��	Xg��
before-ref�	Yg��get-keyword�	Zg��before-slot-refS�	[YZT��	\X[��	]g��	after-ref�	^g��after-slot-refS�	_Y^T��	`]_��	ag��before-set!�	bg��before-slot-set!S�	cYbT��	dac��	eg��
after-set!�	fg��after-slot-set!S�	gYfT��	heg��	ig��unbound�	jg��make-unbound�	kj��	lik��	mSW\`dhl��	ng��	slot-set!�	og��+�	poM��	qnBQp��	rg��list�	sg��lambda�	tg��o�	ut��	vXt��	wg��let�	xg��res�	yg��%fast-slot-ref�	zytM��	{xz��	|{��	}g��and�	~g��not�	g��eqv?���xi����~�����]t����}]������w|�x����Fv�k����FX������su�����g��v���t�����at�����g��begin���g��%fast-slot-set!����tM�����et�����}e������������F������Fa������s������r������Lmq�����g��next-method��������FK�����������g��make-procedureS���g��	procedureS�C�5�h��|���]4	
5�4�>��"��G���"��+44ii���5>��"��xG��"��q4 5$��b4#i%5$��K4&i)4,i55$��-4/i4ii���5>��"��G��"��"��t"��"��l"��"��d4 05���$��"��0i��$��!4043605>��"��G��"���90i43<=i@�ADE��HJNPYZ^bfjnyj��h��������]	L$��F4L�5$��74�L�5L$��#L�$��"��4L�>��"��G��"���C6�4�L�5L$��#L�$��"��4L�>��"��G��"���C�����������g��o
	���g��res		J�g��res	W����g��filenamef��oop/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>��"��G��L�$��L��6CC4�L>��"��G��L�$��L��6C�������������g��o
		c�g��v		c��g��filenamef��oop/goops/active-slot.scm�
	5	��		6	��			7	��		7	��		9	��	1	:	��	9	:	*��	>	<	��	Y	=	��	a	=	&���		c	���C��h�������]:45&��z4�5�4545454	54
5�4��>��"��G��O�
O��CL��6��������������g��class
	���g��slot	���g��index		���g��s		���g��
before-ref		)���g��	after-ref		5���g��before-set!		A���g��
after-set!		M���g��unbound		T����	g��filenamef��oop/goops/active-slot.scm�
	 
��		!	��		!	��		"	��		"	*��		"	��		"	��		#	��		"	��	 	$	��	)	"	��	,	%	��	5	"	��	8	&	��	A	"	��	D	'	��	M	"	��	P	(	��	T	"	��	W	)	��	]	)	��	`	)	"��	e	)	����	*	����	 
���	��	���C��h���j���]�O�C������b�������g��real-next-method
		
��g��filenamef��oop/goops/active-slot.scm�
	 
���		
���C�56�������t�������g��m
		,�g��t
������g��filenamef��oop/goops/active-slot.scm�		
��	1	
����	 
���	
���C6�

📁 Sid Gifari File Manager