GOOF----LE-8-2.0/� ]� 4 hZw ] g primitive-eval� g current-module� g warn� f 0module system is booted, we should have a module� g module-variable� g resolve-module� g macro?� g
macro-type� g
macro-binding�
g %expanded-vtables� g assq� g name�
g public� g private� g module-name� g bare� g hygiene� g syntax-violation� f bad module kind� g for-each� g lexical� g macro� g ellipsis� g module-define!� g make-syntax-transformer� g
vector-length� g
syntax-object� g symbol->string� g
module-gensym� f l� g list->vector� g make-vector� !g append� "g ribcage� #g shift� $g list-ref� %g id-var-name� &f
invalid id� 'g supports-source-properties?� (g set-source-properties!� )g source-properties� *g
begin-form� +g $sc-dispatch� ,g _� -, � .g apply� /g any� 0g each-any� 1/0�� 2,1�� 3f -source expression failed to match any pattern� 4g local-syntax-form� 5g eval-when-form� 601�� 7,6�� 8g e� 9g memq� :g eval� ;g expand� <g c&e� =: � >g load� ?g compile� @?> � Ag c� B> � Cg define-syntax-form� Dg define-syntax-parameter-form� Eg guile� FE � Gg define-form� Hg global� IH � Jg displaced-lexical� KJ � Lg core� Mg
module-ref� Ng module-local-variable� Og module-add!� Pg make-undefined-variable� Qg variable?� Rf identifier out of context� Sf "cannot define keyword at top level� Tg
procedure?� U � Vg eval-when� Wf invalid situation� Xg lexical-call� Yg global-call� Zg core-form� [g local-syntax� \g begin� ]g define� ^,// � _//�� `_1�� a,`�� b,/ � cg if� dg top� ed � f � ge � hf l-bde397a-100e� ih � j"fgi � k" � lg key� ml � ng
m-bde397a-fde� ond � po � qf
l-bde397a-fdf� rq � s"mpr � tg ftype� ug fval� vg fform� wg fe� xg fw� yg fs� zg fmod� {tuvwxyz � |eeeeeee � }f
l-bde397a-fd7� ~f
l-bde397a-fd8� f
l-bde397a-fd9� �f
l-bde397a-fda� �f
l-bde397a-fdb� �f
l-bde397a-fdc� �f
l-bde397a-fdd� �}~���� � �"{|� � �g first� �� � �f
l-bde397a-fce� �� � �"�g� � �g r� �g w� �g s� �g rib� �g mod� �g for-car?� �8������ � �f
l-bde397a-fb6� �f
l-bde397a-fb7� �f
l-bde397a-fb8� �f
l-bde397a-fb9� �f
l-bde397a-fba� �f
l-bde397a-fbb� �f
l-bde397a-fbc� �������� � �"�|� � �g lambda-var-list� �g gen-var� �g strip� �g expand-lambda-case� �g lambda*-formals� �g expand-simple-lambda� �g lambda-formals� �g ellipsis?� �g expand-void� �g eval-local-transformer� �g expand-local-syntax� �g expand-body� �g expand-macro� �g expand-application� �g expand-expr� �g syntax-type� �g parse-when-list� �g expand-install-global� �g expand-top-sequence� �g expand-sequence� �g source-wrap� �g wrap� �g bound-id-member?� �g distinct-bound-ids?� �g valid-bound-ids?� �g
bound-id=?� �g free-id=?� �g with-transformer-environment� �g transformer-environment� �g resolve-identifier� �g locally-bound-identifiers� �g same-marks?� �g
join-marks� �g
join-wraps� �g smart-append� �g make-binding-wrap� �g extend-ribcage!� �g make-empty-ribcage� �g new-mark� �g anti-mark� �g
the-anti-mark� �g top-marked?� �g top-wrap� �g
empty-wrap� �g set-ribcage-labels!� �g set-ribcage-marks!� �g set-ribcage-symnames!� �g ribcage-labels� �g
ribcage-marks� �g ribcage-symnames� �g ribcage?� �g make-ribcage� �g
gen-labels� �g gen-label� �g
wrap-subst� �g
wrap-marks� �g make-wrap� �g id-sym-name&marks� �g id-sym-name� �g id?� �g
nonsymbol-id?� �g
global-extend� �g lookup� �g macros-only-env� �g extend-var-env� �g
extend-env� �g null-env� �g
binding-value� �g binding-type� �g make-binding� �g arg-check� �g source-annotation� �g no-source� �g set-syntax-object-module!� �g set-syntax-object-wrap!� �g set-syntax-object-expression!� �g syntax-object-module� �g syntax-object-wrap� �g syntax-object-expression� �g syntax-object?� �g make-syntax-object� �g build-lexical-var� �g build-letrec� �g build-named-let� �g build-let� �g build-sequence� �g
build-data� �g
build-primref� �g build-lambda-case� �g build-case-lambda� �g build-simple-lambda� �g build-global-definition� �g build-global-assignment� �g build-global-reference� �g analyze-variable� �g build-lexical-assignment� �g build-lexical-reference� �g build-dynlet� �g build-conditional� �g build-application� �g
build-void� g maybe-name-value!�g decorate-source�g get-global-definition-hook�g put-global-definition-hook�g
session-id�g local-eval-hook�g top-level-eval-hook�g fx<�g fx=� g fx-�
g fx+�g set-lambda-meta!�g lambda-meta�
g lambda?�g make-dynlet�g make-letrec�g make-let�g make-lambda-case�g make-lambda�g
make-sequence�g make-application�g make-conditional�g make-toplevel-define�g make-toplevel-set�g make-toplevel-ref�g make-module-set�g make-module-ref�g make-lexical-set�g make-lexical-ref�g make-primitive-ref�g
make-const�g make-void� ���������������;����������������%����������������������������������������������������������������������
��!eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee ��"f
l-bde397a-b9e�#f
l-bde397a-b9c�$f
l-bde397a-b9a�%f
l-bde397a-b98�&f
l-bde397a-b96�'f
l-bde397a-b94�(f
l-bde397a-b92�)f
l-bde397a-b90�*f
l-bde397a-b8e�+f
l-bde397a-b8c�,f
l-bde397a-b8a�-f
l-bde397a-b88�.f
l-bde397a-b86�/f
l-bde397a-b84�0f
l-bde397a-b82�1f
l-bde397a-b80�2f
l-bde397a-b7e�3f
l-bde397a-b7c�4f
l-bde397a-b7a�5f
l-bde397a-b78�6f
l-bde397a-b76�7f
l-bde397a-b74�8f
l-bde397a-b72�9f
l-bde397a-b70�:f
l-bde397a-b6e�;f
l-bde397a-b6c�<f
l-bde397a-b6a�=f
l-bde397a-b68�>f
l-bde397a-b66�?f
l-bde397a-b64�@f
l-bde397a-b62�Af
l-bde397a-b60�Bf
l-bde397a-b5e�Cf
l-bde397a-b5c�Df
l-bde397a-b5a�Ef
l-bde397a-b58�Ff
l-bde397a-b56�Gf
l-bde397a-b54�Hf
l-bde397a-b52�If
l-bde397a-b4a�Jf
l-bde397a-b41�Kf
l-bde397a-b3e�Lf
l-bde397a-b30�Mf
l-bde397a-b26�Nf
l-bde397a-b17�Of
l-bde397a-b09�Pf
l-bde397a-b07�Qf
l-bde397a-b05�Rf
l-bde397a-b03�Sf
l-bde397a-b01�Tf
l-bde397a-aff�Uf
l-bde397a-afd�Vf
l-bde397a-afb�Wf
l-bde397a-af9�Xf
l-bde397a-af6�Yf
l-bde397a-af4�Zf
l-bde397a-ae6�[f
l-bde397a-ad8�\f
l-bde397a-aca�]f
l-bde397a-ac8�^f
l-bde397a-abe�_f
l-bde397a-abb�`f
l-bde397a-ab9�af
l-bde397a-ab7�bf
l-bde397a-ab5�cf
l-bde397a-ab3�df
l-bde397a-ab1�ef
l-bde397a-aaf�ff
l-bde397a-aa1�gf
l-bde397a-a97�hf
l-bde397a-a8c�if
l-bde397a-a75�jf
l-bde397a-a67�kf
l-bde397a-a64�lf
l-bde397a-a56�mf
l-bde397a-a54�nf
l-bde397a-a52�of
l-bde397a-a50�pf
l-bde397a-a4e�qf
l-bde397a-a4c�rf
l-bde397a-a4a�sf
l-bde397a-a48�tf
l-bde397a-a46�uf
l-bde397a-a39�vf
l-bde397a-a36�wf
l-bde397a-a34�xf
l-bde397a-a32�yf
l-bde397a-a30�zf
l-bde397a-a2e�{f
l-bde397a-a2c�|f
l-bde397a-a2a�}f
l-bde397a-a28�~f
l-bde397a-a26�f
l-bde397a-a24��f
l-bde397a-a22��f
l-bde397a-a20��f
l-bde397a-a1e��f
l-bde397a-a1c��f
l-bde397a-a1a��f
l-bde397a-a18��f
l-bde397a-a16��f
l-bde397a-a14��f
l-bde397a-a12��f
l-bde397a-a10��f
l-bde397a-a0e��f
l-bde397a-a0c��f
l-bde397a-a0a��f
l-bde397a-a08��f
l-bde397a-a06��f
l-bde397a-a04��f
l-bde397a-9f6��f
l-bde397a-9e8��f
l-bde397a-9da��f
l-bde397a-9cc��f
l-bde397a-9ca��f
l-bde397a-9c8��f
l-bde397a-9c6��f
l-bde397a-9c3��f
l-bde397a-9c1��f
l-bde397a-9bf��f
l-bde397a-9bd��f
l-bde397a-9bb��f
l-bde397a-9b9��f
l-bde397a-9b7��f
l-bde397a-9b5��f
l-bde397a-9b3��f
l-bde397a-9b1��f
l-bde397a-9af��f
l-bde397a-9ad��f
l-bde397a-9ab��f
l-bde397a-9a9��f
l-bde397a-9a7��f
l-bde397a-9a5��f
l-bde397a-9a3��f
l-bde397a-9a1��"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~����������������������������������������� ���" !� ��g define-structure��g define-expansion-accessors��g define-expansion-constructors����� ��eee ��f
l-bde397a-967��f
l-bde397a-92f��f
l-bde397a-8fd����� ��"��� ��ejkskk�k�kk��� ��E ��c�� ���� ����� ��g lambda��g args��g e1��g e2����� ��eeee ��f l-bde397a-1001��f l-bde397a-1002��f l-bde397a-1003��f l-bde397a-1004������ ��"��� ��e�kskk�k�kk��� ����� ��g
define-syntax��g define-syntax-parameter��g call��g self-evaluating?��g constant��g other��g
syntax->datum��g include-deprecated-features��g issue-deprecation-warning��f ASequences of zero expressions are deprecated. Use *unspecified*.��f sequence of zero expressions��f Ddefinition in expression context, where definitions are not allowed,��g syntax��f 1reference to pattern variable outside syntax form��f )reference to identifier outside its scope��f unexpected syntax��g map��f &encountered raw symbol in macro output��f m��f placeholder��g placeholder���� ��f no expressions in body��f nonprocedure transformer��,0���f -invalid or duplicate identifier in definition��g reverse��g each��// ���� ���1���,挤�f duplicate bound keyword��f bad local syntax definition��g $sc-ellipsis ��g ...��g b��� ��f l-bde397a-116a��� ��"�g� ��g n��� ��f l-bde397a-1167��� ��"�g� ��g id��� ��f l-bde397a-1165��� ��"�g� ��8�� ��eee ��f l-bde397a-115f��f l-bde397a-1160��f l-bde397a-1161� ��� �"�� �ekk�k�k�kk��
��� �f invalid argument list�f %duplicate identifier in argument list�g lambda*�g restS�g keyS� g optionalS�
�/��f invalid optional argument list�g a�
� �ee �f l-bde397a-11f4�f l-bde397a-11f5� �"
�g req�g ropt�� �f l-bde397a-11ea�f l-bde397a-11eb�f l-bde397a-11ec� �"� �g check�g rest�g opt�l �eeeee � f l-bde397a-11b4�!f l-bde397a-11b2�"f l-bde397a-11b0�#f l-bde397a-11ae�$f l-bde397a-11ac�% !"#$ �&"% �'g orig-args�(' �)f l-bde397a-11ab�*) �+"(g* �,ek&+�� �-,� �.- �//// �0//��1/ �2f invalid keyword argument list�3g allow-other-keysS�4g keyword?�5g symbol->keyword�6g k�76 �8f l-bde397a-1233�98 �:"7g9 �;f l-bde397a-122d�<f l-bde397a-122e�=;< �>"
= �?g rkey�@�? �Af l-bde397a-1222�Bf l-bde397a-1223�Cf l-bde397a-1224�Df l-bde397a-1225�EABCD �F"@�E �Gek:>kF&+��
�HG� �IH �Jf invalid rest argument�Kg car�Lg cadr�M/1��Ng vector�O�_ �PNO �QP1��Rg cons�Sg string?�Tg
documentation�U�M �VMU��Wg vector->list�Xg syntax-session-id�Yg
make-fluid�Zg error�[f 9called outside the dynamic extent of a syntax transformer�\g
letrec-syntax�]g
let-syntax�^g syntax-parameterize�_f
bad syntax�`g quote�ag ref�bf misplaced ellipsis�c/_��dg list�eN1 �f` �gf extra ellipsis�hg primitive�ih! �jf missing ellipsis�kg tmp�lg cdr�mg and-map�nf how did we get here�of bad `syntax' form�p,M��qf
bad lambda�rf bad lambda*�sg case-lambda�t,U��u/U��v,u��wf bad case-lambda�xg case-lambda*�yf bad case-lambda*�zg
with-ellipsis�{g let�|f duplicate bound variable�}/挤~,}��f bad let��g letrec��f
bad letrec��g letrec*��f bad letrec*��g set!��,1/ ��g setter��g m-bde397a-16ac���d ��� ��f l-bde397a-16ad��� ��"m�� ��g type��g value��g formform��g ee��g ww��g ss��g modmod��������� ��f l-bde397a-16a5��f l-bde397a-16a6��f l-bde397a-16a7��f l-bde397a-16a8��f l-bde397a-16a9��f l-bde397a-16aa��f l-bde397a-16ab��������� ��"�|� ��g head��g tail��g val����� ��f l-bde397a-1696��f l-bde397a-1697��f l-bde397a-1698����� ��"��� ��8���� ��eeeee ��f l-bde397a-1677��f l-bde397a-1678��f l-bde397a-1679��f l-bde397a-167a��f l-bde397a-167b������� ��"��� ��ek�kk��k��� ����� ��f bad set!��g procedure-property��g variable-transformer��f not a variable transformer��g @��,0/ ��e ���� ��f l-bde397a-16d4��f l-bde397a-16d5���� ��"�� ��8�� ��f l-bde397a-16c8��f l-bde397a-16c9��f l-bde397a-16ca����� ��"��� ��e�k��� ��
�� ��g @@��g free-id��g
remodulate��� ��f l-bde397a-16e0��� ��"��� ��f l-bde397a-16dd��f l-bde397a-16de��f l-bde397a-16df����� ��"��� ��e���� ����� ���� ��,�0/ ��g exp���� ��f l-bde397a-1709��f l-bde397a-170a���� ��"�� ��e����� ���� ��f l-bde397a-16fd��f l-bde397a-16fe���� ��"�� ��e����� ���� ��,/// ��g with-fluids��g syntax-case��g p��g ids����� ��f l-bde397a-1776��f l-bde397a-1777��f l-bde397a-1778����� ��"��� ��g cvt��g v-reverse��g cvt*����� ��f l-bde397a-1755��f l-bde397a-1753��f l-bde397a-1751����� ��"��� ��g pattern��g keys����� ��f l-bde397a-174e��f l-bde397a-174f��f l-bde397a-1750����� ��"��� � g gen-syntax-case�g
gen-clause�g build-dispatch-call�g convert-pattern� �eeee �f l-bde397a-1749�f l-bde397a-1747�f l-bde397a-1745� f l-bde397a-1743�
�"
�ek����� �
,� �N0 �g atom�g each+� �f duplicate pattern variable�g pat�� �f l-bde397a-1812�f l-bde397a-1813� �" �g x�g clauses���� �f l-bde397a-1807�f l-bde397a-1808�f l-bde397a-1809�f l-bde397a-180a� f l-bde397a-180b�! �""�! �#ek"�� �$�#� �%,#� �&f invalid clause�'00��(/'��),(��*f invalid literals list�+g macroexpand�,g identifier?�-g
datum->syntax�.g
syntax-source�/g generate-temporaries�0f invalid argument�1f t�2g free-identifier=?�3g bound-identifier=?�4g throw�5g syntax-error�6g syntax-local-binding�7g assq-ref�8f unexpected id-var-name�9g pattern-variable�:g syntax-locally-bound-identifiers�;g define!�<g
syntax-module�=g with-syntax�>1��?,>��@�� �Af l-bde397a-196a�Bf l-bde397a-196b�CAB �D"@C �E �Ff l-bde397a-1967�GF �H"EgG �IeDkH �J{I� �K� �LK1��M,L��Ng out�Og in�PNO�� �Qf l-bde397a-1970�Rf l-bde397a-1971�Sf l-bde397a-1972�Tf l-bde397a-1973�UQRST �V"P�U �WeVkH �X�W� �Y{W� �Zf l-bde397a-197a�[f l-bde397a-197b�\f l-bde397a-197c�]f l-bde397a-197d�^Z[\] �_"P�^ �`e_kH �a�`� �bd`� �c{`� �dg message�eg arg�fde �gf l-bde397a-19a3�hf l-bde397a-19a4�igh �j"fi �kf l-bde397a-1986�lk �m"Egl �nejkm �o5n� �pn� �qp �rg string-join�sg object->string�tg syntax-rules�ug clause�vu �wf l-bde397a-19af�xw �y"vgx �zg expand-syntax-rules�{g
expand-clause�|z{ �}ee �~f l-bde397a-19ac�f l-bde397a-19aa��~ ��"|}� ��g xx��� ��f l-bde397a-19a9��� ��"�g� ��eky�� ��5�� ���� ���1���_� ��_/ ��g dummy��g keyword��g template����� ��f l-bde397a-19c4��f l-bde397a-19c5��f l-bde397a-19c6����� ��"��� ��e�ky�� ����� ����� ����de ��f l-bde397a-19ba��f l-bde397a-19bb��f l-bde397a-19bc��f l-bde397a-19bd������ ��"��� ��e�ky�� ����� ����� ��5�� ���� ��00�0 ��g docstring��6����u ��eeeeee ��f l-bde397a-19d5��f l-bde397a-19d6��f l-bde397a-19d7��f l-bde397a-19d8��f l-bde397a-19d9��f l-bde397a-19da�������� ��"��� ��g dots��g
docstrings����� ��f l-bde397a-19ce��f l-bde397a-19cf��f l-bde397a-19d0��f l-bde397a-19d1������ ��"��� ��ekk�kk��� ����� ���� ��� ���� ��t�� �������g patterns����� ����� ��� ��f l-bde397a-19e7��� ��"�g� ��g form��� ��f l-bde397a-19e3��� ��"�g� ��ek�k�kk�kk���
��z�� ��0����,ό��/����0ь��,Ҍ��/ό��,Ԍ��/Ҍ��,��g define-syntax-rule��,_/ ���� ��f l-bde397a-1a50��f l-bde397a-1a51��f l-bde397a-1a52����� ��"��� ��f l-bde397a-1a4d��� ��"Eg� ��e�k� ����� ��t�� ��,�� ��,_// ����� ��f l-bde397a-1a5f��f l-bde397a-1a60��f l-bde397a-1a61��f l-bde397a-1a62������ ��"��� ��e�k� ����� ��t�� ��,�� ��g let*��g f��g bindings���� ��f l-bde397a-1a80��f l-bde397a-1a81���� ��"�� ��g v������ ��f l-bde397a-1a76��f l-bde397a-1a77��f l-bde397a-1a78� f l-bde397a-1a79�f l-bde397a-1a7a���� �"�� �f l-bde397a-1a68� �"Eg �ek�k �{� � g body�
g binding�
�f l-bde397a-1a8a�
f l-bde397a-1a8b�
�" �ekk�k �{� �g
quasiquote�g unquote�g lev�� �f l-bde397a-1a9e�f l-bde397a-1a9f� �" �g emit�g quasivector�g
quasilist*�g quasiappend�g quasicons�g vquasi� g quasi�! �"eeeeeee �#f l-bde397a-1a9a�$f l-bde397a-1a98�%f l-bde397a-1a96�&f l-bde397a-1a94�'f l-bde397a-1a92�(f l-bde397a-1a90�)f l-bde397a-1a8e�*#$%&'() �+"!"* �,ek+ �-,� �.�- �/./ �0f value�1� �2f l-bde397a-1aa2�32 �4"1g3 �5e4k+ �605� �7f quote�875� �95� �:89 �;,� �<�; �=</ �>f l-bde397a-1aa5�?> �@"1g? �Ae@k+ �B7A� �CA� �DBC �Eg q�F�E �Gf l-bde397a-1aa8�Hf l-bde397a-1aa9�IGH �J"FI �KeJk+ �LK� �M�L �NM0��Of l-bde397a-1aae�PO �Q"1gP �ReQJk+ �S0R� �T7R� �UR� �VTU �Wg unquote-splicing�XWK� �Y�X �ZY0��[f l-bde397a-1ab3�\[ �]"1g\ �^e]Jk+ �_0^� �`7^� �aW^� �b`a �c7 �dc0 �ef l-bde397a-1b0e�fe �g"Egf �hf l-bde397a-1b0b�ih �j"Egi �kegkj+ �l7k� �mg y�nm �of l-bde397a-1b23�po �q"ngp �r�m6 �sf l-bde397a-1b11�tf l-bde397a-1b12�uf l-bde397a-1b13�vstu �w"r�v �xeqkwkj+ �y7x� �zf list�{z �|{0��}f list*�~} �/1 ��~���f list->vector��g t-bde397a-1b34��� ��g m-bde397a-1b35���d ��� ��f l-bde397a-1b38��� ��"��� ��g else��� ��f l-bde397a-1b32��� ��"�g� ��ek��kwkj+ ����� ��f vector��g t-bde397a-1b19��� ��g m-bde397a-1b1a���d ��� ��f l-bde397a-1b1e��� ��"��� ��g ls��� ��f l-bde397a-1b18��� ��"�g� ��ek�kkk�kj+
����� ��f l-bde397a-1abb��� ��"1g� ��e�k+ ��7�� ��f l-bde397a-1ac3��f l-bde397a-1ac4���� ��"F� ��f l-bde397a-1abf��f l-bde397a-1ac0���� ��"� ��e�k�+ ���� ���� ���0���f l-bde397a-1ac9��� ��"1g� ��e��k�+ ��0�� ��7�� ���� ���� ��W�� ���� ���0���f l-bde397a-1ace��� ��"1g� ��e��k�+ ��0�� ��7�� ��W�� ���� ��ek�+ ��7�� ��� ��c/ ��g dx��� ��f l-bde397a-1ae4��� ��"�g� ��g dy��� ��f l-bde397a-1ae0��� ��"�g� ��m ��f l-bde397a-1ada��f l-bde397a-1adb���� ��"�� ��f l-bde397a-1ad5��f l-bde397a-1ad6���� ��"�� ��e��k�kk�+ ��7�� ��e�k�kk�+ ��z�� ��}�� ��{/���g stuff��� ��f l-bde397a-1ae7��� ��"�g� ��e�k�kk�+ ��z�� ��~/���f l-bde397a-1aea��� ��"�g� ��e�k�kk�+ ��}�� ��ek�kk�+ ��}�� ��c ��f l-bde397a-1aee��f l-bde397a-1aef���� ��"�� ��ek�+ ��7�� ��� ��f append��f l-bde397a-1af6��� ��"1g� ��ek�k�+ ����� ��0/ � �m �f l-bde397a-1afd�f l-bde397a-1afe� �" �ekk�+ ��� �f l-bde397a-1b3e� � "Eg �
f l-bde397a-1b3b�
�"Eg �
e k+ �`
� �g t-bde397a-1b43� �g m-bde397a-1b44�d � �f l-bde397a-1b48� �" �f l-bde397a-1b41� �"Eg �ekk+ �d� �g t-bde397a-1b57�g t-bde397a-1b56� �g m-bde397a-1b58� d �! �"f l-bde397a-1b5c�#f l-bde397a-1b5d�$"# �%"!$ �&g x*�'�& �(f l-bde397a-1b51�)f l-bde397a-1b52�*() �+"'* �,f l-bde397a-1b4d�-f l-bde397a-1b4e�.,- �/"�. �0ek%k+/k+ �1R0� �2� �320��4g t-bde397a-1b63�54 �6g m-bde397a-1b64�76d �87 �9f l-bde397a-1b68�:9 �;"58: �<f l-bde397a-1b61�=< �>"Eg= �?ek;>k+ �@!?� �A� �BA0��Cg t-bde397a-1b6f�DC �Eg m-bde397a-1b70�FEd �GF �Hf l-bde397a-1b74�IH �J"DGI �Kf l-bde397a-1b6d�LK �M"EgL �NekJMk+ �ONN� �P� �QP/ �Rg t-bde397a-1b7b�SR �Tg m-bde397a-1b7c�UTd �VU �Wf l-bde397a-1b7f�XW �Y"SVX �Zf l-bde397a-1b79�[Z �\"Eg[ �]ekY\k+ �^]� �_0 �`_/ �ag include�bg open-input-file�cg absolute-file-name?�dg in-vicinity�ef Brelative file name only allowed when the include form is in a file�fg
file-encoding�gg set-port-encoding!�hf UTF-8�ig eof-object?�jg close-input-port�kg read�lg filename�mg dirname�n� �of l-bde397a-1bba�po �q"ngp �rg fn�sr �tf l-bde397a-1bb5�ut �v"sgu �w6l �xf l-bde397a-1bb1�yf l-bde397a-1bb2�zxy �{"wz �|g dir�}| �~f l-bde397a-1bab�~ ��"}g ��g file��� ��f l-bde397a-1ba7��� ��"�g� ��g src��� ��f l-bde397a-1ba5��� ��"�g� ��g read-file��� ��f l-bde397a-1b8c��� ��"��� ��f l-bde397a-1b8b��� ��"Eg� ��ekqkkv{kk�k�k���� ��\�� ��g include-from-path��g %search-load-path��f file not found in path��f l-bde397a-1bc9��� ��"sg� ��f l-bde397a-1bc5��� ��"sg� ��f l-bde397a-1bc1��f l-bde397a-1bc2���� ��"w� ��f l-bde397a-1bbe��� ��"Eg� ��ek�kk��k� ��a�� ��f *expression not valid outside of quasiquote��g set-procedure-property!��f $variable transformer not a procedure��g make-variable-transformer��g identifier-syntax��8 ��f l-bde397a-1bdd��� ��"�g� ��f l-bde397a-1bda��� ��"�g� ��e�k� ����� ���� ��� ���� ����� �������� ����� ����� ��,�� ����� ���� ���� ��,�� ����� ����� ���� ��ek� ����� ���� ���// ���/ ��,�� ��g exp1��g var��g exp2������� ��f l-bde397a-1bec��f l-bde397a-1bed��f l-bde397a-1bee��f l-bde397a-1bef��f l-bde397a-1bf0������� ��"��� ��e�k� ����� ����� ���� ��� ���� ����� ���܌��� ����� ����� ��� ����� ����� ���� ��,�� ��g define*��g b0��g b1������ ��f l-bde397a-1bfa��f l-bde397a-1bfb��f l-bde397a-1bfc��f l-bde397a-1bfd������ ��"��� ��f l-bde397a-1bf7��� ��"Eg� ��e�k� ��]�� ���� ���� ��f l-bde397a-1c08��f l-bde397a-1c09���� ��"�� ��e�k� ��]�� �C 5 hj � , 3 5HH h � ] 6� g x
g mod g filenamef ice-9/psyntax.scm�
��
�� g nameg top-level-eval-hook� C h� � ]$ "