GOOF----LE-8-2.08 ] : 4 h+ ] g guile� � g define-module*� � � g srfi� g srfi-60� � g filenameS�
f srfi/srfi-60.scm� g exportsS� g bitwise-and�
g bitwise-ior� g bitwise-xor� g bitwise-not� g
any-bits-set?� g
bitwise-if� g
bitwise-merge� g log2-binary-factors� g
first-set-bit� g bit-set?� g copy-bit� g bit-field� g copy-bit-field� g arithmetic-shift� g rotate-bit-field� g reverse-bit-field� g
integer->list� g
list->integer� g booleans->integer�
� g
re-exportsS� !g logand� "g logior� #g logxor� $g integer-length� %g logtest� &g logcount� 'g logbit?� (g ash� )!"#$%&'( � *g replacementsS� +g bit-count� ,+ � -g set-current-module� .- � /- � 0g load-extension� 1g
string-append� 2f libguile-� 3g effective-version� 4f scm_init_srfi_60� 5g lognot� 6g bit-extract� 7g cond-expand-provide� 8g current-module� 9 �C 5h� ]4
)*,5 4/ > " G 40i41i243i5 54> " G !i R"i
R#iR5iR%iR&i+R5 h � ] �4 5��C � g mask
g n0 g n1 g filenamef srfi/srfi-60.scm�
8
�� 9
�� : �� :
�� 9 �� g nameg
bitwise-if� CRiRiR'iR6iR6 h( � ] 4 54
�5���C � g n
" g newbits " g start " g end " g filenamef srfi/srfi-60.scm�
A
�� B �� C �� C 0�� C �� B �� B �� ! B �� " g nameg copy-bit-field� CR(iR7i48i5 96 � g m
0 g filenamef srfi/srfi-60.scm�
�� 1 .
�� 6 . �� < . �� = . +�� E . �� G / �� L .
�� [ 1
�� b 2
�� i 3
�� p 4
�� w 5
�� ~ 6
�� W 8
�� ^ ;
�� e =
�� l >
�� s ?
�� � A
�� � F
�� � H �� � H &�� � H
�� �
C6