adding tangerine names for srfi 160 libs

This commit is contained in:
Alex Shinn 2020-05-26 17:18:50 +09:00
parent 1ee773fa42
commit 0957b54f51
13 changed files with 765 additions and 0 deletions

View file

@ -0,0 +1,56 @@
(define-library (scheme vector base)
(import (srfi 160 base))
(export
;;
make-u1vector u1vector u1? u1vector?
u1vector-ref u1vector-set! u1vector-length
u1vector->list list->u1vector
;;
make-u8vector u8vector u8? u8vector?
u8vector-ref u8vector-set! u8vector-length
u8vector->list list->u8vector
;;
make-s8vector s8vector s8? s8vector?
s8vector-ref s8vector-set! s8vector-length
s8vector->list list->s8vector
;;
make-u16vector u16vector u16? u16vector?
u16vector-ref u16vector-set! u16vector-length
u16vector->list list->u16vector
;;
make-s16vector s16vector s16? s16vector?
s16vector-ref s16vector-set! s16vector-length
s16vector->list list->s16vector
;;
make-u32vector u32vector u32? u32vector?
u32vector-ref u32vector-set! u32vector-length
u32vector->list list->u32vector
;;
make-s32vector s32vector s32? s32vector?
s32vector-ref s32vector-set! s32vector-length
s32vector->list list->s32vector
;;
make-u64vector u64vector u64? u64vector?
u64vector-ref u64vector-set! u64vector-length
u64vector->list list->u64vector
;;
make-s64vector s64vector s64? s64vector?
s64vector-ref s64vector-set! s64vector-length
s64vector->list list->s64vector
;;
make-f32vector f32vector f32? f32vector?
f32vector-ref f32vector-set! f32vector-length
f32vector->list list->f32vector
;;
make-f64vector f64vector f64? f64vector?
f64vector-ref f64vector-set! f64vector-length
f64vector->list list->f64vector
;;
make-c64vector c64vector c64? c64vector?
c64vector-ref c64vector-set! c64vector-length
c64vector->list list->c64vector
;;
make-c128vector c128vector c128? c128vector?
c128vector-ref c128vector-set! c128vector-length
c128vector->list list->c128vector))

View file

@ -0,0 +1,59 @@
(define-library (scheme vector c128)
(import (srfi 160 c128))
(export
make-c128vector
c128?
c128vector?
c128vector-ref
c128vector-set!
c128vector-length
c128vector
c128vector-unfold
c128vector-unfold-right
c128vector-copy
c128vector-reverse-copy
c128vector-append
c128vector-concatenate
c128vector-append-subvectors
c128vector-empty?
c128vector=
c128vector-take
c128vector-take-right
c128vector-drop
c128vector-drop-right
c128vector-segment
c128vector-fold
c128vector-fold-right
c128vector-map
c128vector-map!
c128vector-for-each
c128vector-count
c128vector-cumulate
c128vector-take-while
c128vector-take-while-right
c128vector-drop-while
c128vector-drop-while-right
c128vector-index
c128vector-index-right
c128vector-skip
c128vector-skip-right
c128vector-binary-search
c128vector-any
c128vector-every
c128vector-partition
c128vector-filter
c128vector-remove
c128vector-swap!
c128vector-fill!
c128vector-reverse!
c128vector-copy!
c128vector-reverse-copy!
c128vector->list
reverse-c128vector->list
list->c128vector
reverse-list->c128vector
c128vector->vector
vector->c128vector
make-c128vector-generator
write-c128vector))

59
lib/scheme/vector/c64.sld Normal file
View file

@ -0,0 +1,59 @@
(define-library (scheme vector c64)
(import (srfi 160 c64))
(export
make-c64vector
c64?
c64vector?
c64vector-ref
c64vector-set!
c64vector-length
c64vector
c64vector-unfold
c64vector-unfold-right
c64vector-copy
c64vector-reverse-copy
c64vector-append
c64vector-concatenate
c64vector-append-subvectors
c64vector-empty?
c64vector=
c64vector-take
c64vector-take-right
c64vector-drop
c64vector-drop-right
c64vector-segment
c64vector-fold
c64vector-fold-right
c64vector-map
c64vector-map!
c64vector-for-each
c64vector-count
c64vector-cumulate
c64vector-take-while
c64vector-take-while-right
c64vector-drop-while
c64vector-drop-while-right
c64vector-index
c64vector-index-right
c64vector-skip
c64vector-skip-right
c64vector-binary-search
c64vector-any
c64vector-every
c64vector-partition
c64vector-filter
c64vector-remove
c64vector-swap!
c64vector-fill!
c64vector-reverse!
c64vector-copy!
c64vector-reverse-copy!
c64vector->list
reverse-c64vector->list
list->c64vector
reverse-list->c64vector
c64vector->vector
vector->c64vector
make-c64vector-generator
write-c64vector))

