Your IP : 216.73.216.75
GOOF----LE-8-2.0M�]�4h�.]gguile� � gdefine-module*� � � goop� ggoops� gsave� �
gfilenameS� foop/goops/save.scm� gimportsS�
ginternal�
� � gutil� � � � gexportsS� gsave-objects� gload-objects� grestore� g
enumerate!� genumerate-component!� gwrite-readably� gwrite-component� gwrite-component-procedure� gliteral?� greadable� g
make-readable� � !g
re-exportsS� "gmake-unbound� #"� $gset-current-module� %$� &$� '� (gdefined?� )'(� *'(� +g
immediate?� ,gtoplevel-define!� -',� .',� /gmake� 0'/� 1'/� 2g <generic>� 3'2� 4'2� 5gnameS� 6gadd-method!� 7'6� 8'6� 9g<method>� :'9� ;'9� <gspecializersS� =g<top>� >gformalsS� ?go� @?� AgbodyS� B� Cgmake-procedureS� Dg procedureS� Eg<null>� F� Gg<number>� Hg <boolean>� Ig<symbol>� Jg<char>� Kg <keyword>� L'=� M'=� Ngenv� O?N� Pgfile� Q?PN� Rgwrite� SR?P� TS� Ugmake-weak-key-hash-table� Vg readables� Wgmake-syntax-transformer� XW� YW� Zgmacro� [g$sc-dispatch� \[� ][� ^g_� _gany� `^_�� ag
syntax->datum� ba� ca� dg
datum->syntax� ed� fd� ggquote� hg copy-tree� igsyntax-violation� ji� ki� lf-source expression failed to match any pattern� mg
hashq-set!� ng hashq-ref� ogreadable-expression� pg readable?� qg excluded?� rgdisplay� sgobject-info� tgbinding?� ugvisiting� vgdefinedS� wgbinding� xgor� ygbegin� zgadd-patcher!� {g<string>� |g<vector>� }gnot� ~gvector?� ~?��}��glet�������garray-for-each��glambda��gif��?N��}���gset!�����������@�����?�������x�������gn��g
vector-length���?���������gzero?������f#()��r�P��gnot-literal?��?N��}����������f(vector ��f#(��������r�P��gand��g
vector-ref���?
���N�������r'P�������g
quasiquote��gvector-set!��gunquote���?��������
���������PN��gdo��gi��g+�������������g=����������r P���?����N��������������������������������PN����������r)P������������������������S������g<array>��gshared-array-root���?���N�����g
array-rank��greverse��g list-tail��gt��gs��gr��gq��gp��gm��gl��gk��gj���������������ggensym��fi��gshared-array-offset��gmap��g*��g-��garray-dimensions��gshared-array-increments��gmake-mapper��g array-ref��g
array-set!��gwrite-array��groot���������gcond��~���}���r#P���?��r�P���(?PN��y�������S�������t�N��f(make-shared-array ��r�P���N�������ggoops-error��f'write-readably(<array>): internal error��������PN��?�rP�gfor-each�gdim��rP�����?�� �������
gelse�f(list->uniform-array �rP�
f '() �r
P�f(list ��?PN�
���� �����g<pair>�gcar�?�N���gcdr�?�N����� �!gproper?�"gloop�#gls�$#?�%$�&gnull?�'&#�(gpair?�)(#�*#�+t*N�,}+�-"*�.�),-�/x'.�0�"%/�1!0�2g1?�3(�4}3�5tN�6x45�726�8ginfos�9g�:89�;grefs�<g ref-stack�=<N�>;=�?17�:>�@}��A@(�B!�Cf(cons �D2C�Ef(cons* �F
E�G�ABDF�HrGP�IN�J��I�K�J��Lgset-car!�M��NL�M�O�N�POPN�Q#*�Rgprev�SR?#�TQS�U})�Vt#N�WxUV�X}'�Yf .�ZrYP�[�@Z�\#N�]��\�^�]��_gset-cdr!�`�R�a�#�b_`a�c�b�d#cPN�ey[�^d�f�Xe�gWf��hgcons�is#N�jhi8�k�8j�lg push-ref!�ml#N�ng visiting?�o8�pno�q�p�r#�srN�t��s�u�t��v�r�wLav�x�w�yrxPN�z�Tg�kmquy �{ginfo�|{�}n{�~�}��|~��8���=;���?HKPz�������gsetter��������ginteger?��gstandard-get��gstandard-set��gmemq��gslot-definition-allocation��gclassS��g
each-subclassS������gclass-slots��gslot-ref��ggetters-n-setters��gget-set-for-each��gslot-definition-accessor��gslot-definition-name��ggeneric-function-name��gaccess-for-each��g@@��g%allocate-instance���'���9��gname��gval������g slot-set!���?���������glist��g<object>��gget��gset�������?���������gunbound?������}����N�����������������gclass-of���?����������gclass���������f (restore ��r�P��g
class-name������r�P��f (��r�P��gslotdefs��gfilter��gslotdef���������g��������gslot-bound?�������?����?���q�N�������x����}������������������������&���}����������r�P��r�P���������������y��������������ganame��������g#��r�P������q�N������N��������������������������������g���������������������PN��
����������������������������������� �����g<class>���?��r�P������?��r�P����f#No read-syntax for <method> defined����gis-a?�'�'�g
<accessor>�'�'� gensure-accessor�
' �' �gexcluded�
gpass-2?�gobjects�gpre-defines�glocals�g stand-ins�gpost-defines�gpatchers�gmultiple-bound�g
<environment>�g
make-class�gaccessorS�g init-formS�gmake-hash-table� =�g
init-thunkS�g
init-valueS�'��'��'�� '��!gclass-precedence-list�"'!�#'!�$gclass-redefinition�%'$�&'$�'g
initialize�(ginitargs�)N(�*gnext-method�+*�,gget-keyword�-gexcludedS�.,-(�/g=>�0g excludees�10�2ge�32�4ghashq-create-handle!�5N�6452�7�36�870�9�18�:./9�;�:�<+;�=sN�>n=?�?>�@'��A'��Bgx�C?NB�Dm=?B�ED�Fghashq-get-handle�Ggpop-ref!�Hg container�Ig
<object-info>�Js?N�KwJ�LK�M+?�Nq?N�O{J�PO�Qt{�R}Q�Sgeq?�Tu{�UgdefiningS�VSTU�W=�X&W�Y�VX�ZxRY�[{�\�Z[�]�P\�^xMN]�_^�`gpass-2S�agbinding-name�bgbinding-object�cgpass-1!�dgstring->symbol�eg
string-append�ff%o�ggnumber->string�hg
make-local�igboolean?�jgname-bindings!�kgappend�lgpass-2!�mf(define �nf)
�og
write-define!�pgwrite-empty-defines!�qgwrite-definition!�rf(let* (�sf(�tf
(�ugwrite-let*-head!�vgwrite-rebindings!�wgnewline�xgwrite-definitions!�ygassq�zgwrite-patches!�{gwrite-immediates!�|gwrite-readables!�}galist�~grest�P~���}���gport��gopen-output-file���P���������gapply���}�~��g
close-port������g
*unspecified*������������g
<output-port>��g>=��glength���~������~�����9�����guses���� ��gcadr���~�����9����������/-��N������c}N��j}N��lN��&���}���guse-modules��gunquote-splicing��������������R�P��wP��y���������{}P��N��&���xmPN��f��z�PN��y����xmPN��pPN��uPN��f (set! ��N��v��PN��x�PN��f ��z�PN��f )
��r�P��y���������������|}PN��N������vm�PN������������
����������P��glet*��gopen-input-file���P������������������������gmodule-public-interface��gcurrent-module��giface��g<input-port>��gmake-module������������gmodule-use!��gthe-scm-module������������gsave-module-excursion��$���gsexp��gread���P���������geof-object?������}���geval�������"���y����������"�������������g
module-map��gvar������gvariable-ref������h������������������������C5h(�#]4
!#5 4&>"G4*+5�$"+i�$!4.+4145+5>"G"48+i41;<=i>@ABCDhT]CLgo
gfilenamefoop/goops/save.scm�
X
�� C5>"G4*+5�$"+i�$!4.+4145+5>"G"48+i41;<Ei>@AFCDhT]CLgo
gfilenamefoop/goops/save.scm�
Z
�� C5>"G4*+5�$"+i�$!4.+4145+5>"G"48+i41;<Gi>@AFCDhT]CLgo
gfilenamefoop/goops/save.scm�
[
�� C5>"G4*+5�$"+i�$!4.+4145+5>"G"48+i41;<Hi>@AFCDhT]CLgo
gfilenamefoop/goops/save.scm�
\
�� C5>"G4*+5�$"+i�$!4.+4145+5>"G"48+i41;<Ii>@AFCDhT]CLgo
gfilenamefoop/goops/save.scm�
]
�� C5>"G4*+5�$"+i�$!4.+4145+5>"G"48+i41;<Ji>@AFCDhT]CLgo
gfilenamefoop/goops/save.scm�
^
�� C5>"G4*+5�$"+i�$!4.+4145+5>"G"48+i41;<Ki>@AFCDhT]CLgo
gfilenamefoop/goops/save.scm�
_
�� C5>"G4*5�$"i�$!4.41455>"G"48i41;<=iM>OAFCDhe]C]go
genv gfilenamefoop/goops/save.scm�
e
�� C5>"G4*5�$"i�$!4.41455>"G"48i41;<=iMM>QATCDRh]6wgo
gfile
genv
gfilenamefoop/goops/save.scm�
g
��
i ��
C5>"G4Ui =5VR4YZ]`cfghhn]45Cfgexp
gfilenamefoop/goops/save.scm�
r
�� s �� s �� s �� Chf] 45L4?6^gargs
gv gfilenamefoop/goops/save.scm� r
�� Cklh(d] 45$O@6\gy
'gtmp 'gfilenamefoop/goops/save.scm�
r
�� 'C5RmVh �]4>"GC�gobj
gexpr gfilenamefoop/goops/save.scm�
u
�� v �� gnameg
make-readable�CRnVh�]45C�gobj
gfilenamefoop/goops/save.scm�
y
�� z �� z �� z �� gnamegreadable-expression�CoRnVht]6lgobj
gfilenamefoop/goops/save.scm�
~
��
��
gnameg readable?�CpR+Rpoqrstuvw
h��]45$4>"GC45$445>"GC45$4>"GC4545$*4 5
&445>"GCC4>"GC�go
�gfile �genv �ginfo t�gfilenamefoop/goops/save.scm�
�
�� � ��
� �� � �� $� �� .� �� /� �� 2� �� ?� �� J� �� V� �� W� �� l� �� t� �� w� ���� ���� ���� ���� ���� ���� ���� (�� � gnamegwrite-component-procedure�g
documentationfReturn #f if circular reference�CR4YZ]`cfxyrzh0�]C�gobject
)gpatcher )gfile )genv )gfilenamefoop/goops/save.scm�
�
�� � �� ) Chg] 45L4?6_gargs
gv gfilenamefoop/goops/save.scm� �
�� Cklh(e] 45$O@6]gy
'gtmp 'gfilenamefoop/goops/save.scm�
�
�� 'C5R4*5�$"i�$!4.41455>"G"48i41;<{iM>OABCDhf]C^go
genv gfilenamefoop/goops/save.scm�
�
�� C5>"G4*5�$"i�$!4.41455>"G"48i41;<|iM>OA�CD�hq]4L5$CNCigo
gfilenamefoop/goops/save.scm�
� �� � #�� � �� � �� Ch0�]
�$!H4O>"GJCC�go
,genv ,gliteral?
*gfilenamefoop/goops/save.scm�
�
�� � �� � ��
� ��
� �� +� �� , C5>"G4*5�$"i�$!4.41455>"G"48i41;<|iMM>QA�CD�r���z�Rh��]#�$�45
�$645�4$">"G$+4
�5$4'>"G""4
�5$"14>"G4
�>"G"��$"�4 >"G$,4�5$4'>"G""4�5$"34>"G4 �>"G�"��T"��M)6
6�go
�gfile �genv �gn �gnot-literal? ,�gt ��gi �|gt 1sgfilenamefoop/goops/save.scm�
�
�� � �� � ��
� �� � �� � �� � �� � �� "� �� #� %�� ,� �� ,� �� /� �� 7� �� 9� �� ?� �� F� �� T� �� U� �� [� !�� _� �� c� �� d� ���� ���� ���� ���� 3���� ���� ���� ���� ���� ���� ���� ���� #��� ��� ��� ��+� !��1� ��U� !��^� 6��a� !��v� ��|� ���� ���� ��0 � C5>"G4*5�$"i�$!4.41455>"G"48i41;<�iM>OA�CD�hx]456pgo
genv gfilenamefoop/goops/save.scm�
�
�� � �� � �� C5>"G������������h(�]�$�"C�gind
!gdim !ginc !gfilenamefoop/goops/save.scm�
� �� � �� � !��
� �� � -�� � 7�� � -�� � �� ! C��h��]454 �$4 �5"2"#
�$" �45�"���"���54 54
454
55��C�garray
�gn �gn + Ngls + Ngindices [�gfilenamefoop/goops/save.scm�
�
�� � �� � �� � �� � �� � �� � �� � *�� !� D�� #� �� +� �� .� %�� 3� !�� <� +�� =� 1�� A� 9�� C� 1�� F� +�� N� %�� N� �� Q� .�� Y� �� [� �� [� �� _� �� d� �� k� �� r� �� y� ���� ���� �� �gnamegmake-mapper�C�Rr��rz�h�]"�(a�
�$"�4L4
�5?L$)4L5$4'L>"G""4LL5$"04L>"G4L���L>"G"��$C4 L>"G4L4�5?L$)4L5$4'L>"G""4LL5$"04L>"G4L���L>"G�"��I"��B�"t�$C
�$4 L>"G"4LL>"G4L��>"G4)L>"G�"���
"����gdims
�gindices �gn jgel *�gt f�gi �cgel �Zgt Wgn m�gi s�
gfilenamefoop/goops/save.scm�
� �� �� �� ��
�� � �� � �� � "�� � )�� &� 2�� (� )�� *� "�� *� �� 2� �� 3� #�� ?� �� @� �� f� ���� ���� ���� ���� ���� ���� ���� )���� 2���� )���� ���� ���� ���� #���� ���� ��� ��<� ��]� ��c� ��m ��m
��s ��x ��| ��� ��� ��� ��� ��� ��� ��� "��� ���
��� ��� ��6 � gnamegloop�C�hX]
4>"GOQ445>"G)6�gprefix
Ugo Ugnot-literal? Ugfile Ugenv Ugloop # Mgfilenamefoop/goops/save.scm�
�
�� � �� #� �� 6� �� =� �� B� �� U �� U gnamegwrite-array�C�R4*5�$"i�$!4.41455>"G"48i41;<�iMM>QACD�r��Rt�z���rh j]4 L>"GL6bgdim
gfilenamefoop/goops/save.scm�
�� ! �� " �� C�
h�=]4545$I�$:4#>"G445>"G(6645$�4>"G45$4'>"G"4 5$",4>"G4
45>"G4 >"G44
5>"G4O45>"G)64>"G445>"G4>"G65go
�gfile �genv �groot �gt ��gfilenamefoop/goops/save.scm�
�� �� �� �� �� �� �� �� 4 �� 7 �� D �� Y �� a �� b �� n �� o �� s �� z ��� ��� ��� ��� ��� ��� )��� ��� �� �� �� �� ��%# ��0 ��@$ ��A& ��E& ��L& ��U' ��X' ��e' ��n( ��r( ��y( ���) ���) ��- � C5>"G4*5�$"i�$!4.41455>"G"48i41;<iM>OA CDh(�]
4�54�5$CC�go
!genv !gliteral? !gfilenamefoop/goops/save.scm�
4
�� 5 �� 5 (�� 5 �� 5 �� 6 �� 6 �� 6 �� 6 ��
! C5>"G4*5�$"i�$!4.41455>"G"48i41;<iMM>QA�CDt<rCEzLY_sl�n�nhb]456Zginfo
gfilenamefoop/goops/save.scm�
d �� e �� Ch �]C"3("0�$4�5$"�"���""������$"
4�545�45H4$$"$""(>"G$*4�5$4'>"G""4�5$"/4>"G4
�>"G"��$
45"$�("�$"4>"G4 >"G$)45$4'>"G""45
$".4>"G4 >"G
4)>"�G"�4 >"G4
5J�K4>"G445J�>"G$*4�5$4'>"G""4�5
$"/4>"G4
�>"G
� "��F� "��94J>"G456�go
gfile genv gls 9gt F agproper? sg1? sgnot-literal? sginfos sgrefs sgt �/gls 3�gprev 3�gt
��gt
��gfilenamefoop/goops/save.scm�
9
�� : �� ; ��
; �� < �� < �� = !�� = +�� "= !�� &< �� .> "�� 4> �� 9: �� D? �� E? �� F? �� F? �� U@ �� Z@ �� ^@ �� bA �� kA �� lB �� mC �� s: �� ~D ���D
���E ���D
���F ���G ���D ���I ���J
���J ���J
���I ���K ���L ���L ��L ��L ,��L ��3M ��6O ��:O ��;P
��HO
��LM ��RQ ��\S ��aT ��eT ��lT ��uU ���V ���W ���V ���X ���Y ���Y #��Z ��[ ��,\ ��7\ ��9\ ��:] ��N^ ��X^ ��^^ ��l_ ��m` ��r` ��v` ��z_
��{a
���b ���b ���b ���b 0���b ���M ���M ���M
���M ���d ��g ��X C5>"G������hH]
��45$L454564455$CL���6�gslotdef
Dgg-n-s Dgg-n-s Dgfilenamefoop/goops/save.scm�
s �� t �� t �� u �� u �� v �� v 2�� %v �� &w �� )w "�� 3w �� 7u �� >y �� Ay )�� Dy �� D C���h �]O45456�gproc
gclass gfilenamefoop/goops/save.scm�
r
�� z �� { �� { �� { �� s �� gnamegget-set-for-each�C�R���������
h�N]��4545$+L45$45"45456445 5$CL45$45"���6Fgslotdef
gg-n-s gg-n-s
ga
gfilenamefoop/goops/save.scm�
~ �� �� � ��
�� � �� � �� � �� +� �� ,� $�� 8� �� ?� �� G� �� H� �� K� "�� U� �� Y� �� ^� �� j� �� k� $�� y� �� |� �� � �� C���h �]O45456�gproc
gclass gfilenamefoop/goops/save.scm�
}
�� � �� � �� � �� � �� ~ �� gnamegaccess-for-each�C�R4YZ]`cf�?���g�@
h8�-13��� ���C�gclass
4gslots 4gexps 4gfilenamefoop/goops/save.scm�
�
�� � �� 4
Chg] 45L4?6_gargs
gv gfilenamefoop/goops/save.scm� �
�� Cklh(�] 45$O@6�gy
'gtmp 'gfilenamefoop/goops/save.scm�
�
�� 'g
documentationf)(restore CLASS (SLOT-NAME1 ...) EXP1 ...)�g
macro-typegdefmacro�g
defmacro-argsgargsC5R4*5�$"i�$!4.41455>"G"48i41;<�iM>OA�CD��h �]
4L545$CL6�gget
gset gval gfilenamefoop/goops/save.scm�
� �� � !�� � �� � !�� � �� � �� Ch �]4O�>"GCygo
genv gfilenamefoop/goops/save.scm�
�
�� � �� � �� � �� C5>"G4*5�$"i�$!4.41455>"G"48i41;<�iMM>QA�CDr���������q�hP�] 4455$",4L455$44L455L5"�C�gslotdef
Ogt Mgfilenamefoop/goops/save.scm�
� �� � �� � $�� � �� � �� � #�� $� 2�� ,� #�� 0� �� 1� #�� 4� $�� 9� 0�� A� $�� E� #�� N� �� OC��r�h(w]4 L>"G45L6ogslotdef
#gfilenamefoop/goops/save.scm�
� �� � �� � !�� #� �� #C�r�#qz��gh�X]4 L>"G4L545$L64L5$C4L5$4'L>"G"4LL5$C4L>"G$L" L
L6Pgname
�ganame �gget �gset �gval �gt ;�gt v�gfilenamefoop/goops/save.scm�
� �� � �� � "�� � �� � �� *� �� .� )�� 2� �� 3� �� ;� �� G� $�� S� �� T� $�� v� ���� 1���� 5���� 5�� � C
h��]�4>"G445>"G4>"G4O455("444�5>"G4
O�>"G4)>"G4O>"G)6�go
�gfile �genv �gclass �gslotdefs ]�gfilenamefoop/goops/save.scm�
�
�� � �� � �� � �� �
�� � �� � �� �
�� ,� �� 5� �� 9�
�� @� �� I� �� U� �� ]� �� ]� �� e� �� j� �� m� �� r� +�� t� �� {� ���� ���� ���� ���� ���� ���� �� � C5>"G4*5�$"i�$!4.41455>"G"48i41;<�iM>OABCDhf]C^go
genv gfilenamefoop/goops/save.scm�
�
�� C5>"G4*5�$"i�$!4.41455>"G"48i41;<�iMM>QA�CDr�h�]456�go
gfile genv gfilenamefoop/goops/save.scm�
�
�� � �� � �� C5>"G4*5�$"i�$!4.41455>"G"48i41;<2iM>OABCDhf]C^go
genv gfilenamefoop/goops/save.scm�
�
�� C5>"G4*5�$"i�$!4.41455>"G"48i41;<2iMM>QA�CDr�h�]456�go
gfile genv gfilenamefoop/goops/save.scm�
�
�� � �� � �� C5>"G4*5�$"i�$!4.41455>"G"48i41;<9iM>OABCDhf]C^go
genv gfilenamefoop/goops/save.scm�
�
�� C5>"G4*5�$"i�$!4.41455>"G"48i41;<9iMM>QACD�h�]6�go
gfile genv gfilenamefoop/goops/save.scm�
�
�� � �� � �� C5>"G4*s5�$"4si5�$24.s44*s5$si"s5>"G"4*5�$"4i5�$64.44*5$ i"5>"G"4*
5�$"4
i5�$64.
44*
5$
i"
5>"G"4*<5�$"4<i5�$64.<44*<5$ <i"<5>"G"4*5�$"4i5�$64.44*5$ i"5>"G"4*5�$"4i5�$64.44*5$ i"5>"G"4*5�$"4i5�$64.44*5$ i"5>"G"4*5�$"4i5�$64.44*5$ i"5>"G"4*5�$"4i5�$64.44*5$ i"5>"G"4*5�$"4i5�$64.44*5$ i"5>"G"4*5�$"4i5�$64.44*5$ i"5>"G""�4.4issihG] =6?gfilenamefoop/goops/save.scm� � ��
CihG] =6?gfilenamefoop/goops/save.scm� � ��
C
i<<iiiiiiii55>"G"4*5$�4i5$�4�i 4#i55$�4&i4issihG] =6?gfilenamefoop/goops/save.scm� � ��
CihG] =6?gfilenamefoop/goops/save.scm� � ��
C
i<<iiiiiiii55>"G""��J""��B""��:4*'5�$"'i�$#4.'4145'5>"G"48'i41;<iM>)A<C,-4hh]4L56`ge
gfilenamefoop/goops/save.scm�
��
0��
�� Ch8�]
4L>"G45$
O6C�genv
7ginitargs 7gt 7gfilenamefoop/goops/save.scm�
��
��
�� 5 �� 7 Chd]OC\greal-next-method
gfilenamefoop/goops/save.scm�
��
CD5>"G4*s5�$"si�$!4.s4145s5>"G"48si41;<MM>OA?CDnshx]456pgo
genv gfilenamefoop/goops/save.scm�
��
�� �� C5>"G4*s5�$"4si5�$24.s44*s5$si"s5>"G"484Asi541;<MMM>CAECDmsh�]456go
genv gx gfilenamefoop/goops/save.scm�
�� �� �� C5>"GFh�]456�go
genv gfilenamefoop/goops/save.scm�
�� �� �� gnameg excluded?�CqR�h�]4545�6�gpatcher
genv gfilenamefoop/goops/save.scm�
�� %�� �� �� gnamegadd-patcher!�CzR�<h�]4545�6�go
genv gfilenamefoop/goops/save.scm�
�� �� �� �� gnameg push-ref!�ClR�<h�]4545�6genv
gfilenamefoop/goops/save.scm�
�� �� �� �� gnamegpop-ref!�CGR<h]45�Cwgenv
gfilenamefoop/goops/save.scm�
"
�� # ��
# �� gnameg container�CHR4*u5�$"4ui5�$24.u44*u5$ui"u5>"G"4*w5�$"4wi5�$24.w44*w5$wi"w5>"G"4*5�$"4i5�$24.44*5$i"5>"G"4*I5$=4Ii5$�4�i 4#Ii55$]4&Ii4iuuiwwii5I5>"G"V4.I4iuuiwwii5I5>"G"V4.I4iuuiwwii5I5>"G"V4.I4iuuiwwii5I5>"GuinR4*w5�$"wi�$!4.w4145w5>"G"48wi41;<Hi>|ABCDhX]CPginfo
gfilenamefoop/goops/save.scm�
0
�� C5>"G4*w5�$"wi�$!4.w4145w5>"G"48wi41;<MM>OALCDwshx]456pgo
genv gfilenamefoop/goops/save.scm�
3
�� 4 �� 4 �� C5>"GwitR4*5�$"i�$!4.41455>"G"48i41;<Hi>|AFCDhX]CPginfo
gfilenamefoop/goops/save.scm�
8
�� C5>"G4*5�$"i�$!4.41455>"G"48i41;<MM>OA_CD+qstuU< hx5]45$C45$C4545�$"45&
45��"$6C-go
rgenv rgt rgt rginfo 1 rgt ; fgfilenamefoop/goops/save.scm�
>
�� ? �� ? �� @ �� ? �� )A �� 1A �� 4D �� ;D �� ;D
�� IG �� UG �� VH "�� ]H �� ^H �� jD �� pI
�� r C5>"G+pq
stn`�wH/IlGhx,]45$C45$C45$C45$K4545$45��C4 5$44
5>"GCC45$=44
5>"G45$4
544
556C4544
5>"G4>"G44
5>"G4 >"G44
5>"G4>"G4
545�6$go
rgenv rginfo ?�gt �rginfo �rgfilenamefoop/goops/save.scm�
U
�� V ��
V �� W �� V �� X �� )V �� ,Y �� 6V �� 7Z �� ?Z �� B[ �� L[ �� M_ �� V_ �� W_ �� Y` �� e` �� fb ���d ���V ���f ���g ���g ���i !���i .���i !���i ���k ���k ���l ���m ��n �� o ��4p ��Lq ��ir '��pr ��rr ��( r gnamegenumerate-component!�CRiaRibRbhn]45L6fgbinding
gfilenamefoop/goops/save.scm�
~ �� $�� �� Ch�]O6galist
genv gfilenamefoop/goops/save.scm�
|
�� ~ �� gnamegpass-1!�CcRdefgh�]44556�gi
gfilenamefoop/goops/save.scm�
�
�� � �� � !��
� &�� � �� � �� gnameg
make-local�ChRb+pqsw�a
h�X]4545$" 45$" 4L5$C4L545�$"45L454 5�4L5�6454 56Pgb
�go �gt Bgt & ?ginfo Q�gfilenamefoop/goops/save.scm�
� �� � �� � �� � �� � �� � �� &� �� 4� �� F� �� I� �� Q� �� T� #�� [� �� _� �� i� '�� p� '�� w� �� x� '�� � ���� ���� ���� �� �Cw��stihhR]:4O>"G"}("4�5�$6445>"G445>"CG"<4�5$���"����"���45"��s"C(N44545>"G44 545>"G4
54564�545$�4
455$<44545>"G����"��I(���"��&4544545>"G����45��"����"���4455
"���Jgalist
genv gls �g post-defs �gls ��gi ��gpre-defs ��glocs ��gsins ��ginfo �g real-name ��gfilenamefoop/goops/save.scm�
�
�� � �� � �� %� �� &� �� +� �� 0� �� 4� �� 6� �� :� �� ;� �� T� �� q� �� v� �� z� �� ~� ���� ���� %���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ����
���� "����
����
���� ����
���� ���
��� ��
� !��� ��� ��� ���
��� ��� ��'� ��+�
��,� ��6� &��A� ��L� ��O� ��T� !��W� ��g� ��m�
��p� ��u� !��x� ���� ���� "���� ���� ���� (���� ���� ���� ���� #���� ���� $���� ���� ���� ���� ���� ���� ���� ���� ��� ��� ��� ��� ��R gnamegname-bindings!�CjR�
s�u`h@�] 4L54454L5>"G456�go
:ginfo :gfilenamefoop/goops/save.scm�
� �� � �� � �� � �� � &�� %� �� :� �� :Ck h@�]445>"GO445454556�genv
?gfilenamefoop/goops/save.scm�
�
�� � �� $� �� '� �� .� �� 5� �� =� �� ?� �� ?gnamegpass-2!�ClRrmRnhx]4>"G4>"G4 >"G$4'>"G"4>"G6�gname
xgval xgliteral? xgfile xgfilenamefoop/goops/save.scm�
�
�� � �� � �� � �� � �� +� �� D� �� E� �� ]� �� t� �� x� �� x gnameg
write-define!�CoRoho]�L6ggstand-in
gfilenamefoop/goops/save.scm�
� �� � ��
� ��
Cowhh]4L5L6`go
gfilenamefoop/goops/save.scm�
� �� � �� � �� Ch8�]4O45>"GO456�gfile
4genv 4gfilenamefoop/goops/save.scm�
�
�� � ��
� �� � �� ,� �� 4� �� 4 gnamegwrite-empty-defines!�CpRrswl�uUvGh�W]4>"G45445>"G4 >"G45$4'>"G"4>"G445>"G4 >"G445
>"G4>"G)6Ogprefix
�go �gfile �genv �ginfo �gfilenamefoop/goops/save.scm�
�
�� � �� � �� � �� "� �� %�
�� 2� �� ;� �� O� �� Y� �� Z� �� r� ���� ���� ���� ���� ���� �� � gnamegwrite-definition!�CqRrrqsqthh]LL6`go
gfilenamefoop/goops/save.scm�
� �� � !�� � �� Cn h`]4>"G445�>"G4O45�>"G6�gfile
]genv ]gfilenamefoop/goops/save.scm�
�
�� � �� � �� � �� � �� � �� � �� #� �� ,� �� 5� �� A� �� H� �� M� �� Y� �� ]� �� ] gnamegwrite-let*-head!�CuRrnh`�]4LL>"G4�L>"G4 L>"G4�L>"GL6�gpatch
\gfilenamefoop/goops/save.scm�
� �� � �� � �� � �� #� �� ,� �� @� �� E� �� L� �� X� �� \� �� \Ch�]O6�gprefix
gbindings gfile genv gfilenamefoop/goops/save.scm�
�
�� � �� gnamegwrite-rebindings!�CvRqwh h]4LLL>"GL6`go
gfilenamefoop/goops/save.scm�
� �� �� �� Ch�]O456�gselector
gprefix gfile genv gfilenamefoop/goops/save.scm�
�
�� �� � �� gnamegwrite-definitions!�CxRrwyhP]4L5$44L55$�CC�$4L�54L�5�CCgpatcher
Lgt Lgt ! 0gfilenamefoop/goops/save.scm�
�� �� ��
,��
7�� !
,�� !
%�� 3
�� 7 �� 8 &�� = 4�� ? &�� @ &�� E 4�� G &�� H �� Lgnamegname-objects�CwhH�] 4LL>"G4OLQ45L>"GL6�gpatch
Hgname-objects " 3gfilenamefoop/goops/save.scm�
�� �� �� " �� : �� H �� HC�h �]O44556�gprefix
gfile genv gfilenamefoop/goops/save.scm�
�� �� �� �� �� gnamegwrite-patches!�CzR+boah0�]4455$4545L6C�gb
)gfilenamefoop/goops/save.scm�
�� �� �� �� �� !�� !�� ' �� )Ch�]O6�galist
gfile gfilenamefoop/goops/save.scm�
�� �� gnamegwrite-immediates!�C{Rpby�aoo h�Y] 4455�$C445M5$45L�45�4L5�64454455L>"G4545�M�NCQgb
�gt �gt (�gfilenamefoop/goops/save.scm�
�� ! �� ! '�� ! �� ! �� ! �� " �� " �� (" �� (! �� <% )�� =& )�� D% "�� E' )�� L% "�� N$ �� O) �� R) &�� Y* &�� \* ;�� d* &�� l) �� u- ,�� |. ,���- %���- �� �Ch�]HO6�galist
gfile genv gwritten gfilenamefoop/goops/save.scm�
�� �� �� �� gnamegwrite-readables!�C|R4*5�$"i�$!4.41455>"G"48i41;<i{iM��>�A�CD���h@�-13454>"G4>"GC�galist
>gfile >grest >gport >gfilenamefoop/goops/save.scm�
2
��
3 �� 3 �� 4 �� +5 �� >
C5>"G4*5�$"i�$!4.41455>"G"48i41;<i�iM��>�A�CD�/-cjlR�w{xmz�puv��r�|�h��-1345�$�"45 �$��"454>"G4>"G4>"G(")4 �>"G4
>"G4>"G45(24
>"G4>"G"�4
>"G4>"G4>"G445>"G4
>"G4>"G4>"G4>"G44556�galist
�gfile �grest �gexcluded 5�guses 5�genv D�gfilenamefoop/goops/save.scm�
8
��
9 �� 9 �� 9 �� 9 +�� 9 6�� : �� (: �� ,: �� /: +�� 5: 7�� 59 �� :; �� D; �� G< �� [= �� o> ���? ���A ���A ���A ���B ���C ���D ���D ���F ���F -���F ���G ���G ���G ��I ��I ,��I ��J ��1K ��EL ��IL ��JL *��YL ��bM ��hM -��qM ��zN ��~N ���N ���O ���O ���O ���P ���Q ���Q $���Q -���Q $���Q ��8 �
C5>"G4*5�$"i�$!4.41455>"G"48i41;<{i>�A�CD��h0�]45454>"GC�gfile
)gport )gobjects )gfilenamefoop/goops/save.scm�
S
�� T �� T �� U �� T �� V �� )C5>"G4�i4�i55�R4*5�$"i�$!4.41455>"G"8i41;<�i>�A�CD�����$���hX�]4L>"G".45$C4L>"G4L5"���4L5"����gsexp
Fgfilenamefoop/goops/save.scm�
` �� a �� b �� c �� #c �� &e �� :f �� Ff �� Fb �� Gb �� Sb �� S
C�h|]�Ctgname
gvar gfilenamefoop/goops/save.scm�
g �� h �� h �� C hX�] 454>"G4>"G4O>"G6�gfile
Rgm Rgfilenamefoop/goops/save.scm�
[
�� \ �� \ ��
] �� ^ �� 2_ �� Rg �� RC56gm
0gt
8 Mgt
(gt
�gt
��gt
��gt
��gt
s�gt
Shgt
DYgt
2Ggt
%:gt
5gt
��gt
#�#�gt
))gt
*{*�gt
;h;}gt
=p=�gt
D�Egt
E�E�gt
G Ggt
G�Hgt
I!I6gt
JJ*gt
K1KOgt
K�K�gt
K�Lgt
LRLqgt
L�L�gt
MM5gt
MxM�gt
M�M�gt
N<N[gt
N�N�gt
OOgt
S,SBgt
U�U�gt
V�V�gt
[�[�gt
\\-gt
\k\�gt
^n^�gt
_O_dgt
`f`{gt
aGa\gt
�m��gt
���gt
�{��gt
���2gfilenamefoop/goops/save.scm�
�� 1 X
�� Z
��� [
��� \
��� ]
��� ^
��l _
��L e
��= g
��W p ��b p
�� u
��� y
��_ ~
���
��+�
���
���
����
��b�
��#��
��#�
��(�4
��*t9
��5�r
��8�}
��;a�
��=i�
��D��
��E��
��G�
��G��
��I�
��J�
��K*�
��P{� ��P�� ��P�� ��P�� ��P�� ��P� ��P� ��P� ��Q�
��Rs� ��R�� ��R�� ��R�� ��R�� ��R� ��R� ��R� ��R��
��S$
��U�
��V�
��X�
��Y�
��ZK
��[
��[�"
��[�%
��^f.
��^g0
��_H3
��`^6
��`_8
��a@>
��ggU
��gpy
��gyz
��h�|
��i��
��rF�
��tV�
��u��
��x#�
��z��
��|��
��~��
���H�
����
���^
���e
���f2
����8
���tS
����Y ����Y '����Y ����Y
����[
��^ �(
C6
?>