[EDIT] FILE: mapping.go
GOOF----LE-8-2.0k ] V 4 h� ] g guile� � g define-module*� � � g ice-9� g mapping� � g filenameS� f ice-9/mapping.scm� g importsS� g poe� � � � g exportsS� g mapping-hooks-type� g make-mapping-hooks� g mapping-hooks?� g mapping-hooks-get-handle� g mapping-hooks-create-handle� g mapping-hooks-remove� g mapping-type� g make-mapping� g mapping?� g mapping-hooks� g mapping-data� g set-mapping-hooks!� g set-mapping-data!� g mapping-get-handle� g mapping-create-handle!� g mapping-remove!� !g mapping-ref� "g mapping-set!� #g hash-table-mapping-hooks� $g make-hash-table-mapping� %g hash-table-mapping� & !"#$% � 'g set-current-module� (' � )' � *g issue-deprecation-warning� +f H(ice-9 mapping) is deprecated. Use srfi-69 or rnrs hash tables instead.� ,g make-record-type� -g get-handle� .g create-handle� /g remove� 0-./ � 1g perfect-funcq� 2g record-constructor� 3g record-predicate� 4g record-accessor� 5g hooks� 6g data� 756 � 8g record-modifier� 9g hashq� :g assq� ;g hashq-get-handle� <g hashq-create-handle!� =g hashq-remove!� >g hashv� ?g assv� @g hashv-get-handle� Ag hashv-create-handle!� Bg hashv-remove!� Cg hash� Dg assoc� Eg hash-get-handle� Fg hash-create-handle!� Gg hash-remove!� Hg hashx-get-handle� Ig hashx-create-handle!� Jg hashx-remove!� Kg hash-procS� LK �� Mg assoc-procS� NM �� Og table-constructorS� PO �� QLNP � Rg assq-ref� Sg error� Tf 6Hash-procedure specified with no known assoc function.� Ug make-vector�C 5 h� I ]4 &5 4) > " G 4*i+> " G 4,i05R41i 42ii55R43ii5R44ii-5R44ii.5R44ii/5R4,i75R42ii5R43ii5R44ii55R44ii65R48ii55 R48ii65 R h � ]44 55 6 � g map g key g filenamef ice-9/mapping.scm� 5 �� 6 �� 6 �� 6 �� 6 �� g nameg mapping-get-handle� C R h � ]44 55 6 � g map g key g init g filenamef ice-9/mapping.scm� 7 �� 8 �� 8 �� 8 �� 8 �� g nameg mapping-create-handle!� C R h � ]44 55 6 � g map g key g filenamef ice-9/mapping.scm� 9 �� : �� : �� : �� : �� g nameg mapping-remove!� C R h0 � - . , 3 # 4 5 $ �CC � g map - g key - g dflt - g t - g filenamef ice-9/mapping.scm� < �� > �� = �� - g nameg mapping-ref� C!R h � ]4 5�C � g map g key g val g filenamef ice-9/mapping.scm� A �� B �� B �� g nameg mapping-set!� C"R41i 9:; h y - 1 3 L 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� C< h y - 1 3 L 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� C= h y - 1 3 L 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� C>?@ h y - 1 3 L 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� CA h y - 1 3 L 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� CB h y - 1 3 L 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� CCDE h y - 1 3 L 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� CF h y - 1 3 L 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� CG h y - 1 3 L 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� CH h q ]LL 6 i g table g key g filenamef ice-9/mapping.scm� [ .�� \ 0�� C h y - 1 3 L LO 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� CI h � ]LL 6{ g table g key g init g filenamef ice-9/mapping.scm� ^ .�� _ 0�� C h y - 1 3 L LO 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� CJ h q ]LL 6 i g table g key g filenamef ice-9/mapping.scm� a .�� b 0�� C h y - 1 3 L LO 4 5@ q g 1st g rest g filenamef ice-9/mapping.scm� G �� G >�� G 2�� C h� � ] �$ . O O O 6 �$ . O O O 6 �$ . O O O 6 O O O 6 � g hash-proc � g assoc-proc � g procs � g proc ) g proc + 7 g proc 9 E g proc Y e g proc g s g proc u � g proc � � g proc � � g proc � � g filenamef ice-9/mapping.scm� J �� K "�� K �� M '�� M �� L �� N -�� + O -�� 9 P -�� G N �� P Q '�� Q Q �� U L �� Y R -�� g S -�� u T -�� � R �� � U '�� � U �� � L �� � V -�� � W -�� � X -�� � V �� � Z �� � C5#R# h � ]45 6 � g table g hash-proc g assoc-proc g filenamef ice-9/mapping.scm� d �� e �� e �� g nameg make-hash-table-mapping� C$RQCR9:>?DS%TU h f ] 6 ^ g len g filenamef ice-9/mapping.scm� r �� r =�� r ,�� C$ h� b - / 0 3 # G # # 74��� 5 $ " 4 5 # 4 56 Z g size } g hash-proc } g assoc-proc } g table-constructor } g t F b g filenamef ice-9/mapping.scm� g �� . j "�� 5 j ,�� F j "�� F j �� U n "�� Y n )�� [ o )�� _ n "�� q s �� } s �� } g hash-procS �g assoc-procS �g table-constructorS � g nameg hash-table-mapping� C%RC A g m , g filenamef ice-9/mapping.scm� �� - �� 3 �� 8 �� A " �� G " -�� I " <�� K " �� N " �� O ' �� V ' -�� b ' �� e ' �� f ( �� s ( �� t ) !�� ~ ) E�� � ) !�� � ) �� � * $�� � * H�� � * $�� � * �� � + �� � + A�� � + �� � + �� � - �� � - '�� � - 0�� � - �� � - �� � . �� � . �� � / �� � / �� � 0 �� � 0 4�� � 0 �� � 0 �� � 1 �� � 1 3�� � 1 �� � 1 �� � 2 �� � 2 9�� � 2 �� � 2 �� � 3 �� 3 8�� 3 �� 3 �� � 5 �� � 7 �� � 9 �� � < �� c A �� d I �� " F �� d �� � g �� > � C6
SAVE
CANCEL