Server IP : 162.213.251.212 / Your IP : 18.218.242.4 [ Web Server : LiteSpeed System : Linux business55.web-hosting.com 4.18.0-553.lve.el8.x86_64 #1 SMP Mon May 27 15:27:34 UTC 2024 x86_64 User : allssztx ( 535) PHP Version : 8.1.32 Disable Function : NONE Domains : 1 Domains MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : OFF | Pkexec : OFF Directory : /proc/thread-self/root/proc/self/root/lib64/guile/2.0/ccache/oop/ |
Upload File : |
GOOF----LE-8-2.0ؙ]�4h�c]gguile� � gdefine-module*� � � goop� ggoops� � gfilenameS� f oop/goops.scm� gimportsS� gsrfi� gsrfi-1� � � gice-9� gmatch� � � gutil� � � � gexportsS� gdefine-class� gclass� gstandard-define-class� gdefine-generic� gdefine-accessor� g define-method� gdefine-extended-generic� gdefine-extended-generics� !gmethod� "gis-a?� #gclass-of� $gensure-metaclass� %gensure-metaclass-with-supers� &g make-class� 'gmake-generic� (gensure-generic� )gmake-extended-generic� *g make-accessor� +gensure-accessor� ,gadd-method!� -gclass-slot-ref� .gclass-slot-set!� /gslot-unbound� 0gslot-missing� 1gslot-definition-name� 2gslot-definition-options� 3gslot-definition-allocation� 4gslot-definition-getter� 5gslot-definition-setter� 6gslot-definition-accessor� 7gslot-definition-init-value� 8gslot-definition-init-form� 9gslot-definition-init-thunk� :gslot-definition-init-keyword� ;gslot-init-function� <gclass-slot-definition� =g method-source� >gcompute-cpl� ?gcompute-std-cpl� @gcompute-get-n-set� Ag compute-slots� Bgcompute-getter-method� Cgcompute-setter-method� Dgallocate-instance� Eg initialize� Fg make-instance� Ggmake� Hgno-next-method� Igno-applicable-method� Jg no-method� Kgchange-class� Lg#update-instance-for-different-class� Mg shallow-clone� Ng deep-clone� Ogclass-redefinition� Pg apply-generic� Qgapply-method� Rg apply-methods� Sgcompute-applicable-methods� Tg%compute-applicable-methods� Ugmethod-more-specific?� Vgsort-applicable-methods� Wgclass-subclasses� Xg class-methods� Yggoops-error� Zg min-fixnum� [g max-fixnum� \g instance?� ]gslot-ref-using-class� ^gslot-set-using-class!� _gslot-bound-using-class?� `gslot-exists-using-class?� agslot-ref� bg slot-set!� cgslot-bound?� dg class-name� egclass-direct-supers� fgclass-direct-subclasses� ggclass-direct-methods� hgclass-direct-slots� igclass-precedence-list� jgclass-slots� kggeneric-function-name� lggeneric-function-methods� mgmethod-generic-function� ngmethod-specializers� ogmethod-formals� pgprimitive-generic-generic� qgenable-primitive-generic!� rgmethod-procedure� sgaccessor-method-slot-definition� tgslot-exists?� ugfind-method� vgget-keyword� w !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstGuv_� xgset-current-module� yx� zx� {gcurrent-module� |g*goops-module*� }g%init-goops-builtins� ~gprocess-use-modules� ~��~��glanguage��gtree-il��g primitives�������gselectS��gadd-interesting-primitive!�����gdispatch��������gmake-procedure��gcompute-cmethod��gerror��������fno matching pattern��gexpt��g scm-error��gmemq��gassoc��g<class>��gdsupersS��gslotsS��gnameS��ggensym��f metaclass��gmap��g append-map��gfor-each��gmember��gappend��gkeyword?��fmalformed keyword arguments: ~a��g kw-do-map��gmake-unbound��gor-map��g<object>��g metaclassS��gfind-duplicate��f3make-class: super class ~S is duplicate in class ~S��f,make-class: slot ~S is duplicate in class ~S��gmake-syntax-transformer��������gmacro��g$sc-dispatch��������g_��gany�������g syntax->datum��������g datum->syntax��������fmalformed superclass list: ~S��g take-while��g find-tail��glist��gquote��g init-formS��g init-thunkS��glambda��gsyntax-violation��������f-source expression failed to match any pattern��gdefine-class-pre-definition��geach-any���nj���Ȍ���nj���ʌ��nj���̌��g syntax-object��gbegin��gtop�����gribcage��gout��������fl-bdc1916-ed��������������gx�����fl-bdc1916-d0�����������������ghygiene�����������ggetterS��gsetterS��gkey�����gm-bdc1916-e3���������fl-bdc1916-e4�����������gk��garg��grest��������������fl-bdc1916-db��fl-bdc1916-dc��fl-bdc1916-dd��fl-bdc1916-de����������������������������������gif��������gor�������gnot�����gdefined?�����������"���g <generic>������ gtoplevel-define!� � ����(������� �gaccessorS�g <accessor>�������+���gdefine-class-pre-definitions�fl-bdc1916-f4������fl-bdc1916-f1��������������nj����nj���� gslotname�!gslotopt�" !���#f l-bdc1916-115�$f l-bdc1916-116�%f l-bdc1916-117�&f l-bdc1916-118�'#$%&�(�"�'�)�(��*�)��+��)��,gidentifier?�-gslot�.-���/����0f l-bdc1916-10c�1f l-bdc1916-10d�2f l-bdc1916-10e�3012�4�./3�5�4��6�5��7fl-bdc1916-fe�8fl-bdc1916-ff�9f l-bdc1916-100�:789�;�./:�<�;��=��<��>�Ɍ�?gdummy�@gname�Agsupers�B?@A-�Cg m-bdc1916-121�DC��ED����Ff l-bdc1916-126�Gf l-bdc1916-127�Hf l-bdc1916-128�If l-bdc1916-129�JFGHI�K�BEJ�LD�Mf l-bdc1916-123�NM�O��LN�P�K�O�Q��P��R�P��S��P��Tgand�U�TP��V�P��W��P��X�"P��Y��P��ZY�[��P��\��P��]�iP��^�OP��_�P��`��P��a� P��b?��cg m-bdc1916-132�dc��ed��ff l-bdc1916-137�gf l-bdc1916-138�hfg�i�beh�jd�kf l-bdc1916-134�lk�m��jl�n�i�m�o�n��pfbad generic function name: ~S�qgdefine�r�s�tgprefixS�ug symbol-append�vfno prefixes supplied�wg<generic-with-setter>�xgmake-setter-name�ygsetter�zg<extended-generic-with-setter>�{gextendsS�|g<extended-generic>�}gextended-by!�~gextended-by�ginvalidate-method-cache!��gdelq!��gnot-extended-by!��gprocedure-with-setter?��gdefaultS��g procedure��g procedure?��ggeneric-capability?������?@��g m-bdc1916-19d����������f l-bdc1916-1a2��f l-bdc1916-1a3���������������f l-bdc1916-19f������������������q����gcond�������������������������+����������"�������������G����������gelse��������gstring->symbol��g string-append��fsetter:��gsymbol->string��gupgrade-accessor��gmethods��gextended-byS��gextends��ggeneric-function��gmodule-define!��gfree-id��g m-bdc1916-1c5���������f l-bdc1916-1c7�����������������y������������������nj�������gargs��gbody��?@����������f l-bdc1916-1ca��f l-bdc1916-1cb��f l-bdc1916-1cc��f l-bdc1916-1cd�������������������������������������������������������"������������� �����+�������������,�����y�����!����������nj���،��f l-bdc1916-1d4��f l-bdc1916-1d5��f l-bdc1916-1d6��f l-bdc1916-1d7������������������������������������������������������� �����G����������������,�����!����gfree-identifier=?���������f l-bdc1916-26f�����������gcompute-procedures��gcompute-make-procedure��g->proper��gcompute-procedure��gfind-free-id��g parse-args������������������f l-bdc1916-1e9��f l-bdc1916-1e7��f l-bdc1916-1e5��f l-bdc1916-1e3��f l-bdc1916-1e1�f l-bdc1916-1df�����������f l-bdc1916-1de����������!������ ��� � ��Ɍ� ����greverse�glp�gls�gformals�gspecializers��f l-bdc1916-1ed�f l-bdc1916-1ee�f l-bdc1916-1ef�f l-bdc1916-1f0�����f l-bdc1916-1ec��������������� g<top>�!gtail�"!�#f l-bdc1916-212�$#�%�"�$�&�%���'� &��(gf�)(��*���+f l-bdc1916-20a�,f l-bdc1916-20b�-+,�.�)*-�/�.���0� /��1���2gnext-method�3gid�43�5f l-bdc1916-26b�65�7�4�6�8��9f l-bdc1916-269�:f l-bdc1916-26a�;9:�<�8*;�=��7�<�>�=��?gformal�@?�Af l-bdc1916-259�BA�C�@�B�D2�Ef l-bdc1916-255�FE�G�D�F�H��If l-bdc1916-251�JI�K�H�J�L�2�Mf l-bdc1916-24c�Nf l-bdc1916-24d�Of l-bdc1916-24e�PMNO�Q�L/P�R�C�GK�Q �S��R��Tgreal-next-method�U�TR��VU�Wglet�X�WR��Y��R��Z��R��[gnull?�\�[R��]\Y�^gapply�_�^R��`_UY�a`�bf l-bdc1916-263�cb�d�@�c�e�ff l-bdc1916-25e�gf�h�e�g�i��dh�GK�Q�j��i��k�Ti��lk�m�Wi��n��i��o��i��p�[i��qpn�r�^i��srkn�ts�uf l-bdc1916-235�vu�w�e�v�xgbody0�yx�zf l-bdc1916-231�{z�|�y�{�}f l-bdc1916-22d�~f l-bdc1916-22e�}~���8*����w|��������������f l-bdc1916-287��f l-bdc1916-288��������*���f l-bdc1916-282��f l-bdc1916-283��������*���gspecializer�����f l-bdc1916-27b��f l-bdc1916-27c��������*���gbody1���x���f l-bdc1916-272��f l-bdc1916-273��f l-bdc1916-274���������/���������������G����g<method>��������gspecializersS��������gcons*��������gformalsS��������������gbodyS��������gmake-procedureS��������g procedureS��������g for-each*��gdirect-methods��gadd-method-in-classes!��gdelv!��gremove-method-in-classes!��gcompute-new-list-of-methods��glength*��gmethod-n-specializers��gfold��gmax��gcalculate-n-specialized��g%invalidate-method-cache!��g n-specialized��ggf��gm����������b��������������b������������g *unspecified*���������ginternal-add-method!��g<procedure>��gproc����������q���,���������2�����������g<primitive-generic>��gpg������p���,�������gobj������f"~S is not a valid generic function��Y����������glet*��gspec��gmap*�����a�����d�������gsrc��gprocedure-source������a����������������gcadr����������gcddr��������������gcons���!������������������W����T���������������a�������gcar��gcdr��g allocationS��ginstanceS��g init-valueS�ginit-keywordS�gassq�ggetters-n-setters�gslot-definition�gequal?�gg-equal?�gy���gset-primitive-generic!� gdisplay� gnumber->string�gobject-address�gdisplay-address� gwrite�go�gfile��f#<instance � �� >��gwrite-object�#����@�c�f#<� �d� � �!� �"�!��#W"�$#�%�&gmeta�'#�(&'�)(�*c&�+T*�,d&�- ,�.�/�- .�0�+/��1W)0�21�3��4#��5&4�65�7c���8T*7�9k��:@9�;:�< @�=� <�>�@=�?W;>�@f (�A @�Bglength�Cl��DBC�E D�Ff)>�G F�H�-?AEG�I�8H��JW6I�KJ�L&�ML�Nc��OT*N�P��Qc��Ra��S�QR��T�PS�Un�V�TU�W V�X�- W �Y�OX��ZWMY�[Z�\�]\�^gmerge-generics�_g<module>�`g<symbol>�agmodule�bgint1�cgval1�dgint2�egval2�fgvar�ggval�ha@bcdefg�ig <boolean>�jgeq?�kjce�lk�mg make-variable�n�ec�o)n@�pmo�qTlp�rq�sa@bcdef��t���ua�t�v�eu�wv�x�eu�y�ex�zb�ty�{�~�|ae{�}��|�~��}�be{~���z�f��Tw������gduplicate-handlers��gmerge-accessors��^a@bcdefg �����gslots��gclassS��g each-subclassS������gclass-slot-g-n-s��gunbound?��gc��gs������f!Slot `~S' is unbound in object ~S��Y�����������f Slot `~S' is unbound in class ~S��Y����������fUnbound slot in object ~S��Y������f#No slot with name `~S' in object ~S��Y�������f(No class slot with name `~S' in class ~S��Y��������gvalue�������0�����������f0No next method when calling ~S with arguments ~S��Y��������f&No applicable method for ~S in call ~S���9���Y��������fNo method defined for ~S��Y�������gself�����gclone��g%allocate-instance��#���������������j����1�����������-��c�-��a�-��b�-������������������W���������������\���N���������W����b�-������������������W��������gold��gnew������gremove-class-accessors!������g����������gupdate-direct-method!����������������������g��������b�����W�����gset-car!��gcpl������a������������gdirect-subclasses������f��������b����������e������������������b����������e��������g %modify-class�������gupdate-direct-subclass!�������������f��������g redefined������b����g%invalidate-class������������ �g<accessor-method>�"��a������gdelq1!� a��� � �b�� ���� W��� ����g���������gloop�gl�n����gpair?��geqv?���������� ��! �"�!�#�"�$W#�%$�&����'e��(h��)d��*#��+&'(�)�*�,O�+�-,�.gcompute-slot-accessors�/gg-n-s�0/�1g init-thunk�2�/�312�4�/�5/4�635�7��8/�9gmake-generic-bound-check-getter�:�/�;9:�<8;�=gstandard-get�>=/�?1>�@gbound-check-get�A@/�B�A�C�<?B�Dgslot-definitionS�EG�7�CD/�FW6E�GF�H� �Igstandard-set�JI/�K�82J�LG�H�KD/�MW6L�NM�Ogassert-bound�Pgnum-standard-pre-cache�Qgdefine-standard-accessor-method�Rgcache�Sgvector�Tg struct-ref�Ugstruct-set!�Vgiota�Wgn�XW�Yg<�Zg vector-ref�[ZRW�\gnfields�]ginteger?�^f-Bad getter and setter for slot `~S' in ~S: ~S�_f*Bad getter closure for slot `~S' in ~S: ~S�`f*Bad setter closure for slot `~S' in ~S: ~S�af/Class-allocated slots should not reserve fields�bgthunk?�cf&Bad init-thunk for slot `~S' in ~S: ~S�dgcompute-getters-n-setters�e�f?e�gf�hgfilter�ig only-non-null�jgmerge-lists�kgevery�lgreverse!�mf*merge-lists: Inconsistent precedence graph�ngtop-sort�ogbuild-transitive-closure�pgbuild-constraints�qgstd-tie-breaker�rgcompute-clos-cpl�sftop-sort: Invalid constraints�tfstd-tie-breaker: Nothing valid�u��vgclass-slot-init-value�wv�xgthunk�y9��zxy�{z�|x�}7��~�x|}�W{~��qw��gcase��3������galready-allocated���\��a����������g+������b����W������������1���@������h���1����@���gmake-closure-variable���w��i������������gr�����a����@�����������������!��W����W����������W���������������gvirtualS�����gget��gslot-refS��2���v��������gset��g slot-set!S��v������������T�������f4You must supply a #:slot-ref and a #:slot-set! in ~S��Y��������������W�����������������������������fAllocation "~S" is unknown��Y�������g%compute-slots��������gobject��ginitargs������g%initialize-object�������������gdslots��v���������v�����A�������g???������v�����b���g direct-supers������b�A��gdirect-slots������b����b����b����>��b����b���A�������������b����b� ��d���b����.���W����������a��������b������������A��g %prep-layout!�����g%inherit-magic!���A��W������������ ������ginitialize-object-procedure��g<applicable-struct>��gapplicable-struct��������������ggeneric���gprevious-definition�v����v���@��"�� ^�� !� �� ���� b��gset-procedure-property!�@��@�W� �� �ggws���g%set-object-setter!�v������geg���v{���bt���gdummy-procedure� !��!ggeneric-functionS�"v!��#b!�"�$v����%b!�$�&v���'b!�&�(v����)b!�(�*���+v����,b!*+�-���.v���/b!-.�0�#%'),/�1g%modify-instance�2gchange-object-class�3gold-instance�4gnew-instance�534�64�7g new-class�837�9#3�:2397�;:�<���=<�>Ɍ�?ginstance�@D��A?@�BA�CE?��DWBC?�ED�F[ �GJ���H�FG�IS���J�I�KJ�LV����MR�L��NI���O��MN�PWKO�QHP�Rg%%compute-applicable-methods�ST���TS�U����Vgtargs�W�#��XVW�YX�Zgsort�[gm1�\gm2�][\�^U[\V�_�]^�`Z�_�aWY`�ba�c#�d#�e[\V�fg%method-more-specific?�gf[\V�hg�ig build-next�j��i��k���lrk�m���nim��o^ln��po�qg<list>�r���sgletrec�tgnext�ugprocs�vu��wgnew-args�xga�y[w�z�y�w�{xz�|{�}[u�~H�x�Q�utx���}~��W|����w����v���t������Q�t���s�������gsystem-procedure��glist2set��g mapappend��g %goops-loaded�C5h�"]4 w54z>"G4{i5|R4}i>"G4����>"G4�i#>"G4��>"Ga�Hmhe-134L56]gargs gfilenamef oop/goops.scm� q �� r "�� r �� C�r�� hX]�$?��45$(O" 4566456gmethods Ugtypes Ugw Hgx Hgmake-procedure Hgfilenamef oop/goops.scm� j �� k �� m �� m ,�� m �� m �� $ n �� , p �� 8 s �� B o �� H t �� I k �� U gnamegcompute-cmethod�C�R 4�i 5�ZR4�i 5�[R�Yh�-136�g format-string gargs gfilenamef oop/goops.scm� ~ �� �� 0�� �� gnameggoops-error�CYR�ih �]44�55$CC�gobj gclass gfilenamef oop/goops.scm� � �� � �� � �� � *�� � �� � �� � �� gnamegis-a?�C"RH�G������ h@�]4M5$�C4455�M�NC�gmeta-supers =gentry =gnew . =gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� #� /�� &� .�� *� 6�� ,� .�� .� �� .� �� 5� )�� 8� #�� :� �� =CO%R��hZ]�CRgx gfilenamef oop/goops.scm� � �� � )�� C�ihc]45�C[gm gfilenamef oop/goops.scm� � $�� � +�� � &�� C���h8�]4L5$" 4M5�$4M5NCC�gmeta 4gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� "� �� #� �� ,� 5�� .� �� 0� �� 4C% hP$](C4545H4O>"GJ�(J�CJ6gsupers Pg all-metas Pgall-cpls Pgneeded-metas " Pgfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� "� �� "� �� %� �� B� �� F� �� I� �� P� �� Pgnamegensure-metaclass�C$R�Y�hH ] (C��$" 4�5�$L6�4L��5�Cgl Agt 'gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� � �� !� )�� #� �� $� �� +� �� /� �� 3� �� 6� �� 7� �� <� #�� ?� �� @� �� Agnamegkeywords�Ch �](C��4L��5�C�gl gfilenamef oop/goops.scm� � �� � �� � �� � �� � %�� � +�� � %�� � �� gnamegargs�Ch@]#OOQQ45456�gmapper ;gf ;gkwargs ;gkeywords ;gargs ;gk & ;ga / ;gfilenamef oop/goops.scm� � �� � �� &� �� )� �� /� �� ;� �� ; gnameg kw-do-map�C�Rv�����ihg]456_gclass gfilenamef oop/goops.scm� � "�� � *�� � $�� C���$��1Y��G��h�-13445545$"4545$"4 54 54 455$4 >"G"$4 >"G"@ gsupers �gslots �goptions �gname �gsupers 8�gt D \g metaclass \�gtmp1 s�gtmp2 s� gfilenamef oop/goops.scm� � �� � �� � +�� � �� � �� � �� &� �� -� �� 6� $�� 8� �� 8� �� ;� �� D� �� S� �� \� �� _� �� f� �� i� �� s� �� s� �� }� �� ~� ���� ���� ���� ���� ���� ���� ���� �� � gnameg make-class�C&R4������Y���hc]45�C[gx gfilenamef oop/goops.scm� � �� � ,�� � '�� C��&����������h0~]�$CCvgkw *garg *gfilenamef oop/goops.scm� � �� � �� � "�� )� '�� * Ch0�]�$�4�5��CC�gdef /gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� � �� � �� � �� � �� $� �� /Chp-13�$"4>"G4545$"�4 5����C gsupers igslots igt : Lgslots L igoptions L igfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� )� �� 2� �� :� �� I� 0�� L� �� R� �� Z� �� c� �� i Chb] 45L4?6Zgargs gv gfilenamef oop/goops.scm� � �� C��h(`] 45$O@6Xgy 'gtmp 'gfilenamef oop/goops.scm� � �� 'C5R4�������h+]�C#gout C����h�]456�gk garg grest gout gfilenamef oop/goops.scm� �� �� C������� h�]45�$"�$f4 �� ��� 5��C�$f4 �� ��� 5��C��C�gk garg grest gout gkey gfilenamef oop/goops.scm� �� �� C hPr]45" 45$@6$4?$@"���"���jgx Pgtmp Pgtmp 1gfilenamef oop/goops.scm� �� PC5�R4����h+]�C#gout C*�+h h]45��C`gslotname gslotopt grest gout C��,hx]6pgslot grest gout gfilenamef oop/goops.scm� / �� C6hO]��CGgslot grest gout C��h�]456ygslot grest gout gfilenamef oop/goops.scm� , �� , �� C=hO]�CGgslot grest gout C h��]!45$@45"N45" 45$@6$4 ?$ @"���"���$4?$@"���"����gx �gtmp �gtmp "�gtmp 1 vgtmp @ Wgfilenamef oop/goops.scm� ' �� �C5R4���>QRSUVWXZ[\]^_�`ah�j]�� 45�� 45��Cbgdummy �gname �gsupers �gslot � � C��h(�] 45$@6�gx "gtmp "gfilenamef oop/goops.scm� 6 �� "g macro-typegsyntax-rules�gpatternsgnamegsupersgslotg...C5R4����oh>]�C6gdummy garg C��h(�] 45$@6�gx "gtmp "gfilenamef oop/goops.scm� @ �� "g macro-typegsyntax-rules�gpatternsgargg...C5R4������Ypq�T�"rG�(shx�]�$"4>"G �� ���C�gname xgfilenamef oop/goops.scm� J �� K �� K �� L �� L �� L �� #M �� xChb] 45L4?6Zgargs gv gfilenamef oop/goops.scm� J �� C��h(`] 45$O@6Xgy 'gtmp 'gfilenamef oop/goops.scm� J �� 'C5R4������Ypq)�h8�]�$"4>"GC�gname 7gval 7gfilenamef oop/goops.scm� R �� S �� S �� T �� T �� T �� #U �� 7 Chb] 45L4?6Zgargs gv gfilenamef oop/goops.scm� R �� C��h(`] 45$O@6Xgy 'gtmp 'gfilenamef oop/goops.scm� R �� 'C5R4� �����vt����uh_]L6Wgprefix gfilenamef oop/goops.scm� ] $�� ^ &�� Ch o]4OL5�Cggname gfilenamef oop/goops.scm� [ �� \ �� ] �� \ �� CYvh8�-1345$4O5�C6�gnames 3gargs 3gprefixes 3gfilenamef oop/goops.scm� W �� X �� X �� Y �� Z �� [ �� ,Z �� 1a �� 3a �� 3 Chb] 45L4?6Zgargs gv gfilenamef oop/goops.scm� W �� C��h(`] 45$O@6Xgy 'gtmp 'gfilenamef oop/goops.scm� W �� 'C5 RG�h v-.,3#6ngname gfilenamef oop/goops.scm� c �� d �� gnamegmake-generic�C'R�"wh[]6Sggf gfilenamef oop/goops.scm� h �� h !�� Cx�"w(yh(�]45$445L5CC�ggf #gfilenamef oop/goops.scm� l '�� m -�� m )�� n 3�� n C�� n 3�� n -�� "p -�� #CGz�{�|}yh��-.,3#�$"45$n$45"4O54 4 5544 5>"G"4 54>"GC�ggfs �gname �ggfs '�ggws? 2�gsname L�gsetters \�ges ~�gans ��gfilenamef oop/goops.scm� f �� g �� g �� 'g "�� 'g �� *h �� 2g �� :i �� @j !�� Aj +�� Lj �� Ol �� \j �� _r �� nu )�� ~r �� ~j ���x ���x +���x ���z ���i ���} �� �gnamegmake-extended-generic�C)R�b~ah�]L45�6�ggf gfilenamef oop/goops.scm� � �� � �� � "�� � /�� � "�� � �� � �� Ch(�]4O>"G6�ggfs !geg !gfilenamef oop/goops.scm� � �� � �� !� �� ! gnamegextended-by!�C}R�b~�ah �]4L4556�ggf gfilenamef oop/goops.scm� � �� � �� � �� � #�� � 0�� � #�� � �� � �� Ch(�]4O>"G6�ggfs !geg !gfilenamef oop/goops.scm� � �� � �� !� �� ! gnamegnot-extended-by!�C�R"�Gw����y�� h��-.,3#45$C45$45 4 5645$45$C66�gold-definition }gname }gfilenamef oop/goops.scm� � �� � �� "� �� &� �� 0� �� ;� �� D� �� L� �� M� �� W� �� X� �� b� �� s� �� }� �� }gnamegensure-generic�C(R4�����������������h`?] �� C7gdummy _gname _ _ C��h(�] 45$@6�gx "gtmp "gfilenamef oop/goops.scm� � �� "g macro-typegsyntax-rules�gpatternsgnameC5R����h�]44556�gname gfilenamef oop/goops.scm� � �� � �� � !�� � +�� � �� � �� gnamegmake-setter-name�CxRG��xh@�-.,3#4$45"56�gname <gfilenamef oop/goops.scm� � �� � �� ,� �� -� �� :� �� <� �� < gnameg make-accessor�C*R"w�y'�G����(�+�*h��-.,3#"�45$ 45645$ 45645$# 45 4455645$-45$4 5" 45664 5$4455$C"��:"��6�gproc �gname �gfilenamef oop/goops.scm� � �� � �� &� �� +� �� 3� �� 4� �� @� �� E� �� M� �� N� �� X� �� c� �� l� �� o� $�� y� �� {� �� |� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���� �� �gnamegensure-accessor�C+Ra�G"|z�k�~���b}�b�hh]L6`gmethod gfilenamef oop/goops.scm� � �� � "�� � �� Ch��]45445$"4 5 45545$P4 54>"G4 >"G4>"G"4O>"G4>"G4>"GC�ggeneric �gsetter �gmethods =�ggws =�ggfs W�gfilenamef oop/goops.scm� � �� � �� � #�� � �� � �� � �� � �� &� �� /� !�� 5� 3�� 7� !�� =� �� =� �� B� �� N� �� O� �� U� %�� W� �� W� �� Z� �� n� �� t� �� {� ���� ���� ���� ���� ���� ���� �� � gnamegupgrade-accessor�C�R�{h�]456�gname gval gfilenamef oop/goops.scm� � �� � �� � �� gnamegtoplevel-define!�C R4������������������hxc]�� ��� ��C[gdummy qgname qgargs qgbody q q C������������� hXc] ��C[gdummy Ugname Ugargs Ugbody U U C��h@�]45$@45$@6�gx 9gtmp 9gtmp " 9gfilenamef oop/goops.scm� � �� 9g macro-typegsyntax-rules�gpatternsgsettergnamegargs�gbodyg...gnamegargs�gbodyg...C5R4�!���h �] 4LL5$CLL6zgx gy gt gfilenamef oop/goops.scm� �� �� �� C,hR]6Jgx gfilenamef oop/goops.scm� �� C��h |] 4L545$CCtgx gid gfilenamef oop/goops.scm� �� �� �� �� Ch@�]45$ LO@4?$O@C�gexp ?greferent ?gtmp ?gtmp % ?gfilenamef oop/goops.scm� �� ? gnamegfind-free-id�C��h,]��C$gargs C� �hf]4L54L�5C^gfilenamef oop/goops.scm� �� �� �� �� �� C,hU]6Mgtail gfilenamef oop/goops.scm� �� C�'h �]44L554L�5C�gtail gfilenamef oop/goops.scm� �� �� �� �� �� �� �� C��,hd]6\gf grest gfilenamef oop/goops.scm� � �� C0hv]LL�L�6ngf grest gfilenamef oop/goops.scm� � �� � �� � �� C,h�]45$6C}gf gs grest gfilenamef oop/goops.scm� � �� � �� � "�� Ch�]LL�L�6}gf gs grest gfilenamef oop/goops.scm� � �� � �� � �� C h��]#45"|45"E45$ O@4?$ O@6$4 ?$ LO@"���"���$4?$LO@"��`"��\�gls �gformals �gspecializers �gtmp �gtmp �gtmp ( egtmp B egfilenamef oop/goops.scm� � �� � gnameglp�C�12>����SVXYZ]Ua h8.]L����L��C&gformal 4 4C��hk]LL�6cgx gxs gfilenamef oop/goops.scm� $�� �� ChB]L6:gfilenamef oop/goops.scm� �� ChH�]45$ LO@45$O@�6�gls Dgout Dgtmp Dgtmp ( Dgfilenamef oop/goops.scm� �� B $�� D �� D gnameglp�Cjlmnoqrkt h8.]LL�� ���L��C&gformal 7 7C��hh�]4L5$ LO@OQ4L545$LLO@6�gbody cgtmp cglp ( 8gtmp 8 cgtmp C cgfilenamef oop/goops.scm� ( �� 3 �� 5 �� 8. �� cC���h-]L��C%gbody0 C���������� h0M]L�LLL� CEg procedure .gmake-procedure . . Ch�l]"LL�4L5$<45$4O?" 45 ";"645$4O?" 45 "G4 5$ LLO@6dgformals �gspecializer �gbody �gid �gtmp % Lgtmp _�g procedure ��gmake-procedure ��gtmp ��gtmp �� gfilenamef oop/goops.scm� I �� ; �� ; #�� ; �� ; �� < �� R> ���@ ���G ���K �� � C��hH�]OQ4545$LO@6�gargs Fgbody0 Fgbody1 Fglp gtmp Fgtmp & Fgfilenamef oop/goops.scm� � �� � "�� � 5�� � �� F �� F C�� hP�]OQ45$@45$O@6�gx Kgfind-free-id Kgtmp Kgtmp / Kgfilenamef oop/goops.scm� � �� KC5!R�g�b�h(�] 454L5$CL�6�gx 'gdm 'gfilenamef oop/goops.scm� Z �� [ �� [ �� \ �� \ �� ] "�� %] 2�� '] �� 'Cnh�]O456}gm gfilenamef oop/goops.scm� X �� ^ �� Z �� gnamegadd-method-in-classes!�C�R�b��gh~]4L4556vgx gfilenamef oop/goops.scm� b �� d �� e �� e #�� e �� c �� Cnh�]O456�gm gfilenamef oop/goops.scm� ` �� f �� b �� gnamegremove-method-in-classes!�C�Rna��hhx]4545"?(�C4�5�$4�>"G�C�"���"���pggf agnew agnew-spec agmethods agl Ygfilenamef oop/goops.scm� h �� i �� j �� j �� j �� i �� k �� l �� %m �� 'n �� ,n +�� .n �� 1n �� 5n �� 6q �� ;q +�� @q �� Mr �� St �� Yt �� Yk �� a gnamegcompute-new-list-of-methods�C�R�ah�]456�gm gfilenamef oop/goops.scm� v �� w �� w �� w �� w �� gnamegmethod-n-specializers�C�R���hr]456jgm gn gfilenamef oop/goops.scm� z �� z �� z �� Clh�] 456ggf gfilenamef oop/goops.scm� y �� | �� z �� gnamegcalculate-n-specialized�C�R�b���h[]6Sggf gfilenamef oop/goops.scm� � �� � �� Ca~ h@�]4>"G445>"G456�ggf >gfilenamef oop/goops.scm� ~ �� �� � �� � �� � �� '� �� 4� �� :� �� <� �� >� �� >gnameginvalidate-method-cache!�CR4Gi�i�i�i������b����h`�]4>"G445>"G4>"G4>"GC�ggf [gm [gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� � �� -� �� 6� �� H� �� [ C5�R"$4(i4i,5$,i",5"B4i,5$04"i,ii5$4Gii�,5""���""���,R44ri�i5,i�i>"G4i,5�$",i�$)4 i,4Gii�,5>"G"4,i,i4Gi�i��i�i������q,h0�]45$4>"G6L6�gproc /gm /gfilenamef oop/goops.scm� � �� � �� � �� � �� '� �� /� �� / Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� � �� C�5>"G4i,5�$",i�$)4 i,4Gii�,5>"G"4,i,i4Gi�i��i�i������,phr]456jgpg gm gfilenamef oop/goops.scm� � �� � �� � �� C5>"G4i,5�$",i�$)4 i,4Gii�,5>"G"4,i,i4Gi�i� i�i������Y�hs]6kgobj gm gfilenamef oop/goops.scm� � �� � �� � �� C5>"G4i=5�$"=i�$)4 i=4Gii�=5>"G"4,i=i4Gi�i��i�������da��!� hPJ]!44554455$����45��CCBgm Jgspec Jgsrc " Jgargs 2 Hgbody 2 Hgfilenamef oop/goops.scm� � �� � �� � �� � ,�� � �� � �� � �� � �� � �� � ,�� � �� "� �� "� �� *� �� -� �� 1� �� 2� �� 8� �� 9� �� F� �� G� �� JC5>"G4io5�$"oi�$)4 io4Gii�o5>"G"4,ioi4Gi�i��i������ahb]6Zgm gfilenamef oop/goops.scm� � �� � �� � �� C5>"G�i1R�i2Rv��h�]�6�gs gfilenamef oop/goops.scm� � �� � �� � �� gnamegslot-definition-allocation�C3Rv�h�]�6}gs gfilenamef oop/goops.scm� � �� � �� � �� gnamegslot-definition-getter�C4Rv�h�]�6}gs gfilenamef oop/goops.scm� � �� � �� � �� gnamegslot-definition-setter�C5Rvh�]�6gs gfilenamef oop/goops.scm� � �� � �� � �� gnamegslot-definition-accessor�C6Rv��h�]�456�gs gfilenamef oop/goops.scm� � �� � �� � $�� � �� gnamegslot-definition-init-value�C7Rv��h�]�456�gs gfilenamef oop/goops.scm� � �� � �� � #�� � �� gnamegslot-definition-init-form�C8Rv�h�]�6�gs gfilenamef oop/goops.scm� � �� � �� � �� gnamegslot-definition-init-thunk�C9Rvh�]�6�gs gfilenamef oop/goops.scm� � �� � �� � �� gnamegslot-definition-init-keyword�C:Rjh�]456�gclass g slot-name gfilenamef oop/goops.scm� � �� � �� � �� gnamegclass-slot-definition�C<Rah�]4455��C�gclass g slot-name gfilenamef oop/goops.scm� � �� � �� � �� � (�� � �� � �� � �� gnamegslot-init-function�C;Rah�]6�gobj gfilenamef oop/goops.scm� � �� � �� � �� gnamegaccessor-method-slot-definition�g documentationf5Return the slot definition of the accessor @var{obj}.�CsR4'i5R4,ii4Gi�i� i i��s��h`]CXgx gy gfilenamef oop/goops.scm� � �� C5>"G4iii>"G h�]445 56�go gfile gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� gnamegdisplay-address�CR4i 5�$" i�$+4 i 4Gii� 5>"G"4,i i4Gi�i� i i���� h8�]4>"G4>"G>6�go 2gfile 2gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� 2� �� 2 C5>"G4pi i5R4i 5�$" i�$+4 i 4Gii� 5>"G"4,i i4Gi�i��i i��$�c@ dh�] �45$]4>"G445>"G4 >"G4>"G>6L6�go ygfile ygclass ygfilenamef oop/goops.scm� �� �� �� �� �� �� �� �� �� �� ) �� , �� 9 �� B �� V �� q �� y �� y Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� �� C�5>"G4i 5�$" i�$+4 i 4Gii� 5>"G"4,i i4Gi�i��i i�%�2�c@ dh�V] �45$�45$�4>"G445>"G4 >"G445>"G4 >"G4>"G>6L6L6Ngclass �gfile �gmeta �gfilenamef oop/goops.scm� �� �� �� �� �� �� �� �� �� �� ! �� " �� & �� - �� 6 �� 9 �� F �� O �� c �� f �� s �� | ��� ��� ��� �� � Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� �� C�5>"G4i 5�$" i�$+4 i 4Gii� 5>"G"4,i i4Gi�i�i i�3�K�c@� dk@BlFh��]�45$�45$�4>"G445>"G45$,4 >"G4>"G"4>"G44 4 55>"G6L6L6�ggf �gfile �gmeta �gname U�gfilenamef oop/goops.scm� �� �� �� �� �� �� �� �� �� �� ! �� " �� & �� - �� 6 �� 9 �� F �� O �� U �� ]! �� ^# �� r$ ���% ���% ���% ���& ���& ���& ���& ���& ���' ���' ��� ��" � Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� �� C�5>"G4i 5�$" i�$+4 i 4Gii� 5>"G"4,i i4Gi�i��i i��[�c@ d�c@ah �]45$6C�gspec gfilenamef oop/goops.scm� 2 �� 3 �� 3 1�� 3 �� 3 �� 4 .�� 4 �� Cnh�e] �45$�45$�4>"G445>"G4 >"G444 55>"G4 >"G4 >"G>6L6L6]go �gfile �gmeta �gfilenamef oop/goops.scm� * �� + �� + �� , �� , �� , �� , �� - �� - �� - �� !, �� "/ �� &/ �� -/ �� 60 �� 90 �� F0 �� O1 �� c2 �� f2 �� k6 �� s2 �� z2 ���8 ���9 ���: ���* �� � Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� * �� C�5>"G4i 5�$" i�$+4 i 4Gii� 5>"G"4,i i4Gi�i� i i��]��hk]6cgo gfile gfilenamef oop/goops.scm� > �� ? �� C5>"G4i^5�$"^i�$+4 i^4Gii�^5>"G"4,i^i4Gi�i�_i`i_i i_i i i i�h�s��h�,3C�gmodule gname gint1 gval1 gint2 gval2 gvar gval gfilenamef oop/goops.scm� E �� C5>"G4i^5�$"^i�$+4 i^4Gii�^5>"G"4,i^i4Gi�i�_i`i_ii_ii iii�h�r��m)h(�,3&C456�gmodule "gname "gint1 "gval1 "gint2 "gval2 "gvar "gval "gfilenamef oop/goops.scm� O �� W �� X �� X -�� X �� "X �� " C5>"G4i^5�$"^i�$+4 i^4Gii�^5>"G"4,i^i4Gi�i�_i`i_ii_ii i|i�s�����a�b�~h��,34455$C44455�>"G44455�>"G4>"GC�gmodule gname gint1 gval1 gint2 gval2 gvar ggf gfilenamef oop/goops.scm� Z �� b �� b �� b $�� b �� b �� b �� d �� #e �� &f �� +f +�� 1f 8�� 3f +�� 5f �� 6f �� ;d �� Dg �� Jh �� Mi �� Ri '�� Xi 6�� Zi '�� \i �� ]i �� bg �� kj �� C5>"G4�i�i^^i>"G4i�5�$"�i�$+4 i�4Gii��5>"G"4,i�i4Gi�i�_i`i_i i_i i i i�h�s��h�,3C�gmodule gname gint1 gval1 gint2 gval2 gvar gval gfilenamef oop/goops.scm� o �� C5>"G4i�5�$"�i�$+4 i�4Gii��5>"G"4,i�i4Gi�i�_i`i_ii_ii i i�h����^h �,36�gmodule gname gint1 gval1 gint2 gval2 gvar gval gfilenamef oop/goops.scm� y �� � �� C5>"G4�i�i��i>"Ga�0�3� hpu]44554455$" 45��4455$"4>"GCmgclass og slot-name og this-slot ogt $ >gg-n-s @ ogfilenamef oop/goops.scm� � �� � �� � $�� � 4�� � $�� � �� � �� � �� � *�� � :�� "� *�� $� �� $� �� 3� �� ?� �� @� �� C� �� F� �� P� �� T� �� Y� �� o gnamegclass-slot-g-n-s�C�R��/h(�] 445�545$6C�gclass (gslot (gx (gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� � �� � �� %� �� ( gnamegclass-slot-ref�C-R�h�]45��6�gclass gslot gvalue gfilenamef oop/goops.scm� � �� � �� � �� � �� gnamegclass-slot-set!�C.R4i/5�$"/i�$)4 i/4Gii�/5>"G"4,i/i4Gi�i��i�i i������Y�h�]6xgc go gs gfilenamef oop/goops.scm� � �� � �� � �� C5>"G4i/5�$"/i�$)4 i/4Gii�/5>"G"4,i/i4Gi�i��i i������Y�hq]6igc gs gfilenamef oop/goops.scm� � �� � �� � �� C5>"G4i/5�$"/i�$)4 i/4Gii�/5>"G"4,i/i4Gi�i��i������Y�hb]6Zgo gfilenamef oop/goops.scm� � �� � �� � �� C5>"G4i05�$"0i�$)4 i04Gii�05>"G"4,i0i4Gi�i��i�i i������Y�h�]6xgc go gs gfilenamef oop/goops.scm� � �� � �� � �� C5>"G4i05�$"0i�$)4 i04Gii�05>"G"4,i0i4Gi�i��i i������Y�hq]6igc gs gfilenamef oop/goops.scm� � �� � �� � �� C5>"G4i05�$"0i�$)4 i04Gii�05>"G"4,i0i4Gi�i��i�i i i������0h�]6�gc go gs gvalue gfilenamef oop/goops.scm� � �� � �� C5>"G4iH5�$"Hi�$)4 iH4Gii�H5>"G"4,iHi4Gi�i�i i������Y�hu]6mggf gargs gfilenamef oop/goops.scm� � �� � �� � �� C5>"G4iI5�$"Ii�$)4 iI4Gii�I5>"G"4,iIi4Gi�i�i i������Y�kh�]45�6ggf gargs gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� C5>"G4iJ5�$"Ji�$)4 iJ4Gii�J5>"G"4,iJi4Gi�i�i i������Y�hu]6mggf gargs gfilenamef oop/goops.scm� � �� � �� � �� C5>"G4iM5�$"Mi�$)4 iM4Gii�M5>"G"4,iMi4Gi�i��i��������1j�cbah(x]4L5$L4L56Cpgslot "gfilenamef oop/goops.scm� � �� � �� � �� � *�� � �� "Ch@�]4�544�554O>"GC�gself <gclone <gslots <gfilenamef oop/goops.scm� � �� � �� � #�� � 3�� � �� � �� � �� � !�� � �� � �� � �� � �� <C5>"G4iN5�$"Ni�$)4 iN4Gii�N5>"G"4,iNi4Gi�i��i��������1j�cba\Nh@�] 4L5$.L4L545$45"6C�gslot ?gvalue ;gfilenamef oop/goops.scm� � �� � �� � �� � ,�� � �� !� %�� +� !�� ,� %�� =� �� ?Ch@�]4�544�554O>"GC�gself <gclone <gslots <gfilenamef oop/goops.scm� � �� � �� � #�� � 3�� � �� � �� � �� � !�� � �� � �� � �� � �� <C5>"G4iO5�$"Oi�$)4 iO4Gii�O5>"G"4,iOi4Gi�i��i�i������g��hZ]LL6Rgm gfilenamef oop/goops.scm� � �� � �� Cb��a�b��fh~]4L4556vgc gfilenamef oop/goops.scm� � �� � %�� � #�� � .�� � #�� � �� Ceb��fh �]L4L455�6gc gfilenamef oop/goops.scm� �� �� #�� .�� #�� �� �� C��hZ]LL6Rgc gfilenamef oop/goops.scm� �� �� Cf�h�] 4>"G454O>"G44455>"G4 5�4 O45>"G4O45>"G4 >"G4O45>"G4>"G4>"GCzgold gnew gmethods ]gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� 9� �� ?� �� @� �� E� �� M� �� R� �� ^� �� d� �� f� �� i� �� j� �� t� �� � ��� ��� ��� ��� ��� ��� ��� ��� ��� ��� ��� �� C5>"G4i�5�$"�i�$+4 i�4Gii��5>"G"4,i�i4Gi�i��i������"a�b�� hX�] 45$G4544455>"G4>"G 6C�gm Xggf Vgfilenamef oop/goops.scm� �� �� �� �� (�� �� �� �� ! "�� "! �� '! )�� -! 6�� /! )�� 1! �� 6 �� ?" �� V$ �� XCghb]456Zgc gfilenamef oop/goops.scm� �� % �� �� C5>"G4i�5�$"�i�$+4 i�4Gii��5>"G"4,i�i4Gi�i��i�i�i��%��nh8�]"%�$��$ �"�"���C45"����gm 8gold 8gnew 8gl +gfilenamef oop/goops.scm� + �� . �� 1 �� 1 �� 3 �� 3 �� 3 �� 4 �� #5 �� )5 �� +. �� ,. �� 8. �� 8 C5>"G4i�5�$"�i�$+4 i�4Gii��5>"G"4,i�i4Gi�i��i�i�i�&�-��O&eh�d�h0�]4454545�56�gc )gold )gnew )gfilenamef oop/goops.scm� ; �� ? �� ? "�� @ "�� A )�� %B .�� '? �� )> �� ) C5>"G�456,BCyh�i]454545$44L5>"G"$44L5>"G"$/44L5>"G454L56Cags �gg-n-s �ggetter-function �gsetter-function �gaccessor �gfilenamef oop/goops.scm� L �� M �� N �� O �� M �� #P �� $Q �� )R �� 6Q �� HS �� IT �� NU �� [T �� mV �� nX �� sY ���X ���Z ���[ ���Z �� � Cah�]O456�gclass gslots gfilenamef oop/goops.scm� J �� \ �� \ �� \ �� K �� gnamegcompute-slot-accessors�C.R4iB5�$"Bi�$)4 iB4Gii�B5>"G"4,iBi4Gi�i��i i�0�G��G��9=@D hP]�����$4�5"$45"456�gclass Lgg-n-s Lg init-thunk Lgg-n-s Lgfilenamef oop/goops.scm� ^ �� _ �� ` �� _ �� b �� c �� "c �� #d �� (d >�� *d �� 4c �� 5f �� @h �� La �� L C5>"G4iC5�$"Ci�$)4 iC4Gii�C5>"G"4,iCi4Gi�i��i i�0�N��G� �IDh8�] �����$��"456�gclass 8gg-n-s 8gg-n-s 8gfilenamef oop/goops.scm� k �� m �� l �� l �� o �� p �� #p �� &q �� ,r �� 8n �� 8 C5>"GOhc]4L56[go gfilenamef oop/goops.scm� v �� v �� v �� Ch]OCwgproc gfilenamef oop/goops.scm� u �� gnamegmake-generic-bound-check-getter�C9R PR4�Q�����qWRS�TU�hH�]�$:�& ���LC�&���L����CL6C�gform Fgfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� � �� � �� � �� "� �� $� �� (� �� +� �� .� �� 4� .�� :� �� C� �� Fgnameg body-trans�C��h(�] OQL4L5��C�gx "g body-trans "gfilenamef oop/goops.scm� � �� � �� � �� � �� "gnamegmake-one�CVP�X�YW[hx�-13������4O455� �� �C�gform tgbody tgname tgn-var tgargs tgfilenamef oop/goops.scm� ~ �� �� � �� � �� �� � �� &� �� 2� ,�� :� �� ;� �� t Chb] 45L4?6Zgargs gv gfilenamef oop/goops.scm� ~ �� C��h(`] 45$O@6Xgy 'gtmp 'gfilenamef oop/goops.scm� ~ �� 'C5QR�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h 7] �45$6C/go gx C�/h �] L�45$6C|go gx gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� Ch )] �$L�COC!gn CO@Rh)] �C!go Ch)]�C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go Ch)] �C!go ChR]L�CJgo gfilenamef oop/goops.scm� � �� Ch )] �$L�COC!gn CO=Rh8] �C0go gv Ch8]�C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Ch8] �C0go gv Cha]L�CYgo gv gfilenamef oop/goops.scm� � �� Ch )] �$L�COC!gn COIR�a\@1]Y^B�_`3���a9bc7�hA]LC9gfilenamef oop/goops.scm� � �� C�h��]94L54L54L5�4545$"�"4L>"�G"��$y45 �$c���4 5$"4 L>"G4 5$"4L>"G""��h""��`45 �$"�$A"4>"&G" �$�$""���""�����C45$"45$" 4L5"$"#4545$"O45$" �$"45��C�gs �gindex �gg-n-s �gsize $�gname -�gt 6�gget ~�gset ~�gkey ��gthunk S�gt ��ginit ��gt �� gfilenamef oop/goops.scm� � �� � �� � '�� � �� � �� � �� � �� � �� � )�� !� �� $� �� $� �� '� �� -� �� 0� �� 6� �� G� �� K� �� V� �� b� �� e� �� i� �� j� "�� s� �� w� �� z� �� }� �� ~� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ��� ��� ��� ��#� ��&� ��+� ��.� (��2� ��H� ��I� ��M� ��S� ��[� ��\� ��f� ��m� ��q� ��y� ���� ���� ���� ���� ���� ���� "���� ���� "���� ���� ���� ,���� ���� ���� ��I �Ch�]O6�gclass gslots gfilenamef oop/goops.scm� � �� � �� gnamegcompute-getters-n-setters�CdR4i>5�$">i�$)4 i>4Gii�>5>"G"4,i>i4Gi�i��i�e�g��?eh]]6Ugclass gfilenamef oop/goops.scm� � �� � �� C5>"Ghhc]��C[gl gfilenamef oop/goops.scm� � �� � �� � �� Chu]6mglst gfilenamef oop/goops.scm� � �� � �� gnameg only-non-null�CiRji��ih0] 454445556�gc ,gget-direct-supers ,gc-direct-supers ,gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� � (�� & (�� (� �� *� �� ,� �� , gnamegcompute-std-cpl�C?Rk[l���hc]L�6[gl gfilenamef oop/goops.scm� '�� 1�� )�� Ch(�] (C�4OL5$CC�gl &gc &gfilenamef oop/goops.scm� �� �� ,�� !�� "�� ! �� &gnameg candidate-car�CYmji�h�]�L&�CC|gl gfilenamef oop/goops.scm� �� $�� �� �� gnamegremove-next�Ch`"] 45$64O5$"4>"G�4 4 O556greversed-partial-result ]ginputs ]gnext # ]gfilenamef oop/goops.scm� �� �� �� �� �� # �� + �� 0 �� 4 �� 9 �� H �� I �� L $�� [ �� ] �� ] gnamegmerge-lists�CjRnopqh(�]44554455456�gc %gget-direct-supers %gfilenamef oop/goops.scm� # �� $ �� $ �� $ �� % �� % �� % �� & �� %$ �� % gnamegcompute-clos-cpl�CrRhk�h �] ��L��$C�L6�g constraint gt gfilenamef oop/goops.scm� 2 �� 3 )�� 3 $�� 3 �� 3 �� 4 %�� 4 �� ChZ]LOL6Rgx gfilenamef oop/goops.scm� 1 �� 2 �� CYshc]L��C[gx gfilenamef oop/goops.scm� > �� > *�� > %�� C�h��]+"f(C4O5(6�(�" 454O545"���"����gelements {gconstraints {gtie-breaker {gelements lgconstraints lgresult lg can-go-in-now lgchoice D lgfilenamef oop/goops.scm� ) �� * �� - �� 0 �� / �� '7 �� +8 �� -8 �� 09 '�� 49 �� 7: �� <; �� D9 �� G> �� WA �� `A �� bA �� l= �� l* �� q, �� {* �� { gnamegtop-sort�CnRh�hZ]L6Rgx gfilenamef oop/goops.scm� H �� I &�� CYthXh]"">�4L54O5(�(6�"����C45"���`gpartial-cpl Qgmin-elts Qgpcpl Dgcurrent-elt Dgds-of-ce Dgcommon " Dgfilenamef oop/goops.scm� D �� E �� F �� F �� G �� G �� H �� "H �� *K �� -L �� 1L �� 5M !�� 7M �� :N �� @N �� CO �� DE �� EE �� QE �� Q Chu]OCmg get-supers gfilenamef oop/goops.scm� C �� gnamegstd-tie-breaker�CqR��hX-]"D(C�45$ �"����44L5�5"���"���%gx Xgresult Jgpending Jgnext Jgfilenamef oop/goops.scm� S �� T �� V �� X �� X �� Y �� !Y �� &Z �� .Z �� 3[ �� 4\ �� 7\ �� @] �� B\ �� J[ �� JT �� KT �� PU �� XT �� XCh�]OCzgget-follow-ons gfilenamef oop/goops.scm� R �� gnamegbuild-transitive-closure�CoRohx�]"S("��$$(C��4L�5�"��������"���44L55"���{gx qgelements Ygthis-one Ygresult Ygfilenamef oop/goops.scm� ` �� a �� d �� d �� d &�� d �� d �� e �� %g �� (h �� )i �� .i *�� 0i �� 1h �� =g �� Bl �� Em �� Hm +�� Lm �� Om �� Yk �� Ya �� Za �� [a �� ea �� fb �� gc �� qa �� qCh{]OCsgget-follow-ons gfilenamef oop/goops.scm� _ �� gnamegbuild-constraints�CpR4i@5�$"@i�$)4 i@4Gii�@5>"G"4,i@i4Gi�i��i i�u���3�a\b�1��h�97�i��v�2�Y�hp�]"45�$%454�>"GC�$�4544 4 555$(45$ 45"4 56"'44�55$��C�"���45�"����$(45$ 45"4 56�$f44554455$"$"4>"G"4>"GCL6�gclass mgs mgkey mgalready-allocated 9gname I�gthunk o�gl ��gr ��gthunk ��gget egset egfilenamef oop/goops.scm� r �� y �� y �� | �� | .�� | �� | �� } �� &} �� )} !�� .} �� By �� C� �� I� �� L� �� Q� �� V� 0�� ^� �� `� �� d� �� it �� ot �� wu �� xv ���w ���� ���� ���� ���� "���� ,���� 4���� "���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���y ���t ���t ���u ���v ���w ���� ���y ��� ��� )��� ��� ��� )��� ��� ��'� ��-� ��2� ��6� ��=� ��N� ��U� ��d� ��mr ��C m Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� r �� C�5>"GhQ]MCIgo gfilenamef oop/goops.scm� � �� Chi]NCago gv gfilenamef oop/goops.scm� � �� � �� Ch�]HOOC�gclass gvalue gfilenamef oop/goops.scm� � �� � �� gnamegmake-closure-variable�C�R4i@5�$"@i�$)4 i@4Gii�@5>"G"4,i@i4Gi�i��i i������Y�3hz]456rgo gs gfilenamef oop/goops.scm� � �� � �� � .�� � �� C5>"G4iA5�$"Ai�$)4 iA4Gii�A5>"G"4,iAi4Gi�i��i�e�����h]]6Ugclass gfilenamef oop/goops.scm� � �� � �� C5>"G4iE5�$"Ei�$)4 iE4Gii�E5>"G"4,iEi4Gi�i��i i�������ht]6lgobject ginitargs gfilenamef oop/goops.scm� � �� � �� C5>"G4iE5�$"Ei�$)4 iE4Gii�E5>"G"4,iEi4Gi�i��i i�����v��b@�������>�A�\d.�b�ah�]L45�6gx gfilenamef oop/goops.scm� � �� � �� � '�� � 3�� � '�� � �� � �� C��hp�]4L>"G4545445>"G4>"G4 >"G4 >"G4>"G44 5>"G4>"G454>"G4 >"G445>"G4>"G4O>"G4>"G6�gclass nginitargs ngdslots *ngsupers *ngslots �;gfilenamef oop/goops.scm� � �� � �� � .�� � �� !� �� (� 3�� *� �� *� �� /� �� 5� �� 6� (�� >� E�� @� (�� E� �� N� �� T� �� [� �� d� �� j� �� q� �� z� ���� ���� (���� ���� ���� ���� (���� ���� ���� ���� (���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ���� ��� ��� ��� *��� ��%� ��<� ��U� ��n� ��4 n Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� � �� C�5>"Gv�b�h8�] 45$�$ @6C�gobject 1ginitargs 1gproc 1gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� !� #�� %� �� +� �� /� �� 0� �� 1 gnameginitialize-object-procedure�C�R4iE5�$"Ei�$)4 iE4Gii�E5>"G"4,iEi4Gi�i��i i������h ]4L>"G6wgapplicable-struct ginitargs gfilenamef oop/goops.scm� � �� � �� Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� � �� C�5>"G4iE5�$"Ei�$)4 iE4Gii�E5>"G"4,iEi4Gi�i�i i���v��b�"�G�� �����h_-13L@Wgargs gfilenamef oop/goops.scm� � *�� � ,�� C@h�,]45454L>"G445$&4 O5">"G$ 6C$ggeneric �ginitargs �gprevious-definition �gname �gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� /� �� 5� �� 6� $�� B� �� C� *�� d� $�� i� $�� n� �� |� ���� )���� �� � Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� � �� C�5>"G4iE5�$"Ei�$)4 iE4Gii�E5>"G"4,iEi4Gi�i�wi i���v�h(z]4L>"G456rggws &ginitargs &gfilenamef oop/goops.scm� � �� � �� &� �� & Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� � �� C�5>"G4iE5�$"Ei�$)4 iE4Gii�E5>"G"4,iEi4Gi�i�|i i���b�v{h(�]4L>"G456�geg (ginitargs (gfilenamef oop/goops.scm� � �� � �� � �� $� 9�� &� �� (� �� ( Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� � �� C�5>"Ghr-13Cjgargs gfilenamef oop/goops.scm� � �� gnamegdummy-procedure�CR4iE5�$"Ei�$)4 iE4Gii�E5>"G"4,iEi4Gi�i��i i� �0�b�v!��������h�~]4L>"G445>"G445>"G445>"G4 4 5>"G445>"G 456vgmethod �ginitargs �gfilenamef oop/goops.scm� � �� � �� � �� � &�� ,� �� 5� �� ;� �� <� "�� C� G�� E� "�� J� �� S� �� Y� �� Z� �� h� �� q� �� w� �� x� �� � =���� ���� ���� ���� ���� ���� 7���� ���� ���� ���� $���� �� � Ch_]OCWgreal-next-method gfilenamef oop/goops.scm� � �� C�5>"GD�;^`3<�_] h��] ""4L5$LL456C4LL5$@44L55&(4LL5$LL4LL56"���"���"����gslot {ginit (gfilenamef oop/goops.scm� �� �� �� �� �� & �� ( �� ) �� 7 �� 8 �� ; �� E �� K �� L �� Z �� c �� o �� {C�1j1L hh&]454O4455>"G4>"G4>"GCgold-instance bg old-class bg new-class bgnew-instance bgfilenamef oop/goops.scm� �� �� 3�� �� �� �� �� " (�� * �� / �� 8 �� L �� b gnamegchange-object-class�C2R4iL5�$"Li�$)4 iL4Gii�L5>"G"4,iLi4Gi�i��i�i�5�6��hu]Cmgold-instance gnew-instance gfilenamef oop/goops.scm� �� C5>"G4iK5�$"Ki�$)4 iK4Gii�K5>"G"4,iKi4Gi�i��i�i�8�;��2h�]�6|gold-instance g new-class gfilenamef oop/goops.scm� % �� & $�� & �� C5>"G4iD5�$"Di�$)4 iD4Gii�D5>"G"4,iDi4Gi�i��i i���=���hs]6kgclass ginitargs gfilenamef oop/goops.scm� . �� / �� C5>"G4iF5�$"Fi�$)4 iF4Gii�F5>"G"4,iFi4Gi�i��i i��>�E��DEh0�-13454>"GC�gclass +ginitargs +ginstance +gfilenamef oop/goops.scm� 1 �� 2 �� 2 �� 3 �� + C5>"GFiGR4iP5�$"Pi�$)4 iP4Gii�P5>"G"4,iPi4Gi�i�i i���Q��a�JSRVIhX�] 45(4>"G"45$4566�ggf Sgargs Sgmethods 0 Sgfilenamef oop/goops.scm� F �� G �� G �� G �� G �� H �� (I �� 0I �� 8J �� =K �� KK �� SL �� S C5>"G4Gii�S5RR4iR5�$"Ri�$+4 iR4Gii�R5>"G"4,iRi4Gi�i�i i���T��Thl]6dggf gargs gfilenamef oop/goops.scm� S �� T �� C5>"GRiSi4iV5�$"Vi�$)4 iV4Gii�V5>"G"4,iVi4Gi�i�i i i�U�b���dZUhk]L6cgm1 gm2 gfilenamef oop/goops.scm� Z �� Z "�� Ch �]45O6�ggf gmethods gargs gtargs gfilenamef oop/goops.scm� X �� Y �� Y �� Z �� C5>"G4iU5�$"Ui�$)4 iU4Gii�U5>"G"4,iUi4Gi�i��i�i i�e�h��fh}]6ugm1 gm2 gtargs gfilenamef oop/goops.scm� \ �� ] �� C5>"G4iQ5�$"Qi�$)4 iQ4Gii�Q5>"G"4,iQi4Gi�i�i i i i�j�p��rh�]4�54�5@�ggf gmethods g build-next gargs gfilenamef oop/goops.scm� _ �� ` �� ` �� ` �� a �� a �� a �� ` �� C5>"G4iR5�$"Ri�$)4 iR4Gii�R5>"G"4,iRi4Gi�i�iqi i�r����HQh@�-13L(L(L"6LLL(L"6gnew-args ;gfilenamef oop/goops.scm� f �� h �� g �� #i �� 1g �� ;j �� ; Chx]LLOCpgprocs gargs gfilenamef oop/goops.scm� e �� gnamegnext�CQh �]OQ6�ggf gl gargs gnext gfilenamef oop/goops.scm� d �� e �� k �� C5>"G4�i�hf]6^gproc gfilenamef oop/goops.scm� n �� o *�� o �� C/i0iHiIiJi>"G�hH]"5(C4�5$ �"������"���"���gl Fgl ;gres ;gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� � �� � �� *� �� -� �� 0� �� 3� �� ;� �� ;� �� >� �� F� �� Fgnameglist2set�C�R�fh�]4L455�C�gc gfilenamef oop/goops.scm� � �� � �� � )�� � �� � �� gnamegallsubs�C��fh(�] OQ44556�gc !gallsubs !gfilenamef oop/goops.scm� � �� � �� � �� � )�� � �� !� �� !gnamegclass-subclasses�CWR��gWh�]445�56�gc gfilenamef oop/goops.scm� � �� � �� � �� � �� � �� � �� gnameg class-methods�CXR�i6� gm ,gtable-of-metas ��gt ^�^�gt `�`�gt a�a�gt b�b�gt e$e9gt pZppgt q�q�gt t�t�gt w�w�gt {�{�gt ��gt ��,gt ����gt ����gt ����gt �d�zgt �N�cgt ����gt ����gt ����gt ��gt �+�@gt �t��gt ����gt ����gt ��,gt ����gt �]�rgt ��+gt ����gt �p��gt ��*gt �!�6gcache ����gcache ��DZgcache Γ�qgt ֭��gt ��'gt ��> �D�Ygt �G�\gt �n��gt ����gt ����gt %:gt �gt i~gt =Rgt Wlgt ��gt ��gt -Bgt *@gt Wlgt Xmgt ��gt !6;gfilenamef oop/goops.scm� �� - M �� 6 M �� 7 Q �� I T �� e U �� k U �� p U �� y X ��� j ��� x ��� x ��� x ��� x ��� y ��� y ��� y ��� ~ ���� ���� ���� ���� �� g� ���� ���� ��*)c ��.Cf ��/�� ��1e� ��3� ��5�� ��6�� ��9s� ��<�� ��=�� ��UyX ��V�` ��X�h ��Y�v ��Z�y ��\�~ ��\�� ��^� ��^m� ��^n� ��^o���^�� ��^�� ��`{� ��a�� ��b�� ��e� ��f9� ��fA� ��f�� ��g�� ��hP� ��i� ��i�� ��jt� ��k$� ��k�� ��l�� ��m�� ��n�� ��n�� ��n�� ��n�� ��n�� ��n�� ��n�� ��oO� ��oX� ��pN� ��pO� ��q�� ��q�� ��q� ��t� ��w� ��{�* ���> ���E ����O ����Z ����m ����m #����m ����o ���Yy ���� ���'� #���1� ���I� ���c� ���C� ���D� ����� ����� ����� ����� ���!� ���j� ����� ����� ��� � ����� ���S� ��� ����+ ���e; ��� J ���^ ���k ����u ���| ����� ��ǵ� ���u� ��֢� ��֣� ���� ���� ���� ����# ���() ���C ���^R ���_ ���r ���� ���� ���:� ���=� ���d� ����� ����� ����� ��� ���� ��^� ��_� ��2 ��3 ��M% ���. ���1 ��"6 ��#F ��Q ��Q ��Q ��P ��S ��LV ��MX ��N\ ���_ ��d ���n ���p ���n �� � ��!�� ��"�� ��"�� ��� "� C6