/
/
lib64
/
guile
/
2.0
/
ccache
/
srfi
Server: server63.web-hosting.com (198.54.116.184)
You: 216.73.216.61
PHP 7.4.33
Dir:
/lib64/guile/2.0/ccache/srfi
Edit:
/lib64/guile/2.0/ccache/srfi/srfi-38.go
GOOF----LE-8-2.0� ] U 4 h� ] g guile� � g define-module*� � � g srfi� g srfi-38� � g filenameS� f srfi/srfi-38.scm� g importsS� g rnrs� g bytevectors� � � g srfi-8� � � g srfi-69� � � g system� g vm� g trap-state� � � � g exportsS� g write-with-shared-structure� g read-with-shared-structure� � g set-current-module� ! � " � #g cond-expand-provide� $g current-module� % � &g current-output-port� 'g vector-length� (g string?� )g string-length� *g bytevector?� +g port?� ,g display� -f (� .f )� /f . � 0g hash-table-ref� 1f � 2f #(� 3g write� 4g number?� 5f #� 6g counter� 7f =� 8g hash-table-set!� 9g hash-table-exists?� :g make-hash-table� ;g eq?� <g current-input-port� =g eqv?� >g peek-char� ?g eof-object?� @g list->string� Ag reverse� Bg read-char� Cg string->number� Dg char-numeric?� Eg hash-table-ref/default� Fg error� Gf Double declaration of part � Hg read� If Use of undeclared part � Jf Malformed shared part specifier� Kg with-fluid*� Lg %read-hash-procedures� Mg for-each� Ng read-hash-extend� O0123456789 � Pg hash-table-size� Qg patch!� Rg procedure?� Sg hole?� Tg fill-hole�C 5 h� � ]4 5 4" > " G 4#i4$i5 %> " G &'()*+ h� \ ] �$ C �$ 4 5 ��" $ C4 5$ 4 5 ��" $ C4 5$ C �$ C4 5$ CCT g obj � g t ! � g t F � g t X � g t s � g filenamef srfi/srfi-38.scm� 9 �� : �� : �� : �� ; �� ; �� ; '�� ; �� ; �� ! : �� - < �� 7 < �� 8 < '�� ? < �� A < �� F : �� R = �� X : �� f > �� j : �� k > �� m ? �� s : �� � g nameg interesting?� C,-./012'345678 h@ ]" _ �$ �4L> " G 4L �> " G " �" >( L64L> " G 4L > " G L6�$ C45$ "���4L> " G 4L �> " G �"��t"��t �"��g �$ �4L> " G 4 54L �> " G " E�$ L64L> " G 4L �> " G �"���"��� L64L 5$ �4 5$ �4 5$ 04L> " G 4 L> " G L645�4L> " G 4 L> " G 4 L> " G 4> " G 4 > " G "���"��� L6� g obj @ g state @ g obj : � g len �] g i V g val y8 g n �4 g filenamef srfi/srfi-38.scm� N �� O �� P �� P �� Q �� Q �� Q �� " R �� ' R �� . R �� : S �� D T �� H Y �� L Y �� M [ �� Q [ �� X [ �� a \ �� x ] �� | ] �� | T �� T �� � T �� � T ,�� � T �� � U �� � U �� � U �� � V �� � V !�� � V �� � W !�� � W �� � S �� � S "�� � S �� � ^ �� � P �� � _ �� � _ �� � _ �� � ` �� � ` �� � a �� � a �� a �� b �� c �� c �� c +��" c "��# d ��' d &��. d ��7 e ��> e (��E e ��P f (��V f ��V b ��e h ��f i ��p i ��q j ��y j ��� k ��� l ��� k ��� m ��� m $��� m ��� n ��� o $��� o ��� q "��� q 8��� q "��� q ��� q ��� r ��� r ��� r ��� s ��� t ��� t ��� t �� u �� u -�� u �� v ��4 w ��8 k ��@ y �� ^ @ g nameg write-obj� C98' h� � ]4L 5�$ C4 5$ 64 > " G �$ "4L �> " G � "��� �$ ?4 5" +�$ C4L �> " G �"��� "���C � g obj � g state � g t � g len w � g i } � g filenamef srfi/srfi-38.scm� ~ �� �� �� �� � �� " �� + � �� , � �� C � �� G � �� H � �� M � �� T � �� _ � �� i � �� l � �� p � �� q � �� w � �� } � �� � � �� � � �� � � �� � � �� � � �� � � �� � � �� � g nameg scan� C:;86 h� L - . , 3 # 45 # O O Q Q 454 > " G 4 > " G 6 D g obj � g outport � g optarg � g interesting? 9 � g write-obj 9 � g scan 9 � g state P � g filenamef srfi/srfi-38.scm� . �� 0 /�� J � �� P � �� S � �� g � �� m � �� s � �� � � �� � g nameg write-with-shared-structure� CR<:=>?@AB hX 7 ]" G4L 545$ " 4 5�$ 4564L 5�"���"��� / g pred U g initial U g chars M g c M g t . g filenamef srfi/srfi-38.scm� � �� � �� � �� � �� � �� � �� $ � '�� + � "�� 2 � �� 5 � �� = � �� > � �� G � �� M � �� M � �� U g nameg read-some-chars� CCDBEFG8h _ ] L �C W g filenamef srfi/srfi-38.scm� � �� � $�� g nameg thunk� CHIJ h� � ]*44L 55454L5=�$ P$ 4> " G " 4LO > " G 4 5�C#�$ $ C 66 � g c � g port � g n � g c � g thunk ( � g cell U � g obj y � g filenamef srfi/srfi-38.scm� � �� � �� � �� � ?�� � �� � �� � �� � �� � �� � �� ( � �� 3 � �� 9 � �� : � �� > � �� E � �� U � �� U � �� X � �� s � �� y � �� � � �� � � �� � � �� � � �� � � �� � � �� � � �� � g nameg read-hash� CKLMN h a ] L 6 Y g digit g filenamef srfi/srfi-38.scm� � �� � �� COHPQ hP � ]4LO > " G 4L5 4L 5�$ 4 > " G " C � g result " J g filenamef srfi/srfi-38.scm� � �� � �� � �� � �� � �� " � �� & � �� - � �� 1 � �� 2 � �� J C hX � - . , 3 # 45 45O O Q Q [ O 6 � g port S g parts-table S g read-some-chars 3 S g read-hash 3 S g filenamef srfi/srfi-38.scm� � �� � 6�� � �� � �� S � �� S g nameg read-with-shared-structure� CRR h n ] 6f g x g filenamef srfi/srfi-38.scm� � �� � �� g nameg hole?� CSRST h � ]4 5$ 4 5 6 C � g x g filenamef srfi/srfi-38.scm� � �� � �� � �� � /�� � $�� g nameg fill-hole� CTRSTQ' h� � ] �$ N4 �5$ 4 �5�" 4 �> " G 4 �5$ 4 �5�C �6 �$ \" J �$ C �45$ 45�" 4> " G �"���4 5�"���C � g x � g i b � g elt q � g filenamef srfi/srfi-38.scm� � �� � �� � �� � �� � �� � �� � �� � $�� � /�� � $�� � �� % � 9�� * � A�� / � 9�� 8 � �� = � �� ? � �� C � �� F � $�� K � /�� M � $�� N � �� U � A�� W � 9�� Z � �� ^ � �� b � �� f � �� j � �� q � �� q � �� t � �� ~ � �� � � �� � � �� � � �� � � $�� � � �� � � �� � � �� � � �� * � g nameg patch!� CQRC � g m , g filenamef srfi/srfi-38.scm� �� - " �� 2 " �� : " &�� ? " �� . ��� � ��A � �� � ��� � �� � C6
Ukuran: 7.9 KB