/usr/share/gauche-0.9/0.9.5/lib/srfi-128.scm is in gauche 0.9.5-1build1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 | ;;;
;;; SRFI-128 Comparators
;;;
;; All of SRFI-128 features are built-in. This module is just
;; for the namespace.
(define-module srfi-128
(export comparator? comparator-ordered? comparator-hashable?
make-comparator make-pair-comparator
make-list-comparator make-vector-comparator
make-eq-comparator make-eqv-comparator make-equal-comparator
boolean-hash char-hash char-ci-hash string-hash
string-ci-hash symbol-hash number-hash
hash-bound hash-salt
make-default-comparator default-hash
comparator-register-default!
comparator-type-test-predicate comparator-equality-predicate
comparator-ordering-predicate comparator-hash-function
comparator-test-type comparator-check-type comparator-hash
=? <? >? <=? >=?
comparator-if<=>))
|