mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-18 21:29:19 +02:00
54 lines
1.8 KiB
Scheme
54 lines
1.8 KiB
Scheme
|
|
(define-library (scheme rlist)
|
|
(import (srfi 101))
|
|
(export (rename quote rquote)
|
|
(rename pair? rpair?)
|
|
(rename cons rcons)
|
|
(rename car rcar)
|
|
(rename cdr rcdr)
|
|
(rename caar rcaar)
|
|
(rename cadr rcadr)
|
|
(rename cddr rcddr)
|
|
(rename cdar rcdar)
|
|
(rename caaar rcaaar)
|
|
(rename caadr rcaadr)
|
|
(rename caddr rcaddr)
|
|
(rename cadar rcadar)
|
|
(rename cdaar rcdaar)
|
|
(rename cdadr rcdadr)
|
|
(rename cdddr rcdddr)
|
|
(rename cddar rcddar)
|
|
(rename caaaar rcaaaar)
|
|
(rename caaadr rcaaadr)
|
|
(rename caaddr rcaaddr)
|
|
(rename caadar rcaadar)
|
|
(rename cadaar rcadaar)
|
|
(rename cadadr rcadadr)
|
|
(rename cadddr rcadddr)
|
|
(rename caddar rcaddar)
|
|
(rename cdaaar rcdaaar)
|
|
(rename cdaadr rcdaadr)
|
|
(rename cdaddr rcdaddr)
|
|
(rename cdadar rcdadar)
|
|
(rename cddaar rcddaar)
|
|
(rename cddadr rcddadr)
|
|
(rename cddddr rcddddr)
|
|
(rename cdddar rcdddar)
|
|
(rename null? rnull?)
|
|
(rename list? rlist?)
|
|
(rename list rlist)
|
|
(rename make-list make-rlist)
|
|
(rename length rlength)
|
|
(rename length<=? rlength<=?)
|
|
(rename append rappend)
|
|
(rename reverse rreverse)
|
|
(rename list-tail rlist-tail)
|
|
(rename list-ref rlist-ref)
|
|
(rename list-set rlist-set)
|
|
(rename list-ref/update rlist-ref/update)
|
|
(rename map rmap)
|
|
(rename for-each rfor-each)
|
|
(rename random-access-list->linear-access-list
|
|
rlist->list)
|
|
(rename linear-access-list->random-access-list
|
|
list->rlist)))
|