59
lib/scheme/vector/f32.sld Normal file
View file

@ -0,0 +1,59 @@
(define-library (scheme vector f32)
(import (srfi 160 f32))
(export
make-f32vector
f32?
f32vector?
f32vector-ref
f32vector-set!
f32vector-length
f32vector
f32vector-unfold
f32vector-unfold-right
f32vector-copy
f32vector-reverse-copy
f32vector-append
f32vector-concatenate
f32vector-append-subvectors
f32vector-empty?
f32vector=
f32vector-take
f32vector-take-right
f32vector-drop
f32vector-drop-right
f32vector-segment
f32vector-fold
f32vector-fold-right
f32vector-map
f32vector-map!
f32vector-for-each
f32vector-count
f32vector-cumulate
f32vector-take-while
f32vector-take-while-right
f32vector-drop-while
f32vector-drop-while-right
f32vector-index
f32vector-index-right
f32vector-skip
f32vector-skip-right
f32vector-binary-search
f32vector-any
f32vector-every
f32vector-partition
f32vector-filter
f32vector-remove
f32vector-swap!
f32vector-fill!
f32vector-reverse!
f32vector-copy!
f32vector-reverse-copy!
f32vector->list
reverse-f32vector->list
list->f32vector
reverse-list->f32vector
f32vector->vector
vector->f32vector
make-f32vector-generator
write-f32vector))

59
lib/scheme/vector/f64.sld Normal file
View file

@ -0,0 +1,59 @@
(define-library (scheme vector f64)
(import (srfi 160 f64))
(export
make-f64vector
f64?
f64vector?
f64vector-ref
f64vector-set!
f64vector-length
f64vector
f64vector-unfold
f64vector-unfold-right
f64vector-copy
f64vector-reverse-copy
f64vector-append
f64vector-concatenate
f64vector-append-subvectors
f64vector-empty?
f64vector=
f64vector-take
f64vector-take-right
f64vector-drop
f64vector-drop-right
f64vector-segment
f64vector-fold
f64vector-fold-right
f64vector-map
f64vector-map!
f64vector-for-each
f64vector-count
f64vector-cumulate
f64vector-take-while
f64vector-take-while-right
f64vector-drop-while
f64vector-drop-while-right
f64vector-index
f64vector-index-right
f64vector-skip
f64vector-skip-right
f64vector-binary-search
f64vector-any
f64vector-every
f64vector-partition
f64vector-filter
f64vector-remove
f64vector-swap!
f64vector-fill!
f64vector-reverse!
f64vector-copy!
f64vector-reverse-copy!
f64vector->list
reverse-f64vector->list
list->f64vector
reverse-list->f64vector
f64vector->vector
vector->f64vector
make-f64vector-generator
write-f64vector))

60
lib/scheme/vector/s16.sld Normal file
View file

@ -0,0 +1,60 @@
(define-library (scheme vector s16)
(import (srfi 160 s16))
(export
make-s16vector
s16?
s16vector?
s16vector-ref
s16vector-set!
s16vector-length
s16vector
s16vector-unfold
s16vector-unfold-right
s16vector-copy
s16vector-reverse-copy
s16vector-append
s16vector-concatenate
s16vector-append-subvectors
s16vector-empty?
s16vector=
s16vector-take
s16vector-take-right
s16vector-drop
s16vector-drop-right
s16vector-segment
s16vector-fold
s16vector-fold-right
s16vector-map
s16vector-map!
s16vector-for-each
s16vector-count
s16vector-cumulate
s16vector-take-while
s16vector-take-while-right
s16vector-drop-while
s16vector-drop-while-right
s16vector-index
s16vector-index-right
s16vector-skip
s16vector-skip-right
s16vector-binary-search
s16vector-any
s16vector-every
s16vector-partition
s16vector-filter
s16vector-remove
s16vector-swap!
s16vector-fill!
s16vector-reverse!
s16vector-copy!
s16vector-reverse-copy!
s16vector->list
reverse-s16vector->list
list->s16vector
reverse-list->s16vector
s16vector->vector
vector->s16vector
make-s16vector-generator
write-s16vector))

59
lib/scheme/vector/s32.sld Normal file
View file

