/usr/share/gauche-0.9/0.9.1/lib/util/sparse.scm is in gauche 0.9.1-5.
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 | ;; generated automatically. DO NOT EDIT
#!no-fold-case
(define-module util.sparse (use gauche.dictionary) (export <sparse-table> make-sparse-table sparse-table-num-entries sparse-table-ref sparse-table-set! sparse-table-exists? sparse-table-clear! sparse-table-delete! sparse-table-copy sparse-table-update! sparse-table-push! sparse-table-pop! sparse-table-fold sparse-table-map sparse-table-for-each sparse-table-keys sparse-table-values %sparse-table-dump %sparse-table-check <sparse-vector-base> <sparse-vector> <sparse-s8vector> <sparse-u8vector> <sparse-s16vector> <sparse-u16vector> <sparse-s32vector> <sparse-u32vector> <sparse-s64vector> <sparse-u64vector> <sparse-f16vector> <sparse-f32vector> <sparse-f64vector> sparse-vector-max-index-bits make-sparse-vector sparse-vector-num-entries sparse-vector-ref sparse-vector-set! sparse-vector-exists? sparse-vector-clear! sparse-vector-delete! sparse-vector-copy sparse-vector-update! sparse-vector-inc! sparse-vector-push! sparse-vector-pop! sparse-vector-fold sparse-vector-map sparse-vector-for-each sparse-vector-keys sparse-vector-values %sparse-vector-dump))
(select-module util.sparse)
(dynamic-load "util--sparse")
|