mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-19 21:59:17 +02:00
moving (chibi strings) to (chibi string) in conjunction with R7RS vote to prefer singular form of module names
This commit is contained in:
parent
b40370be52
commit
4554b1f860
9 changed files with 9 additions and 9 deletions
|
@ -16,7 +16,7 @@
|
||||||
signal/tty-output wait/no-hang
|
signal/tty-output wait/no-hang
|
||||||
call-with-process-io
|
call-with-process-io
|
||||||
process->string process->string-list process->output+error)
|
process->string process->string-list process->output+error)
|
||||||
(import (scheme) (chibi io) (chibi strings) (chibi filesystem))
|
(import (scheme) (chibi io) (chibi string) (chibi filesystem))
|
||||||
(cond-expand (threads (import (srfi 18))) (else #f))
|
(cond-expand (threads (import (srfi 18))) (else #f))
|
||||||
(include-shared "process")
|
(include-shared "process")
|
||||||
(include "process.scm"))
|
(include "process.scm"))
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
(define-library (chibi repl)
|
(define-library (chibi repl)
|
||||||
(export repl)
|
(export repl)
|
||||||
(import (scheme) (only (meta) load-module)
|
(import (scheme) (only (meta) load-module)
|
||||||
(chibi ast) (chibi strings) (chibi io)
|
(chibi ast) (chibi string) (chibi io)
|
||||||
(chibi process) (chibi term edit-line)
|
(chibi process) (chibi term edit-line)
|
||||||
(srfi 1) (srfi 18) (srfi 38) (srfi 95) (srfi 98))
|
(srfi 1) (srfi 18) (srfi 38) (srfi 95) (srfi 98))
|
||||||
(include "repl.scm"))
|
(include "repl.scm"))
|
||||||
|
|
|
@ -1,5 +1,5 @@
|
||||||
|
|
||||||
(define-library (chibi strings)
|
(define-library (chibi string)
|
||||||
(export
|
(export
|
||||||
string-cursor-start string-cursor-end string-cursor-ref
|
string-cursor-start string-cursor-end string-cursor-ref
|
||||||
string-cursor<? string-cursor<=? string-cursor>? string-cursor>=?
|
string-cursor<? string-cursor<=? string-cursor>? string-cursor>=?
|
||||||
|
@ -12,4 +12,4 @@
|
||||||
string-fold string-fold-right string-map string-for-each
|
string-fold string-fold-right string-map string-for-each
|
||||||
string-contains make-string-searcher)
|
string-contains make-string-searcher)
|
||||||
(import (scheme) (chibi ast) (chibi char-set base))
|
(import (scheme) (chibi ast) (chibi char-set base))
|
||||||
(include "strings.scm"))
|
(include "string.scm"))
|
|
@ -2,7 +2,7 @@
|
||||||
(define-library (scheme base)
|
(define-library (scheme base)
|
||||||
(import (except (scheme) equal?)
|
(import (except (scheme) equal?)
|
||||||
(rename (chibi equiv) (equiv? equal?))
|
(rename (chibi equiv) (equiv? equal?))
|
||||||
(only (chibi strings) string-map string-for-each)
|
(only (chibi string) string-map string-for-each)
|
||||||
(chibi io)
|
(chibi io)
|
||||||
(rename (only (chibi ast)
|
(rename (only (chibi ast)
|
||||||
exception? exception-message exception-irritants)
|
exception? exception-message exception-irritants)
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
|
|
||||||
(cond-expand
|
(cond-expand
|
||||||
(modules (import (only (chibi test) test-begin test test-end)
|
(modules (import (only (chibi test) test-begin test test-end)
|
||||||
(chibi strings)))
|
(chibi string)))
|
||||||
(else #f))
|
(else #f))
|
||||||
|
|
||||||
(test-begin "strings")
|
(test-begin "strings")
|
||||||
|
|
|
@ -15,7 +15,7 @@
|
||||||
;; "char-downcase-offsets"
|
;; "char-downcase-offsets"
|
||||||
;; -o <output-file> - the output file, defaults to stdout
|
;; -o <output-file> - the output file, defaults to stdout
|
||||||
|
|
||||||
(import (scheme) (srfi 1) (srfi 69) (srfi 95) (chibi io) (chibi strings)
|
(import (scheme) (srfi 1) (srfi 69) (srfi 95) (chibi io) (chibi string)
|
||||||
(chibi iset) (chibi iset optimize))
|
(chibi iset) (chibi iset optimize))
|
||||||
|
|
||||||
(define (warn . args)
|
(define (warn . args)
|
||||||
|
|
|
@ -28,7 +28,7 @@
|
||||||
;; in the data/ current directory, unless overridden with the --data or
|
;; in the data/ current directory, unless overridden with the --data or
|
||||||
;; --derived options.
|
;; --derived options.
|
||||||
|
|
||||||
(import (scheme) (chibi io) (chibi strings))
|
(import (scheme) (chibi io) (chibi string))
|
||||||
|
|
||||||
(define (warn . args)
|
(define (warn . args)
|
||||||
(let ((err (current-error-port)))
|
(let ((err (current-error-port)))
|
||||||
|
|
|
@ -9,7 +9,7 @@
|
||||||
;; char-sets to stdout.
|
;; char-sets to stdout.
|
||||||
|
|
||||||
(import (scheme) (srfi 1) (srfi 69)
|
(import (scheme) (srfi 1) (srfi 69)
|
||||||
(chibi io) (chibi strings) (chibi modules)
|
(chibi io) (chibi string) (chibi modules)
|
||||||
(chibi char-set) (chibi iset) (chibi iset optimize)
|
(chibi char-set) (chibi iset) (chibi iset optimize)
|
||||||
(only (meta) load-module))
|
(only (meta) load-module))
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue