Da

✏️ Editing: srfi-11.go

GOOF----LE-8-2.0L������]���4����h�������]�g��guile�	��	g��define-module*�	��	��	g��srfi�	g��srfi-11�	��		g��filenameS�	
f��srfi/srfi-11.scm�	g��exportsS�	g��
let-values�	
g��let*-values�	
��	g��set-current-module�	��	��	g��cond-expand-provide�	g��current-module�	��	g��make-syntax-transformer�	��	��	g��macro�	g��$sc-dispatch�	��	��	g��_�	g��any�	��	��	 g��each-any�	! ��	"!��	#"��	$g��
syntax-object�	%g��call-with-values�	&g��top�	'&��	(g��ribcage�	)g��binds�	*g��exp�	+g��b0�	,g��b1�	-)*+,��	.''''��	/f��l-46961e50cb-93�	0f��l-46961e50cb-94�	1f��l-46961e50cb-95�	2f��l-46961e50cb-96�	3/012��	4(-.3��	5(��	6g��x�	76��	8'��	9f��l-46961e50cb-90�	:9��	;(78:��	<'45;��	=g��hygiene�	>=��	?$%<>��	@g��lambda�	A$@<>��	B !��	CB��	D  ��	Eg��let�	Fg��id�	Gg��tmp�	HFG��	I''��	Jf��l-46961e50cb-af�	Kf��l-46961e50cb-b0�	LJK��	M(HIL��	Ng��lp�	Og��clauses�	Pg��ids�	Qg��tmps�	RNOPQ��	Sf��l-46961e50cb-a3�	Tf��l-46961e50cb-a4�	Uf��l-46961e50cb-a5�	Vf��l-46961e50cb-a6�	WSTUV��	X(R.W��	Yg��clause�	ZY+,��	['''��	\f��l-46961e50cb-9d�	]f��l-46961e50cb-9e�	^f��l-46961e50cb-9f�	_\]^��	`(Z[_��	a'5M5X`5;��	b$Ea>��	cg��map�	dc��	ec��	fg��list�	gg��syntax-violation�	hg��	ig��	jf��-source expression failed to match any pattern�	k ��	lg��generate-temporaries�	m   ��	ng��append�	on��	pn��	qg��inner�	rq��	sf��l-46961e50cb-c7�	ts��	u(r8t��	vg��new-tmp�	wvFG��	xf��l-46961e50cb-bf�	yf��l-46961e50cb-c0�	zf��l-46961e50cb-c1�	{xyz��	|(w[{��	}g��var�	~}*��	f��l-46961e50cb-b8���f��l-46961e50cb-b9��������(~I�����'5u55|�5X`5;����$%�>����$@�>��������g��each����������  ��������g��args���q�����f��l-46961e50cb-e2���f��l-46961e50cb-e3���������(�I�����g��new-var���v�FG����f��l-46961e50cb-d7���f��l-46961e50cb-d8���f��l-46961e50cb-d9���f��l-46961e50cb-da�����������(�.�����g��vars����*����f��l-46961e50cb-d0���f��l-46961e50cb-d1���������(�I�����'5�55��5X`5;����$%�>����$@�>���� ���������g��dummy���g��body���������g��m-46961e50cb-104����&�����'����f��l-46961e50cb-109���f��l-46961e50cb-10a���������(������������f��l-46961e50cb-106��������(7������'�5�����$E�>��������������� ���������g��vars-1���g��	binding-1���g��vars-2���g��	binding-2��������������'''''����f��l-46961e50cb-10f���f��l-46961e50cb-110���f��l-46961e50cb-111���f��l-46961e50cb-112���f��l-46961e50cb-113���f��l-46961e50cb-114�������������(�������'�5�����$%�>����$@�>����$
�>��C�5�������h@��r���]4	
5�4�>��"��G���4i4i5�>��"��G��4#?A�h ���^���]������C�����V�������g��binds
		�g��exp		�g��b0			�g��b1			��			���CCDbef��������h���;���]4�5L�L���C�3�������g��id
		�g��tmp		��			���Cijklmp��������h8�������]4L�L�4L54�55L����C�����������g��new-tmp
		5�g��id		5�g��tmp			5�g��tmp			5��g��filenamef��srfi/srfi-11.scm�		W	'��		W	+��		W	'��		W	���		5	���Cij�����h@�������]4�5L�L�45$��LL�O�@6�����������g��var
		=�g��exp		=�g��tmp			=�g��tmp			=��g��filenamef��srfi/srfi-11.scm�		S	-��		S	���		=	���C�l�h �������]�4��5��4L�5�C��������������g��id
		�g��rest		��g��filenamef��srfi/srfi-11.scm�		c	,��		b	+��		a	$��		d	+��		a	$���			���Cl����h0�������]	4�5$��L�O�@�4��5���C��������g��vars
		0�g��tmp		0��g��filenamef��srfi/srfi-11.scm�
	^	��	!	g	/��	+	f	.��	,	e	'��	/	h	.���		0��g��nameg��lp��C�p������h���*���]�C���"�������g��id
		��		���C���h���o���]�4L�5�C���g�������g��id
		
�g��rest		
��g��filenamef��srfi/srfi-11.scm�		r	=��		q	7���		
	���Cij��h@�������]4�5$��@4�5$��L�O�@�6��~�������g��tmps
		>�g��tmp		>�g��tmp		"	>��g��filenamef��srfi/srfi-11.scm�
	n	&���		>��g��nameg��lp��C��������h ���?���]L�����C�������7�������g��inner
		�g��args		��			���Cij��h`�������]4L�L�454�55O�Q�4�5�45$��LO�@6�����������g��new-tmp
		]�g��new-var		]�g��id			]�g��tmp			]�g��lp		$	3�g��tmp		6	]�g��tmp		A	]��g��filenamef��srfi/srfi-11.scm�		k	'��		k	+��		k	'��	$	n	&��	6	k	���		]	���Cij�������hP�������]O�Q�4�5L�L�45$��LLO�@6�������������g��vars
		K�g��exp		K�g��lp		
	�g��tmp		 	K�g��tmp		+	K��g��filenamef��srfi/srfi-11.scm�	
	^	��	 	]	���		K	���C�
��h������]�(��0�45$��
LLO�@6��45$���L�O�@45$��	�L�O�@6��������������g��clauses
	���g��ids	���g��tmps		���g��tmp			8�g��tmp			8�g��tmp		;���g��tmp		F���g��tmp		h����g��filenamef��srfi/srfi-11.scm�
	I	��		L		��		M	
��	;	Q	��	;	Q	
���	��	��g��nameg��lp��C������h �������]O�Q��6�����������g��clause
		�g��b0		�g��b1			�g��lp			��g��filenamef��srfi/srfi-11.scm�		I	��		J	��		K	��		I	���			���Cij��������h@���t���]4�5$��@4�5$��@�6�������l�������g��x
		9�g��tmp		9�g��tmp		"	9��g��filenamef��srfi/srfi-11.scm�
	C	���		9���C5R4
�������h���?���]��C������7�������g��dummy
		
�g��body		
��		
	���C����ef�h(�������]�45����C��������g��dummy
		(�g��vars-1		(�g��	binding-1			(�g��vars-2			(�g��	binding-2			(�g��body			(��		(	���Cij����h@�����]4�5$��@4�5$��@�6���������������g��x
		9�g��tmp		9�g��tmp		"	9��g��filenamef��srfi/srfi-11.scm�
��	���		9��g��
macro-typeg��syntax-rules�g��patternsg��bodyg��...�g��vars-1g��	binding-1�g��vars-2g��	binding-2�g��...�g��bodyg��...���C5
RC���j�������g��m
		(��g��filenamef��srfi/srfi-11.scm�		&
��	)	)
��	.	)	��	6	)	&��	;	)
���	=
���C6�

📁 Sid Gifari File Manager