@ -0,0 +1,59 @@
(define-library (scheme vector s32)
(import (srfi 160 s32))
(export
make-s32vector
s32?
s32vector?
s32vector-ref
s32vector-set!
s32vector-length
s32vector
s32vector-unfold
s32vector-unfold-right
s32vector-copy
s32vector-reverse-copy
s32vector-append
s32vector-concatenate
s32vector-append-subvectors
s32vector-empty?
s32vector=
s32vector-take
s32vector-take-right
s32vector-drop
s32vector-drop-right
s32vector-segment
s32vector-fold
s32vector-fold-right
s32vector-map
s32vector-map!
s32vector-for-each
s32vector-count
s32vector-cumulate
s32vector-take-while
s32vector-take-while-right
s32vector-drop-while
s32vector-drop-while-right
s32vector-index
s32vector-index-right
s32vector-skip
s32vector-skip-right
s32vector-binary-search
s32vector-any
s32vector-every
s32vector-partition
s32vector-filter
s32vector-remove
s32vector-swap!
s32vector-fill!
s32vector-reverse!
s32vector-copy!
s32vector-reverse-copy!
s32vector->list
reverse-s32vector->list
list->s32vector
reverse-list->s32vector
s32vector->vector
vector->s32vector
make-s32vector-generator
write-s32vector))

59
lib/scheme/vector/s64.sld Normal file
View file

@ -0,0 +1,59 @@
(define-library (scheme vector s64)
(import (srfi 160 s64))
(export
make-s64vector
s64?
s64vector?
s64vector-ref
s64vector-set!
s64vector-length
s64vector
s64vector-unfold
s64vector-unfold-right
s64vector-copy
s64vector-reverse-copy
s64vector-append
s64vector-concatenate
s64vector-append-subvectors
s64vector-empty?
s64vector=
s64vector-take
s64vector-take-right
s64vector-drop
s64vector-drop-right
s64vector-segment
s64vector-fold
s64vector-fold-right
s64vector-map
s64vector-map!
s64vector-for-each
s64vector-count
s64vector-cumulate
s64vector-take-while
s64vector-take-while-right
s64vector-drop-while
s64vector-drop-while-right
s64vector-index
s64vector-index-right
s64vector-skip
s64vector-skip-right
s64vector-binary-search
s64vector-any
s64vector-every
s64vector-partition
s64vector-filter
s64vector-remove
s64vector-swap!
s64vector-fill!
s64vector-reverse!
s64vector-copy!
s64vector-reverse-copy!
s64vector->list
reverse-s64vector->list
list->s64vector
reverse-list->s64vector
s64vector->vector
vector->s64vector
make-s64vector-generator
write-s64vector))

59
lib/scheme/vector/s8.sld Normal file
View file

@ -0,0 +1,59 @@
(define-library (scheme vector s8)
(import (srfi 160 s8))
(export
make-s8vector
s8?
s8vector?
s8vector-ref
s8vector-set!
s8vector-length
s8vector
s8vector-unfold
s8vector-unfold-right
s8vector-copy
s8vector-reverse-copy
s8vector-append
s8vector-concatenate
s8vector-append-subvectors
s8vector-empty?
s8vector=
s8vector-take
s8vector-take-right
s8vector-drop
s8vector-drop-right
s8vector-segment
s8vector-fold
s8vector-fold-right
s8vector-map
s8vector-map!
s8vector-for-each
s8vector-count
s8vector-cumulate
s8vector-take-while
s8vector-take-while-right
s8vector-drop-while
s8vector-drop-while-right
s8vector-index
s8vector-index-right
s8vector-skip
s8vector-skip-right
s8vector-binary-search
s8vector-any
s8vector-every
s8vector-partition
s8vector-filter
s8vector-remove
s8vector-swap!
s8vector-fill!
s8vector-reverse!
s8vector-copy!
s8vector-reverse-copy!
s8vector->list
reverse-s8vector->list
list->s8vector
reverse-list->s8vector
s8vector->vector
vector->s8vector
make-s8vector-generator
write-s8vector))

59
lib/scheme/vector/u16.sld Normal file
View file

@ -0,0 +1,59 @@
(define-library (scheme vector u16)
(import (srfi 160 u16))
(export
make-u16vector
u16?
u16vector?
u16vector-ref
u16vector-set!
u16vector-length
u16vector
u16vector-unfold
u16vector-unfold-right
u16vector-copy
u16vector-reverse-copy
u16vector-append
u16vector-concatenate
u16vector-append-subvectors
u16vector-empty?
u16vector=
u16vector-take
u16vector-take-right
u16vector-drop
u16vector-drop-right
u16vector-segment
u16vector-fold
u16vector-fold-right
u16vector-map
u16vector-map!
u16vector-for-each
u16vector-count
u16vector-cumulate
u16vector-take-while
u16vector-take-while-right
u16vector-drop-while
u16vector-drop-while-right
u16vector-index
u16vector-index-right
u16vector-skip
u16vector-skip-right
u16vector-binary-search
u16vector-any
u16vector-every
u16vector-partition
u16vector-filter
u16vector-remove
u16vector-swap!
u16vector-fill!
u16vector-reverse!
u16vector-copy!
u16vector-reverse-copy!
u16vector->list
reverse-u16vector->list
list->u16vector
reverse-list->u16vector
u16vector->vector
vector->u16vector
make-u16vector-generator
write-u16vector))

