GOOF----LE-8-2.0�� ] 4 hM� ] g guile� � g define-module*� � � g language� g tree-il� g peval� �
g filenameS� f language/tree-il/peval.scm� g importsS�
�
� g
primitives� � � g effects� � � g ice-9� g vlist� � � g match� � � g srfi� g srfi-1� � � g srfi-9� ! � "! � #g srfi-11� $# � %$ � &g srfi-26� '& � (' � )g control� *) � +* � ,"%(+
� -g exportsS� . � /g set-current-module� 0/ � 1/ � 2g make-syntax-transformer� 32 � 42 � 5g *logging*� 6g macro� 7g identifier?� 87 � 97 � :g
syntax-object� ;g top� <; � =g ribcage� >g id� ?> � @g m-9d6212d37ae-5919� A@; � BA � Cf l-9d6212d37ae-5920� DC � E=?BD � F= � Gg x� HG � If l-9d6212d37ae-591b� JI � K=HBJ � L<EFK � Mg hygiene� NM � O:LN � Pg $sc-dispatch� QP � RP � Sg _� Tg each-any� UST�� Vf l-9d6212d37ae-5923� WV � X=HBW � Y<XFK � Z:YN � [g syntax-violation� \[ � ][ � ^f -source expression failed to match any pattern� _g log� `g any� ag free-id� bg quote� cg m-9d6212d37ae-5926� dc; � ed � ff l-9d6212d37ae-5928� gf � h=Heg � i<Fh � j:biN � kaj � lk` � mlT�� n`m�� og if� pg dummy� qg event� rg arg� spqr � td<< � uf l-9d6212d37ae-592b� vf l-9d6212d37ae-592c� wf l-9d6212d37ae-592d� xuvw � y=stx � z<yFh � {:ozN � |g and� }:|zN � ~:5zN � g or� �:zN � �g eq?� �:�zN � �:zN � ��~� � �g memq� �:�zN � �:bzN � �~ � �g log*� �:�zN � �g
module-ref� �g resolve-interface� �g pretty-print� �� � �g newline� �g let/ec� �g tree-il-fold� �g abort-to-prompt� �g tree-il-any� �g vlist-length� �g vlist-ref� �g vlist-any� �g
<application>� �g <lambda>� �g <primitive-ref>� �g values� �g <const>� �g
<lexical-ref>� �g <void>� �g <module-ref>� �g <toplevel-ref>� �g singly-valued-primitive?� �g singly-valued-expression?� �g make-application� �g tree-il-src� �g make-primitive-ref� �g truncate-values� �g <var>� �g %make-var-procedure� �g make-var� �S```` � �g lambda� �g m-9d6212d37ae-5be1� ��; � �g t-9d6212d37ae-5bdd� �g t-9d6212d37ae-5bde� �g t-9d6212d37ae-5bdf� �g t-9d6212d37ae-5be0� ����� � ����� � �f l-9d6212d37ae-5be6� �f l-9d6212d37ae-5be7� �f l-9d6212d37ae-5be8� �f l-9d6212d37ae-5be9� ����� � �=��� � �� � �f l-9d6212d37ae-5be3� �� � �=H�� � �g shift� �g proc-name� �g args� ��� � �<< � �f l-1e8ba8b5a-60� �f l-1e8ba8b5a-61� ��� � �=��� � �g key� �g value� �g name� �g formals� �g body� ������ � �<<<<< � �f l-1e8ba8b5a-53� �f l-1e8ba8b5a-54� �f l-1e8ba8b5a-55� �f l-1e8ba8b5a-56� �f l-1e8ba8b5a-57� ������ � �=��� � �g make-procedure-name� �� � �< � �f l-1e8ba8b5a-43� �� � �=��� � �< � �f l-1e8ba8b5a-42� �� � �=H�� � ���F��FFFF����
� �M � �:��� � �<�F� � �:��N � �g gensym� �:��N � �g refcount� �:��N � �g set?� �:��N � ����� � �g make-struct� �g m-9d6212d37ae-5bdb� ��; � �g t-1e8ba8b5a-133� �g t-1e8ba8b5a-132� �g t-1e8ba8b5a-131� ���� � �g m-1e8ba8b5a-134� ��; � ���� � �f l-1e8ba8b5a-138� �f l-1e8ba8b5a-139� �f l-1e8ba8b5a-13a� ���� � �=��� � �g ctor-args� �� � �f l-1e8ba8b5a-120� �� � �=��� � �g ctor� �g field� �� �f l-1e8ba8b5a-11c�f l-1e8ba8b5a-11d� �= � �g form�g type-name�g constructor-spec�g field-names� �
<<<< �f l-1e8ba8b5a-111�f l-1e8ba8b5a-112�
f l-1e8ba8b5a-113�f l-1e8ba8b5a-114�
�=
�g
record-layout�g functional-setters�g setters�g copier�g getters�g constructor�g getter-identifiers�g field-identifiers� �<<<<<<<< �f l-1e8ba8b5a-e9�f l-1e8ba8b5a-e7�f l-1e8ba8b5a-e5�f l-1e8ba8b5a-e3�f l-1e8ba8b5a-e1� f l-1e8ba8b5a-df�!f l-1e8ba8b5a-dd�"f l-1e8ba8b5a-db�# !" �$=# �%f l-1e8ba8b5a-da�&% �'=H�& �(��F��F�FFF�F$' �):�(� �*:��N �+:
(� �,)*+���� �-��, �.![ �/![ �0f Wrong number of arguments�1!7 �2!7 �3<F� �4:�3N �5g record-type-vtable�6!5 �7!5 �8g pwpwpwpw�9g default-record-printer�:!9 �;!9 �<���� �=g set-struct-vtable-name!�>!= �?!= �@g vtable-offset-user�A!@ �B!@ �Cg %var?-procedure�Dg var?�ES` �Fg m-9d6212d37ae-5bf4�GF; �Hg t-9d6212d37ae-5bf3�IH �JG �Kf l-9d6212d37ae-5bf9�LK �M=IJL �Nf l-9d6212d37ae-5bf6�ON �P=HJO �QGMFP�FFFF����
�R:�Q� �Sg obj�Tg t-1e8ba8b5a-224�Ug t-1e8ba8b5a-21e�Vg t-1e8ba8b5a-21f�Wg t-1e8ba8b5a-220�Xg t-1e8ba8b5a-223�Yg t-1e8ba8b5a-222�Zg t-1e8ba8b5a-221�[TUVWXYZ �\g m-1e8ba8b5a-225�]\; �^]]]]]]] �_f l-1e8ba8b5a-229�`f l-1e8ba8b5a-22a�af l-1e8ba8b5a-22b�bf l-1e8ba8b5a-22c�cf l-1e8ba8b5a-22d�df l-1e8ba8b5a-22e�ef l-1e8ba8b5a-22f�f_`abcde �g=[^f �hg copier-id�ih �jf l-1e8ba8b5a-21c�kj �l=i�k �mg ctor-name�nm �of l-1e8ba8b5a-214�po �q=n�p �r �sf l-1e8ba8b5a-212�ts �u=r�t �vg layout�wv �xf l-1e8ba8b5a-210�yx �z=w�y �{g
immutable?�|{ �}f l-1e8ba8b5a-20e�~} �=|�~ ��g field-count��� ��f l-1e8ba8b5a-20c��� ��=��� ��g
getter-ids��� ��f l-1e8ba8b5a-209��� ��=��� ��g field-ids��� ��f l-1e8ba8b5a-206��� ��=��� ��g predicate-name��g
field-spec��{�� ��<<<<<< ��f l-1e8ba8b5a-1f9��f l-1e8ba8b5a-1fa��f l-1e8ba8b5a-1fb��f l-1e8ba8b5a-1fc��f l-1e8ba8b5a-1fd��f l-1e8ba8b5a-1fe�������� ��=��� ���MFP�FgFFFFlFqFuFzFF�F�F��$' ��:S�� ��� ��:|�� ��g struct?��:��� ���� ��:��� ��g
struct-vtable��:��� ���� ��<MFP ��:��N ����� ����� ��R�� ��<FP ��:C�N ��g throw-bad-struct��!� ��!� ��g var-name��g %var-name-procedure��g
%%on-error��g m-9d6212d37ae-5c00���; ��� ��f l-9d6212d37ae-5c02��� ��=H�� ���F��FFFF���� ��:��� ��a� ���` ��g %%type��g t-1e8ba8b5a-14b��g t-1e8ba8b5a-14c��g t-1e8ba8b5a-14d��g t-1e8ba8b5a-14e��g t-1e8ba8b5a-14f��g t-1e8ba8b5a-150��g t-1e8ba8b5a-151��������� ��g m-1e8ba8b5a-152���; ��������� ��f l-1e8ba8b5a-156��f l-1e8ba8b5a-157��f l-1e8ba8b5a-158��f l-1e8ba8b5a-159��f l-1e8ba8b5a-15a��f l-1e8ba8b5a-15b��f l-1e8ba8b5a-15c��������� ��=��� ��g getter��g index���� ��f l-1e8ba8b5a-149��f l-1e8ba8b5a-14a���� ��=��� ���h ��<<< ��f l-1e8ba8b5a-144��f l-1e8ba8b5a-145��f l-1e8ba8b5a-146����� ��=��� ���F��F�FFF�F�$' ��:��� ��a� ��S��` ��g ck��g err��g s���� ���� ��f l-9d6212d37ae-5c05��f l-9d6212d37ae-5c06���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:��N ���� ��� ��g %%index��:��� ��a� ��S��` ��f l-9d6212d37ae-5c0a��f l-9d6212d37ae-5c0b���� ��=��� ����F��FFFF����
��:��� ��:b�� ���F� � :
�N �� � �g %%copier�:�� �a �S�` �f l-9d6212d37ae-5c0f�f l-9d6212d37ae-5c10� �
=�� ��
F��FFFF����
�:�� �
:b� �g %%<var>-set-fields�<
F� �:N �
� �g t-9d6212d37ae-5bff� �f l-9d6212d37ae-5c14� �=� ��F��FFFF����
�:�� ��F��F�FFF�F�$' �:�� � �:o� �:�� �:�� � �!<F� �":�!N �# " �$g
struct-ref�%:$� �&F� �':
&N �(%' �):�� �*:b� �+:�!N �,*+ �-), �.#(- �/. �0<F� �1:�0N �2g
var-gensym�3g %var-gensym-procedure�4g m-9d6212d37ae-5c1b�54; �65 �7f l-9d6212d37ae-5c1d�87 �9=H68 �:5F9�FFFF���� �;:�:� �<a; �=<` �>�F9�F�FFF�F�$' �?:�>� �@a? �AS=@` �B55 �Cf l-9d6212d37ae-5c20�Df l-9d6212d37ae-5c21�ECD �F=�BE �G5FF9�FFFF����
�H:�G� �I:bG� �J<FF9 �K:�JN �LIK �ML �N:�>� �OaN �PS=O` �Qf l-9d6212d37ae-5c25�Rf l-9d6212d37ae-5c26�SQR �T=�BS �U5TF9�FFFF����
�V:�U� �W:bU� �XTF9 �Y:XN �ZWY �[Z �\:>� �]a\ �^S=]` �_f l-9d6212d37ae-5c2a�`f l-9d6212d37ae-5c2b�a_` �b=�Ba �c5bF9�FFFF����
�d:�c� �e:bc� �f<bF9 �g:fN �heg �ih �jg t-9d6212d37ae-5c1a�kj �lf l-9d6212d37ae-5c2f�ml �n=k6m �o5nF9�FFFF����
�p:�o� �q�nF9�F�FFF�F�$' �r:�q� �sr �t:oq� �u:�q� �v:�q� �wvr �x<nF9 �y:�xN �zuwy �{:$q� �|nF9 �}:|N �~{r} �:�q� ��:bq� ��:2xN ���� ��r� ��tz~� ��ps� ��<F9 ��:3�N ��g var-refcount��g %var-refcount-procedure��g m-9d6212d37ae-5c36���; ��� ��f l-9d6212d37ae-5c38��� ��=H�� ���F��FFFF���� ��:��� ��a� ���` ���F��F�FFF�F�$' ��:��� ��a� ��S��` ���� ��f l-9d6212d37ae-5c3b��f l-9d6212d37ae-5c3c���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:��N ���� ��� ��:��� ��a� ��S��` ��f l-9d6212d37ae-5c40��f l-9d6212d37ae-5c41���� ��=��� ����F��FFFF����
��:��� ��:b�� ���F� ��: �N ���� ��� ��:�� ��a� ��S��` ��f l-9d6212d37ae-5c45��f l-9d6212d37ae-5c46���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:�N ���� ��� ��g t-9d6212d37ae-5c35��� ��f l-9d6212d37ae-5c4a��� ��=��� ����F��FFFF����
��:��� ����F��F�FFF�F�$' ��:��� ��� ��:o�� ��:��� ��:��� ���� ��<�F� ��:��N ����� ��:$�� ���F� ��: �N ����� ��:��� ��:b�� ��:��N ���� ����� ������ ����� ��<F� ��:��N ��g var-set?��g %var-set?-procedure��g m-9d6212d37ae-5c51���; ��� ��f l-9d6212d37ae-5c53��� ��=H�� ���F��FFFF���� ��:��� ��a� ���` ���F��F�FFF�F�$' ��:��� ��a� ��S��` ���� ��f l-9d6212d37ae-5c56��f l-9d6212d37ae-5c57���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:��N ���� ��� ��:��� ��a� ��S��` ��f l-9d6212d37ae-5c5b��f l-9d6212d37ae-5c5c���� � =��� �� F��FFFF����
�:�� �:b� � F� �: N � � �:�� � a �
S� ` �f l-9d6212d37ae-5c60�f l-9d6212d37ae-5c61�
�=��
��F��FFFF����
�:�� �:b� �<F� �:N � � �g t-9d6212d37ae-5c50� �f l-9d6212d37ae-5c65� �=� ��F��FFFF����
�:�� ��F��F�FFF�F�$' �:�� � � :o� �!:�� �":�� �#" �$<F� �%:�$N �&!#% �':$� �(F� �): (N �*') �+:�� �,:b� �-:�$N �.,- �/+. �0 &*/ �10 �2<F� �3:�2N �4g each�5`` �645 �7`6��8`7��9`8��:g %%set-fields�;g check?�<g expr�=p;��< �>g m-9d6212d37ae-5c6c�?>; �@?���� �Af l-9d6212d37ae-5c71�Bf l-9d6212d37ae-5c72�Cf l-9d6212d37ae-5c73�Df l-9d6212d37ae-5c74�Ef l-9d6212d37ae-5c75�FABCDE �G==@F �H? �If l-9d6212d37ae-5c6e�JI �K=HHJ �Lg t-1e8ba8b5a-16a�Mg t-1e8ba8b5a-16c�Ng t-1e8ba8b5a-16b�OLMN �Pg m-1e8ba8b5a-16d�QP; �RQQQ �Sf l-1e8ba8b5a-171�Tf l-1e8ba8b5a-172�Uf l-1e8ba8b5a-173�VSTU �W=ORV �Xf l-1e8ba8b5a-167�Yf l-1e8ba8b5a-168�Zf l-1e8ba8b5a-169�[XYZ �\=��[ �]�GFK�FWFFF\$'
�^::]� �_<GFK �`:�_N �a:�_N �b:2_N �c:�_N �d:�_N �eabcd �fg map�gf �hf �ig list�jg set-var-refcount!�kg %set-var-refcount!-procedure�lS`` �mg m-9d6212d37ae-5c80�nm; �og t-9d6212d37ae-5c7e�pg t-9d6212d37ae-5c7f�qop �rnn �sf l-9d6212d37ae-5c85�tf l-9d6212d37ae-5c86�ust �v=qru �wn �xf l-9d6212d37ae-5c82�yx �z=Hwy �{nvFz�FFFF����
�|:�{� �}g t-1e8ba8b5a-18c�~g t-1e8ba8b5a-18d�}~ ��g m-1e8ba8b5a-18e���; ���� ��f l-1e8ba8b5a-192��f l-1e8ba8b5a-193���� ��=�� ��g setter����� ��f l-1e8ba8b5a-186��f l-1e8ba8b5a-187��f l-1e8ba8b5a-188����� ��=��� ���� ��f l-1e8ba8b5a-17d��f l-1e8ba8b5a-17e���� ��=��� ��g field-specs��� ��f l-1e8ba8b5a-179��f l-1e8ba8b5a-17a���� ��=��� ���vFz�F��F�F�$' ��:��� ��g val��:��� ���� ��:o�� ��:��� ��:��� ���� ��<vFz ��:��N ����� ��g struct-set!��:��� ��vFz ��: �N ������ ��:��� ��:b�� ��:j�N ���� ����� ������ ��|�� ��<Fz ��:k�N ��g
set-var-set?!��g %set-var-set?!-procedure��g m-9d6212d37ae-5c90���; ��g t-9d6212d37ae-5c8e��g t-9d6212d37ae-5c8f���� ���� ��f l-9d6212d37ae-5c95��f l-9d6212d37ae-5c96���� ��=��� ��� ��f l-9d6212d37ae-5c92��� ��=H�� ����F��FFFF����
��:��� ����F��F��F�F�$' ��:��� ��:��� ���� ��:o�� ��:��� ��:��� ���� ��<�F� ��:��N ����� ��:��� ���F� ��: �N ������ ��:��� ��:b�� ��:��N ���� ����� ������ ����� ��<F� ��:��N ��g
vlist-null��g
vhash-assq��g
<lambda-case>��g fold��g vhash-consq��g append��g reverse��� ��� ��g <let>��g <letrec>��g <fix>��g
<lexical-set>��g build-var-table��g <counter>��g %%make-counter-procedure��g
%make-counter��S`````` ��g m-9d6212d37ae-63bc���; ��g t-9d6212d37ae-63b6��g t-9d6212d37ae-63b7��g t-9d6212d37ae-63b8��g t-9d6212d37ae-63b9��g t-9d6212d37ae-63ba��g t-9d6212d37ae-63bb�������� �������� ��f l-9d6212d37ae-63c1��f l-9d6212d37ae-63c2��f l-9d6212d37ae-63c3��f l-9d6212d37ae-63c4��f l-9d6212d37ae-63c5��f l-9d6212d37ae-63c6�������� � =��� �� �f l-9d6212d37ae-63be� �=H �� F�FFFF����
�:�� �g effort�< F � :N �
g size�:
N �g continuation�
:N �g
recursive?�:N �g data�:N �g prev�:N �
�g m-9d6212d37ae-63b4�; � F�F�FFF�F$' �:�� �:�N �:
� �
� �<F �:�N �g pwpwpwpwpwpw�
�!g %counter?-procedure�"g counter?�#g m-9d6212d37ae-63d3�$#; �%g t-9d6212d37ae-63d2�&% �'$ �(f l-9d6212d37ae-63d8�)( �*=&') �+f l-9d6212d37ae-63d5�,+ �-=H', �.$*F-�FFFF����
�/:�.� �0*F-�FgFFFFlFqFuFzFF�F�F��$' �1:S0� �21 �3:|0� �4:�0� �541 �6:�0� �7:�0� �871 �9<*F- �::�9N �;68: �<35; �=/2< �><F- �?:!>N �@g effort-counter�Ag %effort-counter-procedure�Bg m-9d6212d37ae-63df�CB; �DC �Ef l-9d6212d37ae-63e1�FE �G=HDF �HCFG�FFFF���� �I:�H� �JaI �KJ` �LFG�F�FFF�F�$' �M:�L� �NaM �OSKN` �PCC �Qf l-9d6212d37ae-63e4�Rf l-9d6212d37ae-63e5�SQR �T=�PS �UCTFG�FFFF����
�V:�U� �W:bU� �X<TFG �Y:�XN �ZWY �[Z �\:�L� �]a\ �^SK]` �_f l-9d6212d37ae-63e9�`f l-9d6212d37ae-63ea�a_` �b=�Pa �cCbFG�FFFF����
�d:�c� �e:bc� �fbFG �g:
fN �heg �ih �j:L� �kaj �lSKk` �mf l-9d6212d37ae-63ee�nf l-9d6212d37ae-63ef�omn �p=�Po �qCpFG�FFFF����
�r:�q� �s:bq� �tg %%<counter>-set-fields�u<pFG �v:tuN �wsv �xw �yg t-9d6212d37ae-63de�zy �{f l-9d6212d37ae-63f3�|{ �}=zD| �~C}FG�FFFF����
�:�~� ��}FG�F�FFF�F�$' ��:��� ��� ��:o�� ��:��� ��:��� ���� ��<}FG ��:��N ����� ��:$�� ��}FG ��:
�N ����� ��:��� ��:b�� ��:@�N ���� ����� ������ ���� ��<FG ��:A�N ��g size-counter��g %size-counter-procedure��g m-9d6212d37ae-63fa���; ��� ��f l-9d6212d37ae-63fc��� ��=H�� ���F��FFFF���� ��:��� ��a� ���` ��F��F�FFF�F�$' ��:��� ��a� ��S��` ���� ��f l-9d6212d37ae-63ff��f l-9d6212d37ae-6400���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:��N ���� ��� ��:��� ��a� ��S��` ��f l-9d6212d37ae-6404��f l-9d6212d37ae-6405���� ��=��� ����F��FFFF����
��:��� ��:b�� ���F� ��:�N ���� ��� ��:�� ��a� ��S��` ��f l-9d6212d37ae-6409��f l-9d6212d37ae-640a���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:t�N ���� ��� ��g t-9d6212d37ae-63f9��� ��f l-9d6212d37ae-640e��� ��=��� ����F��FFFF����
��:��� ���F��F�FFF�F�$' ��:��� ��� ��:o�� ��:��� ��:��� ���� ��<�F� ��:��N ����� ��:$�� ���F� ��:�N ����� ��:��� ��:b�� ��:��N ���� ����� ������ ����� ��<F� ��:��N ��g counter-continuation��g %counter-continuation-procedure��g m-9d6212d37ae-6415���; ��� ��f l-9d6212d37ae-6417��� ��=H�� ���F��FFFF���� ��:��� ��a� ���` ��F��F�FFF�F�$' ��:��� ��a� ��S��` ���� ��f l-9d6212d37ae-641a��f l-9d6212d37ae-641b� �� �=�� ��F��FFFF����
�:�� �:b� �<F� �:�N � � � :��� �
a �S�
` �f l-9d6212d37ae-641f�
f l-9d6212d37ae-6420�
�=�� ��F��FFFF����
�:�� �:b� �F� �: N � � �:�� �a �S�` �f l-9d6212d37ae-6424�f l-9d6212d37ae-6425� �=�� ��F��FFFF����
�:�� � :b� �!<F� �":t!N �# " �$# �%g t-9d6212d37ae-6414�&% �'f l-9d6212d37ae-6429�(' �)=&�( �*�)F��FFFF����
�+:�*� �,)F��F�FFF�F�$' �-:�,� �.- �/:o,� �0:�,� �1:�,� �21- �3<)F� �4:�3N �5024 �6:$,� �7)F� �8: 7N �96-8 �::�,� �;:b,� �<:�3N �=;< �>:-= �?/59> �@+.? �A<F� �B:�AN �Cg counter-recursive?�Dg %counter-recursive?-procedure�Eg m-9d6212d37ae-6430�FE; �GF �Hf l-9d6212d37ae-6432�IH �J=HGI �KFFJ�FFFF���� �L:�K� �MaL �NM` �OFJ�F�FFF�F�$' �P:�O� �QaP �RSNQ` �SFF �Tf l-9d6212d37ae-6435�Uf l-9d6212d37ae-6436�VTU �W=�SV �XFWFJ�FFFF����
�Y:�X� �Z:bX� �[<WFJ �\:�[N �]Z\ �^] �_:�O� �`a_ �aSN`` �bf l-9d6212d37ae-643a�cf l-9d6212d37ae-643b�dbc �e=�Sd �fFeFJ�FFFF����
�g:�f� �h:bf� �ieFJ �j: iN �khj �lk �m:O� �nam �oSNn` �pf l-9d6212d37ae-643f�qf l-9d6212d37ae-6440�rpq �s=�Sr �tFsFJ�FFFF����
�u:�t� �v:bt� �w<sFJ �x:twN �yvx �zy �{g t-9d6212d37ae-642f�|{ �}f l-9d6212d37ae-6444�~} �=|G~ ��FFJ�FFFF����
��:��� ��FJ�F�FFF�F�$' ��:��� ��� ��:o�� ��:��� ��:��� ���� ��<FJ ��:��N ����� ��:$�� ��FJ ��: �N ����� ��:��� ��:b�� ��:C�N ���� ����� ������ ����� ��<FJ ��:D�N ��g counter-data��g %counter-data-procedure��g m-9d6212d37ae-644b���; ��� ��f l-9d6212d37ae-644d��� ��=H�� ���F��FFFF���� ��:��� ��a� ���` ��F��F�FFF�F�$' ��:��� ��a� ��S��` ���� ��f l-9d6212d37ae-6450��f l-9d6212d37ae-6451���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:��N ���� ��� ��:��� ��a� ��S��` ��f l-9d6212d37ae-6455��f l-9d6212d37ae-6456���� ��=��� ����F��FFFF����
��:��� ��:b�� ���F� ��: �N ���� ��� ��:�� ��a� ��S��` ��f l-9d6212d37ae-645a��f l-9d6212d37ae-645b���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:t�N ���� ��� ��g t-9d6212d37ae-644a��� ��f l-9d6212d37ae-645f��� ��=��� ����F��FFFF����
��:��� ���F��F�FFF�F�$' ��:��� ��� ��:o�� ��:��� ��:��� ���� ��<�F� ��:��N ����� ��:$�� ���F� ��: �N ����� ��:��� ��:b�� ��:��N ���� ����� ������ ����� ��<F� ��:��N ��g counter-prev��g %counter-prev-procedure��g m-9d6212d37ae-6466���; ��� ��f l-9d6212d37ae-6468��� ��=H�� ���F��FFFF���� ��:��� ��a� ���` ��F��F�FFF�F�$' ��:��� ��a� ��S��` ���� � f l-9d6212d37ae-646b�f l-9d6212d37ae-646c� �=�� ��F��FFFF����
�:�� �:b� �<F� �:�N � �
�:��� �a �
S�` �f l-9d6212d37ae-6470�f l-9d6212d37ae-6471� �=�� ��F��FFFF����
�:�� �:b� �F� �: N � � �:�� �a �S�` �f l-9d6212d37ae-6475�f l-9d6212d37ae-6476� �=�� � �F��FFFF����
�!:� � �":b � �#<F� �$:t#N �%"$ �&% �'g t-9d6212d37ae-6465�(' �)f l-9d6212d37ae-647a�*) �+=(�* �,�+F��FFFF����
�-:�,� �.+F��F�FFF�F�$' �/:�.� �0/ �1:o.� �2:�.� �3:�.� �43/ �5<+F� �6:�5N �7246 �8:$.� �9+F� �:: 9N �;8/: �<:�.� �=:b.� �>:�5N �?=> �@</? �A17;@ �B-0A �C<F� �D:�CN �Eg m-9d6212d37ae-6481�FE; �GF �Hf l-9d6212d37ae-6486�If l-9d6212d37ae-6487�Jf l-9d6212d37ae-6488�Kf l-9d6212d37ae-6489�Lf l-9d6212d37ae-648a�MHIJKL �N==GM �OF �Pf l-9d6212d37ae-6483�QP �R=HOQ �SNFR�FWFFF\$'
�T::S� �U<NFR �V:�UN �W:@UN �X:�UN �Y:�UN �Z:CUN �[:�UN �\:�UN �]WXYZ[\ �^g set-counter-recursive?!�_g "%set-counter-recursive?!-procedure�`g m-9d6212d37ae-6495�a`; �bg t-9d6212d37ae-6493�cg t-9d6212d37ae-6494�dbc �eaa �ff l-9d6212d37ae-649a�gf l-9d6212d37ae-649b�hfg �i=deh �ja �kf l-9d6212d37ae-6497�lk �m=Hjl �naiFm�FFFF����
�o:�n� �piFm�F��F�F�$' �q:�p� �r:�p� �sqr �t:op� �u:�p� �v:�p� �wvq �x<iFm �y:�xN �zuwy �{:�p� �|iFm �}: |N �~{q}r �:�p� ��:bp� ��:^xN ���� ��q� ��tz~� ��os� ��<Fm ��:_�N ��g
abort-counter��g record-effort!��g record-size!��g find-counter��g min��g transfer!��g
make-variable��g make-top-counter��g make-nested-counter��g make-recursive-counter��g <operand>��g %%make-operand-procedure��g
%make-operand��S`````````` ��g m-9d6212d37ae-6564���; ��g t-9d6212d37ae-655a��g t-9d6212d37ae-655b��g t-9d6212d37ae-655c��g t-9d6212d37ae-655d��g t-9d6212d37ae-655e��g t-9d6212d37ae-655f��g t-9d6212d37ae-6560��g t-9d6212d37ae-6561��g t-9d6212d37ae-6562��g t-9d6212d37ae-6563������������
������������
��f l-9d6212d37ae-6569��f l-9d6212d37ae-656a��f l-9d6212d37ae-656b��f l-9d6212d37ae-656c��f l-9d6212d37ae-656d��f l-9d6212d37ae-656e��f l-9d6212d37ae-656f��f l-9d6212d37ae-6570��f l-9d6212d37ae-6571��f l-9d6212d37ae-6572������������
��=��� ��� ��f l-9d6212d37ae-6566��� ��=H�� ����F��FFFF����
��:��� ��g var��<�F� ��:��N ��g sym��:��N ��g visit��:��N ��g source��:��N ��g visit-count��:��N ��g use-count��:��N ��g copyable?��:��N ��g residual-value��:��N ��g constant-value��:��N ��g alias��:��N ������������
��g m-9d6212d37ae-6558���; ����F��F�FFF�F$' ��:��� ��:��N ��:
�� ���������������
����� ��<F� ��:��N ��g pwpwpwpwpwpwpwpwpwpw������������
��g %operand?-procedure��g operand?��g m-9d6212d37ae-6583���; ��g t-9d6212d37ae-6582��� ��� ��f l-9d6212d37ae-6588��� ��=��� ��f l-9d6212d37ae-6585��� ��=H�� ����F��FFFF����
��:��� ����F��FgFFFFlFqFuFzFF�F�F��$' ��:S�� ��� ��:|�� ��:��� ���� ��:��� ��:��� ���� ��<�F� ��:��N ����� ����� ����� ��<F� ��:��N ��g operand-var��g %operand-var-procedure��g m-9d6212d37ae-658f���; ��� ��f l-9d6212d37ae-6591��� ��=H�� ���F��FFFF���� � :��� �a �` ��F��F�FFF�F�$' �:�� �a �S` ��� �f l-9d6212d37ae-6594� f l-9d6212d37ae-6595�
�=�
��F��FFFF����
�
:�� �:b� �<F� �:�N � � �:�� �a �S` �f l-9d6212d37ae-6599�f l-9d6212d37ae-659a� �=� ��F��FFFF����
�:�� �:b� �F� �:
N � � �!:� �"a! �#S"` �$f l-9d6212d37ae-659e�%f l-9d6212d37ae-659f�&$% �'=�& �(�'F��FFFF����
�):�(� �*:b(� �+g %%<operand>-set-fields�,<'F� �-:+,N �.*- �/. �0g t-9d6212d37ae-658e�10 �2f l-9d6212d37ae-65a3�32 �4=1�3 �5�4F��FFFF����
�6:�5� �7�4F��F�FFF�F�$' �8:�7� �98 �::o7� �;:�7� �<:�7� �=<8 �><4F� �?:�>N �@;=? �A:$7� �B4F� �C:
BN �DA8C �E:�7� �F:b7� �G:�>N �HFG �IE8H �J:@DI �K69J �L<F� �M:�LN �Ng operand-sym�Og %operand-sym-procedure�Pg m-9d6212d37ae-65aa�QP; �RQ �Sf l-9d6212d37ae-65ac�TS �U=HRT �VQFU�FFFF���� �W:�V� �XaW �YX` �Z�FU�F�FFF�F�$' �[:�Z� �\a[ �]SY\` �^QQ �_f l-9d6212d37ae-65af�`f l-9d6212d37ae-65b0�a_` �b=�^a �cQbFU�FFFF����
�d:�c� �e:bc� �f<bFU �g:�fN �heg �ih �j:�Z� �kaj �lSYk` �mf l-9d6212d37ae-65b4�nf l-9d6212d37ae-65b5�omn �p=�^o �qQpFU�FFFF����
�r:�q� �s:bq� �tpFU �u:tN �vsu �wv �x:Z� �yax �zSYy` �{f l-9d6212d37ae-65b9�|f l-9d6212d37ae-65ba�}{| �~=�^} �Q~FU�FFFF����
��:�� ��:b� ��<~FU ��:+�N ���� ��� ��g t-9d6212d37ae-65a9��� ��f l-9d6212d37ae-65be��� ��=�R� ��Q�FU�FFFF����
��:��� ����FU�F�FFF�F�$' ��:��� ��� ��:o�� ��:��� ��:��� ���� ��<�FU ��:��N ����� ��:$�� ���FU ��:�N ����� ��:��� ��:b�� ��:N�N ���� ����� ������ ����� ��<FU ��:O�N ��g %operand-visit��g %%operand-visit-procedure��g m-9d6212d37ae-65c5���; ��� ��f l-9d6212d37ae-65c7��� ��=H�� ���F��FFFF���� ��:��� ��a� ���` ���F��F�FFF�F�$' ��:��� ��a� ��S��` ���� ��f l-9d6212d37ae-65ca��f l-9d6212d37ae-65cb���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:��N ���� ��� ��:��� ��a� ��S��` ��f l-9d6212d37ae-65cf��f l-9d6212d37ae-65d0���� ��=��� ����F��FFFF����
��:��� ��:b�� ���F� ��: �N ���� ��� ��:�� ��a� ��S��` ��f l-9d6212d37ae-65d4��f l-9d6212d37ae-65d5���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:+�N ���� ��� ��g t-9d6212d37ae-65c4��� ��f l-9d6212d37ae-65d9��� ��=��� ����F��FFFF����
��:��� ����F��F�FFF�F�$' ��:��� ��� ��:o�� ��:��� ��:��� ���� ��<�F� ��:��N ����� ��:$�� ���F� ��: �N ����� ��:��� ��:b�� ��:��N ���� ����� ������ ����� ��<F� ��:��N ��g operand-source��g %operand-source-procedure��g m-9d6212d37ae-65e0���; ��� ��f l-9d6212d37ae-65e2� � �=H� ��F�FFFF���� �:�� �a �` ��F�F�FFF�F�$' �:�� �a � S` �
�� �f l-9d6212d37ae-65e5�f l-9d6212d37ae-65e6�
�=�
��F�FFFF����
�:�� �:b� �<F �:�N � � �:�� �a �S` �f l-9d6212d37ae-65ea�f l-9d6212d37ae-65eb� �=�
��F�FFFF����
�:�� �:b� � F �!: N �"! �#" �$:� �%a$ �&S%` �'f l-9d6212d37ae-65ef�(f l-9d6212d37ae-65f0�)'( �*=�
) �+�*F�FFFF����
�,:�+� �-:b+� �.<*F �/:+.N �0-/ �10 �2g t-9d6212d37ae-65df�32 �4f l-9d6212d37ae-65f4�54 �6=3�5 �7�6F�FFFF����
�8:�7� �9�6F�F�FFF�F�$' �::�9� �;: �<:o9� �=:�9� �>:�9� �?>: �@<6F �A:�@N �B=?A �C:$9� �D6F �E: DN �FC:E �G:�9� �H:b9� �I:�@N �JHI �KG:J �L<BFK �M8;L �N<F �O:�NN �Pg operand-visit-count�Qg %operand-visit-count-procedure�Rg m-9d6212d37ae-65fb�SR; �TS �Uf l-9d6212d37ae-65fd�VU �W=HTV �XSFW�FFFF���� �Y:�X� �ZaY �[Z` �\�FW�F�FFF�F�$' �]:�\� �^a] �_S[^` �`SS �af l-9d6212d37ae-6600�bf l-9d6212d37ae-6601�cab �d=�`c �eSdFW�FFFF����
�f:�e� �g:be� �h<dFW �i:�hN �jgi �kj �l:�\� �mal �nS[m` �of l-9d6212d37ae-6605�pf l-9d6212d37ae-6606�qop �r=�`q �sSrFW�FFFF����
�t:�s� �u:bs� �vrFW �w: vN �xuw �yx �z:\� �{az �|S[{` �}f l-9d6212d37ae-660a�~f l-9d6212d37ae-660b�}~ ��=�` ��S�FW�FFFF����
��:��� ��:b�� ��<�FW ��:+�N ���� ��� ��g t-9d6212d37ae-65fa��� ��f l-9d6212d37ae-660f��� ��=�T� ��S�FW�FFFF����
��:��� ����FW�F�FFF�F�$' ��:��� ��� ��:o�� ��:��� ��:��� ���� ��<�FW ��:��N ����� ��:$�� ���FW ��: �N ����� ��:��� ��:b�� ��:P�N ���� ����� ������ ����� ��<FW ��:Q�N ��g operand-use-count��g %operand-use-count-procedure��g m-9d6212d37ae-6616���; ��� ��f l-9d6212d37ae-6618��� ��=H�� ���F��FFFF���� ��:��� ��a� ���` ���F��F�FFF�F�$' ��:��� ��a� ��S��` ���� ��f l-9d6212d37ae-661b��f l-9d6212d37ae-661c���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:��N ���� ��� ��:��� ��a� ��S��` ��f l-9d6212d37ae-6620��f l-9d6212d37ae-6621���� ��=��� ����F��FFFF����
��:��� ��:b�� ���F� ��: �N ���� ��� ��:�� ��a� ��S��` ��f l-9d6212d37ae-6625��f l-9d6212d37ae-6626���� ��=��� ����F��FFFF����
��:��� ��:b�� ��<�F� ��:+�N ���� ��� ��g t-9d6212d37ae-6615��� ��f l-9d6212d37ae-662a��� ��=��� ����F��FFFF����
��:��� ����F��F�FFF�F�$' ��:��� ��� ��:o�� ��:��� ��:��� ���� ��<�F� ��:��N ����� ��:$�� ���F� ��: �N ����� ��:��� ��:b�� ��:��N ���� ����� ������ ����� ��<F� ��:��N ��g operand-copyable?��g %operand-copyable?-procedure��g m-9d6212d37ae-6631���; � � � f l-9d6212d37ae-6633� � =H � �F �FFFF���� � :� � � a � ` � �F �F�FFF�F�$' � :� � �
a � S
` � �� �
f l-9d6212d37ae-6636� f l-9d6212d37ae-6637�
� =� � � F �FFFF����
� :� � � :b � � < F � :� N � � � :� � � a � S ` � f l-9d6212d37ae-663b� f l-9d6212d37ae-663c� � =� � � F �FFFF����
� :� � � !:b � � " F � #: "N � $ ! # � % $ � &: � � 'a & � (S '` � )f l-9d6212d37ae-6640� *f l-9d6212d37ae-6641� + ) * � ,=� + � -� ,F �FFFF����
� .:� -� � /:b -� � 0< ,F � 1:+ 0N � 2 / 1 � 3 2 � 4g t-9d6212d37ae-6630� 5 4 � 6f l-9d6212d37ae-6645� 7 6 � 8= 5 7 � 9� 8F �FFFF����
� ::� 9� � ;� 8F �F�FFF�F�$' � <:� ;� � = < � >:o ;� � ?:� ;� � @:� ;� � A @ < � B< 8F � C:� BN � D ? A C � E:$ ;� � F 8F � G: FN � H E < G � I:� ;� � J:b ;� � K:� BN � L J K � M I < L � N > D H M � O : = N � P<F � Q:� PN � Rg operand-residual-value� Sg !%operand-residual-value-procedure� Tg m-9d6212d37ae-664c� U T; � V U � Wf l-9d6212d37ae-664e� X W � Y=H V X � Z UF Y�FFFF���� � [:� Z� � \a [ � ] \` � ^�F Y�F�FFF�F�$' � _:� ^� � `a _ � aS ] `` � b U U � cf l-9d6212d37ae-6651� df l-9d6212d37ae-6652� e c d � f=� b e � g U fF Y�FFFF����
� h:� g� � i:b g� � j< fF Y � k:� jN � l i k � m l � n:� ^� � oa n � pS ] o` � qf l-9d6212d37ae-6656� rf l-9d6212d37ae-6657� s q r � t=� b s � u U tF Y�FFFF����
� v:� u� � w:b u� � x tF Y � y: xN � z w y � { z � |: ^� � }a | � ~S ] }` � f l-9d6212d37ae-665b� �f l-9d6212d37ae-665c� � � � �=� b � � � U �F Y�FFFF����
� �:� �� � �:b �� � �< �F Y � �:+ �N � � � � � � � � �g t-9d6212d37ae-664b� � � � �f l-9d6212d37ae-6660� � � � �= � V � � � U �F Y�FFFF����
� �:� �� � �� �F Y�F�FFF�F�$' � �:� �� � � � � �:o �� � �:� �� � �:� �� � � � � � �< �F Y � �:� �N � � � � � � �:$ �� � � �F Y � �: �N � � � � � � �:� �� � �:b �� � �: R �N � � � � � � � � � � � � � � � � � � � � � �<F Y � �: S �N � �g operand-constant-value� �g !%operand-constant-value-procedure� �g m-9d6212d37ae-6667� � �; � � � � �f l-9d6212d37ae-6669� � � � �=H � � � � �F ��FFFF���� � �:� �� � �a � � � �` � ��F ��F�FFF�F�$' � �:� �� � �a � � �S � �` � � � � � �f l-9d6212d37ae-666c� �f l-9d6212d37ae-666d� � � � � �=� � � � � � �F ��FFFF����
� �:� �� � �:b �� � �< �F � � �:� �N � � � � � � � � �:� �� � �a � � �S � �` � �f l-9d6212d37ae-6671� �f l-9d6212d37ae-6672� � � � � �=� � � � � � �F ��FFFF����
� �:� �� � �:b �� � � �F � � �: �N � � � � � � � � �: �� � �a � � �S � �` � �f l-9d6212d37ae-6676� �f l-9d6212d37ae-6677� � � � � �=� � � � � � �F ��FFFF����
� �:� �� � �:b �� � �< �F � � �:+ �N � � � � � � � � �g t-9d6212d37ae-6666� � � � �f l-9d6212d37ae-667b� � � � �= � � � � � � �F ��FFFF����
� �:� �� � �� �F ��F�FFF�F�$' � �:� �� � � � � �:o �� � �:� �� � �:� �� � � � � � �< �F � � �:� �N � � � � � � �:$ �� � � �F � � �: �N � � � � � � �:� �� � �:b �� � �: � �N � � � � � � � � � � � � � � � � � � � � � �<F � � �: � �N � �g
operand-alias� �g %operand-alias-procedure�
g m-9d6212d37ae-6682�
; �
�
f l-9d6212d37ae-6684�
�
=H
�
F
�FFFF���� �
:�
� �
a
�
` �
�F
�F�FFF�F�$' �
:�
� �
a
�
S
` �
�
f l-9d6212d37ae-6687�
f l-9d6212d37ae-6688�
�
=�
�
F
�FFFF����
�
:�
� �
:b
� �
<
F
�
:�
N �
�
�
:�
� �
a
�
S
` �
f l-9d6212d37ae-668c�
f l-9d6212d37ae-668d�
�
=�
�
!
F
�FFFF����
�
":�
!� �
#:b
!� �
$
F
�
%:
$N �
&
#
% �
'
& �
(:
� �
)a
( �
*S
)` �
+f l-9d6212d37ae-6691�
,f l-9d6212d37ae-6692�
-
+
, �
.=�
- �
/
.F
�FFFF����
�
0:�
/� �
1:b
/� �
2<
.F
�
3:+
2N �
4
1
3 �
5
4 �
6g t-9d6212d37ae-6681�
7
6 �
8f l-9d6212d37ae-6696�
9
8 �
:=
7
9 �
;
:F
�FFFF����
�
<:�
;� �
=�
:F
�F�FFF�F�$' �
>:�
=� �
?
> �
@:o
=� �
A:�
=� �
B:�
=� �
C
B
> �
D<
:F
�
E:�
DN �
F
A
C
E �
G:$
=� �
H
:F
�
I:
HN �
J
G
>
I �
K:�
=� �
L:b
=� �
M: �
DN �
N
L
M �
O
K
>
N �
P
@
F
J
O �
Q
<
?
P �
R<F
�
S: �
RN �
Tg m-9d6212d37ae-669d�
U
T; �
V
U���� �
Wf l-9d6212d37ae-66a2�
Xf l-9d6212d37ae-66a3�
Yf l-9d6212d37ae-66a4�
Zf l-9d6212d37ae-66a5�
[f l-9d6212d37ae-66a6�
\
W
X
Y
Z
[ �
]==
V
\ �
^
U �
_f l-9d6212d37ae-669f�
`
_ �
a=H
^
` �
b�
]F
a�FWFFF\$'
�
c::
b� �
d<
]F
a �
e:�
dN �
f:�
dN �
g:N
dN �
h:�
dN �
i:�
dN �
j:P
dN �
k:�
dN �
l:�
dN �
m: R
dN �
n: �
dN �
o: �
dN �
p
f
g
h
i
j
k
l
m
n
o
�
qg set-operand-visit-count!�
rg #%set-operand-visit-count!-procedure�
sg m-9d6212d37ae-66b1�
t
s; �
ug t-9d6212d37ae-66af�
vg t-9d6212d37ae-66b0�
w
u
v �
x
t
t �
yf l-9d6212d37ae-66b6�
zf l-9d6212d37ae-66b7�
{
y
z �
|=
w
x
{ �
}
t �
~f l-9d6212d37ae-66b3�
~ �
�=H
}
�
�
t
|F
��FFFF����
�
�:�
�� �
��
|F
��F��F�F�$' �
�:�
�� �
�:�
�� �
�
�
� �
�:o
�� �
�:�
�� �
�:�
�� �
�
�
� �
�<
|F
� �
�:�
�N �
�
�
�
� �
�:�
�� �
�
|F
� �
�:
�N �
�
�
�
�
� �
�:�
�� �
�:b
�� �
�:
q
�N �
�
�
� �
�
�
�
� �
�
�
�
�
� �
�
�
�
� �
�<F
� �
�:
r
�N �
�g set-operand-use-count!�
�g !%set-operand-use-count!-procedure�
�g m-9d6212d37ae-66c1�
�
�; �
�g t-9d6212d37ae-66bf�
�g t-9d6212d37ae-66c0�
�
�
� �
�
�
� �
�f l-9d6212d37ae-66c6�
�f l-9d6212d37ae-66c7�
�
�
� �
�=
�
�
� �
�
� �
�f l-9d6212d37ae-66c3�
�
� �
�=H
�
� �
�
�
�F
��FFFF����
�
�:�
�� �
��
�F
��F��F�F�$' �
�:�
�� �
�:�
�� �
�
�
� �
�:o
�� �
�:�
�� �
�:�
�� �
�
�
� �
�<
�F
� �
�:�
�N �
�
�
�
� �
�:�
�� �
�
�F
� �
�:
�N �
�
�
�
�
� �
�:�
�� �
�:b
�� �
�:
�
�N �
�
�
� �
�
�
�
� �
�
�
�
�
� �
�
�
�
� �
�<F
� �
�:
�
�N �
�g set-operand-copyable?!�
�g !%set-operand-copyable?!-procedure�
�g m-9d6212d37ae-66d1�
�
�; �
�g t-9d6212d37ae-66cf�
�g t-9d6212d37ae-66d0�
�
�
� �
�
�
� �
�f l-9d6212d37ae-66d6�
�f l-9d6212d37ae-66d7�
�
�
� �
�=
�
�
� �
�
� �
�f l-9d6212d37ae-66d3�
�
� �
�=H
�
� �
�
�
�F
��FFFF����
�
�:�
�� �
��
�F
��F��F�F�$' �
�:�
�� �
�:�
�� �
�
�
� �
�:o
�� �
�:�
�� �
�:�
�� �
�
�
� �
�<
�F
� �
�:�
�N �
�
�
�
� �
�:�
�� �
�
�F
� �
�:
�N �
�
�
�
�
� �
�:�
�� �
�:b
�� �
�:
�
�N �
�
�
� �
�
�
�
� �
�
�
�
�
� �
�
�
�
� �
�<F
� �
�:
�
�N �
�g %set-operand-residual-value!�
�g '%%set-operand-residual-value!-procedure�
�g m-9d6212d37ae-66e1�
�
�; �
�g t-9d6212d37ae-66df�
�g t-9d6212d37ae-66e0�
�
�
� �
�
�
� �
�f l-9d6212d37ae-66e6�
�f l-9d6212d37ae-66e7�
�
�
� �
�=
�
�
� �
�
� �
�f l-9d6212d37ae-66e3�
�
� �
�=H
�
� �
�
�
�F
��FFFF����
� :�
�� ��
�F
��F��F�F�$' �:�� �:�� � �:o� �:�� �:�� � � <
�F
� �
:� N �
�:�� �
�F
� �:
N � �:�� �:b� �:
� N � � � � �<F
� �:
�N �g set-operand-constant-value!�g &%set-operand-constant-value!-procedure�g m-9d6212d37ae-66f1�; �g t-9d6212d37ae-66ef�g t-9d6212d37ae-66f0� � �!f l-9d6212d37ae-66f6�"f l-9d6212d37ae-66f7�#!" �$= # �% �&f l-9d6212d37ae-66f3�'& �(=H%' �)$F(�FFFF����
�*:�)� �+�$F(�F��F�F�$' �,:�+� �-:�+� �.,- �/:o+� �0:�+� �1:�+� �21, �3<$F( �4:�3N �5024 �6:�+� �7$F( �8: 7N �96,8- �::�+� �;:b+� �<:3N �=;< �>:,= �?/59> �@*.? �A<F( �B:AN �Cg set-operand-alias!�Dg %set-operand-alias!-procedure�Eg m-9d6212d37ae-6701�FE; �Gg t-9d6212d37ae-66ff�Hg t-9d6212d37ae-6700�IGH �JFF �Kf l-9d6212d37ae-6706�Lf l-9d6212d37ae-6707�MKL �N=IJM �OF �Pf l-9d6212d37ae-6703�QP �R=HOQ �SFNFR�FFFF����
�T:�S� �U�NFR�F��F�F�$' �V:�U� �W:�U� �XVW �Y:oU� �Z:�U� �[:�U� �\[V �]<NFR �^:�]N �_Z\^ �`:�U� �aNFR �b: aN �c`VbW �d:�U� �e:bU� �f:C]N �gef �hdVg �iY_ch �jTXi �k<FR �l:DkN �mg and=>�ng make-operand�og make-bound-operands�pg make-unbound-operands�qg set-operand-residual-value!�rg apply�sg
visit-operand�tg not�ug pair?�vg null?�wg list?�xg symbol?�yg vector?�zg length�{g eqv?�|g equal?�}g types-check?�~g operator-size-limitS�~ ���g operand-size-limitS��� ���g value-size-limitS��� ���g effort-limitS��� ���g recursive-effort-limitS��� ������� ��g current-module��g error��f unbound var��g vlist->list��g
string-append��g symbol->string��f ��g make-lexical-ref��� ��� ��f no matching pattern��g every��g const?��g const-exp��g catch��g the-scm-module��g effect��g make-void��g test��g
make-const��g <dynwind>��g make-dynwind��g <dynlet>��g make-dynlet��g
<sequence>��z ��z ��g tail��� ��g
make-sequence��g <let-values>��g make-let-values��g make-lambda-case��g make-fix��g make-letrec��g make-let��g <abort>��g <prompt>��g
<conditional>��g make-lambda��g <dynref>��g <toplevel-set>��g <toplevel-define>��g <module-set>��g <dynset>��g constant?��g operator��g car��g cdr��g filter��g compose��g void?��g make-effects-analyzer��g lexical-ref?��g lexical-ref-gensym��g make-prompt-tag��g abort?��g tree-il=?��g abort-tag��� ��� ��g
abort-args��g
abort-tail��g make-prompt��g
make-abort��g sequence?��g
sequence-exps��g @apply��g lambda-case-alternate��g call��g and-map��g take��g drop��g split-at��g
fold-right��g lambda?��g effect-free-primitive?��g accessor-primitive?��g memv��f t-��g t��g make-conditional��g cons��g constructor-primitive?��g string?��g vector��g @call-with-values��f failure-��g failure��g make-toplevel-set��g make-toplevel-define��g make-module-set��� ��� ��g resolve-module��g ensureS��g module?��g module-variable��g resolve-primitives!��g primitive-ref?��g make-dynset��g make-dynref��f post-��g post��� ��f pre-��g pre��� ���� ��f what!��g alist-delete��g assq-ref��g rest��� ��g rest-sym��� ��g $��bi ����S� � g rest-args���S� � �g ?�g cut�g <>��� � �� � ��� �
g =�g lexical-refcount�� �
�|
�� � ���S � �g make-list�g tmp�f tmp �g make-lexical-set�C 5 h�� � ]4
,-.5 41 > "