/
/
usr
/
lib64
/
guile
/
2.0
/
ccache
/
oop
/
goops
Server: server63.web-hosting.com (198.54.116.184)
You: 216.73.216.187
PHP 7.4.33
Dir:
/usr/lib64/guile/2.0/ccache/oop/goops
Edit:
/usr/lib64/guile/2.0/ccache/oop/goops/dispatch.go
GOOF----LE-8-2.0l( ] a 4 h� ] g guile� � g define-module*� � � g oop� g goops� g dispatch� � g filenameS� f oop/goops/dispatch.scm� g importsS� � � g util� � � g system� g base� g target� � � � g exportsS� g memoize-method!� � g set-current-module� � � g current-module� g *dispatch-module*� g gensym� !f a� "f t� #g append� $# � %# � &g rest� 'g let� (g map� )g class-of� *f p� +g if� ,g and� -g apply� .& � /g assq-ref� 0g eq?� 1f c� 2g cache-miss� 3g cons*� 4g list� 5g emit-linear-dispatch� 6g make-vector� 7f g� 8g vector-length� 9g lambda� :g cdr� ;g case-lambda� <g car� =g with-target� >g %host-type� ?g compile� @? � A@? � B@? � Cg envS� Dg fromS� Eg scheme� Fg optsS� Gg partial-eval?S� Hg cse?S� IGH � Jg args� KJ � Lg max� Mg compute-dispatch-procedure� Ng timer-init� Og slot-ref� Pg effective-methods� Qg slot-set!� Rg procedure� Sg cache-dispatch� Tg delayed-compile� Ug n-specialized� V ) � W ) � Xg compute-cmethod� Y X � Z X � [g memoize-effective-method!� \g compute-applicable-methods� ]g %compute-applicable-methods� ^g no-applicable-method� _g set-procedure-property!� `g system-procedure�C 5h8! � ]4 5 4 > " G 4i5 R h8 � ]" �$ C�45�"��� �"��� � g n 2 g stem 2 g n & g syms & g filenamef oop/goops/dispatch.scm� @ �� A �� B �� B �� D �� D �� D �� & D �� & A �� ) A �� * A �� 2 A �� 2 g nameg gen-syms� C!"%&'() h p ] C h g t g a g filenamef oop/goops/dispatch.scm� P �� Q �� C *+,-./01234 hX & ]e4545" ( .$ 45" 45 D" �( L4 5�� ����$ 45��" � "��v4 �5$ !� �� � "��{4 5 ���� �� � "��J �� "��4 $ 45�" � "��� g gf-sym T g nargs T g methods T g free T g rest? T g gen-syms T g args T g types T g methods $ g free $ g exp $ g free X g types X g specs X g checks X g m-sym e � g var � g var � g filenamef oop/goops/dispatch.scm� ? �� E �� E �� E �� E �� F �� F �� F �� E �� G �� & M �� , O �� - O �� = O �� > P �� M O �� T O �� X W �� ^ [ �� _ \ �� c \ #�� e \ �� e \ �� j ] �� m ^ '�� p ^ �� s ^ �� x a �� � b �� � c �� � d �� � a �� � ] �� � f �� � f (�� � f �� � f �� � g �� � i �� � j �� � k "�� � k )�� � k "�� � k �� � h �� � m �� � m '�� � m �� � m �� � n %�� � n �� � o �� � p �� � q $�� � q +�� � q $�� q �� n �� W �� Y (�� Y �� Z ��$ W ��$ G ��* I ��2 J ��4 K $��D L $��J I ��T G �� G T g nameg emit-linear-dispatch� C5R6 785 hp b ] 4L5�$ KL �( � "���4L > G �� "���L 4L5�6 Z g n k g clauses k g free k g methods [ g clause @ [ g free @ [ g filenamef oop/goops/dispatch.scm� � �� � �� � �� � �� � �� � �� � �� � �� . � �� / � �� C � �� J � �� O � &�� [ � �� ^ � �� e � �� k � �� k g nameg emit-rest� C9(:;<=>BCDEFI h � ]4L 5 L@ � g p g filenamef oop/goops/dispatch.scm� � �� � �� � �� � �� � �� � �� � �� � �� C5 h� � ] �$ /45� 45O 6L �( � "���4 L > G �� "��~ � g n � g clauses � g free � g exp & 9 g vals & 9 g methods > � g clause i � g free i � g filenamef oop/goops/dispatch.scm� � �� � �� � �� � �� � �� � �� � �� & � �� 9 � �� > � �� > � �� F � �� I � �� W � �� X � �� l � �� s � �� x � %�� � � �� � g nameg emit-req� C8J2KL hH � ]R" -( �4�54�5" �( y45O O Q Q 45 �$ " ��$ �� " � 6� �$ � ������"��Y� ������"��;"��3� �$ �4 � �5"����4 � �5"��� � �"��� � g gf C g cache C g ls 3 g nreq 3 g nrest 3 g req � g rest � g ls & � g gf-sym 3 � g emit-rest K � g emit-req K � g t m � g n � � g n � � g filenamef oop/goops/dispatch.scm� t �� v �� w �� y �� y �� y (�� y �� z �� z �� z )�� z �� y �� & � �� , � �� - � �� 1 � �� 3 � �� 3 � �� e � �� l � �� m � �� ~ � �� � �� � � �� � � �� � � �� � � �� � � �� � � "�� � � �� � � �� � � �� � � �� � � �� � � �� � � �� � � $�� � � -�� � � �� � � �� � � �� � � �� � � �� � � �� � � �� � � #�� � � ,�� � � �� � � �� � � �� � � �� � � �� � { �� � { �� � w �� | �� | �� | 1�� | %�� | �� | �� ~ �� ~ ��# ~ +��% ~ ��' ~ ��3 ~ ��3 v �� E C g nameg compute-dispatch-procedure� CMR NRNMOPQRS hP � - 1 3 M�NM �$ .4L 4L 554L > " G @L 6 � g args L g dispatch & D g filenamef oop/goops/dispatch.scm� � �� � �� � �� � �� � �� � �� � �� " � )�� $ � �� & � �� & � �� ) � �� / � �� 6 � �� D � �� L � �� L C h � ] H O C� g gf g timer g filenamef oop/goops/dispatch.scm� � �� � �� g nameg delayed-compile� CTR h8 ] �$ " �$ C4�54L ��5�C g n 6 g f 6 g ls 6 g t g filenamef oop/goops/dispatch.scm� � �� � �� � �� � �� � �� � �� � �� % � �� ' � �� ( � �� - � &�� 2 � /�� 4 � �� 5 � �� 6 g nameg map-until� C h8 � ] �$ #�$ ��&