59
lib/scheme/vector/u32.sld Normal file
View file

@ -0,0 +1,59 @@
(define-library (scheme vector u32)
(import (srfi 160 u32))
(export
make-u32vector
u32?
u32vector?
u32vector-ref
u32vector-set!
u32vector-length
u32vector
u32vector-unfold
u32vector-unfold-right
u32vector-copy
u32vector-reverse-copy
u32vector-append
u32vector-concatenate
u32vector-append-subvectors
u32vector-empty?
u32vector=
u32vector-take
u32vector-take-right
u32vector-drop
u32vector-drop-right
u32vector-segment
u32vector-fold
u32vector-fold-right
u32vector-map
u32vector-map!
u32vector-for-each
u32vector-count
u32vector-cumulate
u32vector-take-while
u32vector-take-while-right
u32vector-drop-while
u32vector-drop-while-right
u32vector-index
u32vector-index-right
u32vector-skip
u32vector-skip-right
u32vector-binary-search
u32vector-any
u32vector-every
u32vector-partition
u32vector-filter
u32vector-remove
u32vector-swap!
u32vector-fill!
u32vector-reverse!
u32vector-copy!
u32vector-reverse-copy!
u32vector->list
reverse-u32vector->list
list->u32vector
reverse-list->u32vector
u32vector->vector
vector->u32vector
make-u32vector-generator
write-u32vector))

59
lib/scheme/vector/u64.sld Normal file
View file

@ -0,0 +1,59 @@
(define-library (scheme vector u64)
(import (srfi 160 u64))
(export
make-u64vector
u64?
u64vector?
u64vector-ref
u64vector-set!
u64vector-length
u64vector
u64vector-unfold
u64vector-unfold-right
u64vector-copy
u64vector-reverse-copy
u64vector-append
u64vector-concatenate
u64vector-append-subvectors
u64vector-empty?
u64vector=
u64vector-take
u64vector-take-right
u64vector-drop
u64vector-drop-right
u64vector-segment
u64vector-fold
u64vector-fold-right
u64vector-map
u64vector-map!
u64vector-for-each
u64vector-count
u64vector-cumulate
u64vector-take-while
u64vector-take-while-right
u64vector-drop-while
u64vector-drop-while-right
u64vector-index
u64vector-index-right
u64vector-skip
u64vector-skip-right
u64vector-binary-search
u64vector-any
u64vector-every
u64vector-partition
u64vector-filter
u64vector-remove
u64vector-swap!
u64vector-fill!
u64vector-reverse!
u64vector-copy!
u64vector-reverse-copy!
u64vector->list
reverse-u64vector->list
list->u64vector
reverse-list->u64vector
u64vector->vector
vector->u64vector
make-u64vector-generator
write-u64vector))

59
lib/scheme/vector/u8.sld Normal file
View file

@ -0,0 +1,59 @@
(define-library (scheme vector u8)
(import (srfi 160 u8))
(export
make-u8vector
u8?
u8vector?
u8vector-ref
u8vector-set!
u8vector-length
u8vector
u8vector-unfold
u8vector-unfold-right
u8vector-copy
u8vector-reverse-copy
u8vector-append
u8vector-concatenate
u8vector-append-subvectors
u8vector-empty?
u8vector=
u8vector-take
u8vector-take-right
u8vector-drop
u8vector-drop-right
u8vector-segment
u8vector-fold
u8vector-fold-right
u8vector-map
u8vector-map!
u8vector-for-each
u8vector-count
u8vector-cumulate
u8vector-take-while
u8vector-take-while-right
u8vector-drop-while
u8vector-drop-while-right
u8vector-index
u8vector-index-right
u8vector-skip
u8vector-skip-right
u8vector-binary-search
u8vector-any
u8vector-every
u8vector-partition
u8vector-filter
u8vector-remove
u8vector-swap!
u8vector-fill!
u8vector-reverse!
u8vector-copy!
u8vector-reverse-copy!
u8vector->list
reverse-u8vector->list
list->u8vector
reverse-list->u8vector
u8vector->vector
vector->u8vector
make-u8vector-generator
write-u8vector))