[EDIT] FILE: safe-r5rs.go
GOOF----LE-8-2.0� ] � 4 hS ] g guile� � g define-module*� � � g ice-9� g safe-r5rs� � g filenameS� f ice-9/safe-r5rs.scm� g exportsS� g null-environment� � g re-exportsS� g eqv?� g eq?� g equal?� g number?� g complex?� g real?� g rational?� g integer?� g exact?� g inexact?� g =� g <� g >� g <=� g >=� g zero?� g positive?� g negative?� !g odd?� "g even?� #g max� $g min� %g +� &g *� 'g -� (g /� )g abs� *g quotient� +g remainder� ,g modulo� -g gcd� .g lcm� /g numerator� 0g denominator� 1g rationalize� 2g floor� 3g ceiling� 4g truncate� 5g round� 6g exp� 7g log� 8g sin� 9g cos� :g tan� ;g asin� <g acos� =g atan� >g sqrt� ?g expt� @g make-rectangular� Ag make-polar� Bg real-part� Cg imag-part� Dg magnitude� Eg angle� Fg exact->inexact� Gg inexact->exact� Hg number->string� Ig string->number� Jg boolean?� Kg not� Lg pair?� Mg cons� Ng car� Og cdr� Pg set-car!� Qg set-cdr!� Rg caar� Sg cadr� Tg cdar� Ug cddr� Vg caaar� Wg caadr� Xg cadar� Yg caddr� Zg cdaar� [g cdadr� \g cddar� ]g cdddr� ^g caaaar� _g caaadr� `g caadar� ag caaddr� bg cadaar� cg cadadr� dg caddar� eg cadddr� fg cdaaar� gg cdaadr� hg cdadar� ig cdaddr� jg cddaar� kg cddadr� lg cdddar� mg cddddr� ng null?� og list?� pg list� qg length� rg append� sg reverse� tg list-tail� ug list-ref� vg memq� wg memv� xg member� yg assq� zg assv� {g assoc� |g symbol?� }g symbol->string� ~g string->symbol� g char?� �g char=?� �g char<?� �g char>?� �g char<=?� �g char>=?� �g char-ci=?� �g char-ci<?� �g char-ci>?� �g char-ci<=?� �g char-ci>=?� �g char-alphabetic?� �g char-numeric?� �g char-whitespace?� �g char-upper-case?� �g char-lower-case?� �g char->integer� �g integer->char� �g char-upcase� �g char-downcase� �g string?� �g make-string� �g string� �g string-length� �g string-ref� �g string-set!� �g string=?� �g string-ci=?� �g string<?� �g string>?� �g string<=?� �g string>=?� �g string-ci<?� �g string-ci>?� �g string-ci<=?� �g string-ci>=?� �g substring� �g string-append� �g string->list� �g list->string� �g string-copy� �g string-fill!� �g vector?� �g make-vector� �g vector� �g vector-length� �g vector-ref� �g vector-set!� �g vector->list� �g list->vector� �g vector-fill!� �g procedure?� �g apply� �g map� �g for-each� �g force� �g call-with-current-continuation� �g values� �g call-with-values� �g dynamic-wind� �g eval� �g input-port?� �g output-port?� �g current-input-port� �g current-output-port� �g read� �g read-char� �g peek-char� �g eof-object?� �g char-ready?� �g write� �g display� �g newline� �g write-char� � !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~�������������������������������������������������������������������������� �� �g set-current-module� �� � �� � �g resolve-interface� �g null� �� � �g null-interface� �g module-use!� �g module-public-interface� �g current-module� �g scm-error� �g misc-error� �f ~A is not a valid version� �g make-module� �g set-module-kind!� �g interface�C 5h� � ]4 �5 4� > " G 4�i�5�R4�i4�i4�i5 5�i> " G �� ������ h` ] �$ " 4 > " G 4 5 4> " G 4 > " G C g n _ g interface 2 _ g filenamef ice-9/safe-r5rs.scm� � �� � �� � �� � �� � �� � �� � �� � �� � �� # � �� , � �� 2 � �� 5 � �� ; � �� @ � �� I � �� _ g nameg null-environment� C RC � g m , g filenamef ice-9/safe-r5rs.scm� �� - � �� 3 � *�� 5 � �� 8 � �� 9 � �� > � �� C � &�� K � �� T � �� � � �� � C6
SAVE
CANCEL