scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Replace all instances of STRING-LIB by SRFI-13.

This commit is contained in:
sperber 2002-08-26 11:45:08 +00:00
parent 1a1dcebbd0
commit 2f5f46cb5f
1 changed files with 16 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
scheme/packages.scm
View File

@ -420,7 +420,7 @@
(files (lib parse-forms))) (files (lib parse-forms)))
(define-structure htmlout htmlout-interface (define-structure htmlout htmlout-interface
(open scsh scsh-utilities string-lib formats ascii receiving scheme) (open scsh scsh-utilities srfi-13 formats ascii receiving scheme)
(files (lib htmlout))) (files (lib htmlout)))
(define-structures (define-structures
@ -439,7 +439,7 @@
(define-structure rfc822 rfc822-interface (define-structure rfc822 rfc822-interface
(open receiving ; MV return (RECEIVE and VALUES) (open receiving ; MV return (RECEIVE and VALUES)
scsh-utilities ; index scsh-utilities ; index
string-lib srfi-13
let-opt ; let-optionals let-opt ; let-optionals
crlf-io ; read-crlf-line crlf-io ; read-crlf-line
ascii ; ascii->char ascii ; ascii->char
@ -450,7 +450,7 @@
(define-structure uri uri-interface (define-structure uri uri-interface
(open scsh-utilities (open scsh-utilities
string-lib srfi-13
let-opt let-opt
receiving receiving
@ -483,7 +483,7 @@
signals signals
error-package error-package
ecm-utilities ecm-utilities
string-lib srfi-13
let-opt let-opt
scheme) scheme)
(files (lib ftp))) (files (lib ftp)))
@ -522,7 +522,7 @@
scsh scsh
error-package error-package
ecm-utilities ecm-utilities
string-lib srfi-13
conditions signals handle conditions signals handle
let-opt let-opt
scheme) scheme)
@ -536,7 +536,7 @@
conditions conditions
signals signals
ecm-utilities ecm-utilities
string-lib srfi-13
scheme) scheme)
(files (lib pop3))) (files (lib pop3)))
@ -613,7 +613,7 @@
(define-structure ecm-utilities ecm-utilities-interface (define-structure ecm-utilities ecm-utilities-interface
(open scsh (open scsh
string-lib srfi-13
scheme) scheme)
(files (lib ecm-utilities))) (files (lib ecm-utilities)))
@ -656,7 +656,7 @@
locks locks
thread-fluids ; fork-thread thread-fluids ; fork-thread
fluids fluids
string-lib srfi-13
big-util big-util
defrec-package defrec-package
crlf-io crlf-io
@ -676,7 +676,7 @@
receiving ; receive receiving ; receive
crlf-io ; write-crlf, read-crlf-line crlf-io ; write-crlf, read-crlf-line
rfc822 ; read-rfc822-headers rfc822 ; read-rfc822-headers
srfi-14 ; char-set-complement, char-set:whitespace srfi-14 ; char-set-complement, char-set:whitespace
handle ; ignore-errors handle ; ignore-errors
conditions ; condition-stuff conditions ; condition-stuff
uri uri
@ -684,7 +684,7 @@
formats ; format formats ; format
format-net ; format-internet-host-address format-net ; format-internet-host-address
rate-limit ; rate-limiting stuff rate-limit ; rate-limiting stuff
string-lib ; STRING-INDEX srfi-13 ; STRING-INDEX
dns ; dns-lookup-ip dns ; dns-lookup-ip
sunet-utilities ; socket-address->string sunet-utilities ; socket-address->string
locks ; make-lock et al. locks ; make-lock et al.
@ -711,7 +711,7 @@
httpd-responses httpd-responses
httpd-request httpd-request
httpd-error httpd-error
string-lib ; STRING-MAP srfi-13 ; STRING-MAP
scsh scsh
scheme) scheme)
(files (httpd access-control))) (files (httpd access-control)))
@ -730,7 +730,7 @@
httpd-request ; request record httpd-request ; request record
formats ; format formats ; format
format-net ; format-internet-host-address format-net ; format-internet-host-address
string-lib ; string-join, string-trim srfi-13 ; string-join, string-trim
rfc822 ; get-header rfc822 ; get-header
sunet-utilities ; on-interrupt sunet-utilities ; on-interrupt
threads ; spawn threads ; spawn
@ -785,7 +785,7 @@
htmlout ; Formatted HTML output htmlout ; Formatted HTML output
error-package ; ERROR error-package ; ERROR
pp ; Pretty-printer pp ; Pretty-printer
string-lib ; STRING-SKIP srfi-13 ; STRING-SKIP
rfc822 rfc822
toothless-eval ; EVAL-SAFELY toothless-eval ; EVAL-SAFELY
handle ; IGNORE-ERROR handle ; IGNORE-ERROR
@ -796,7 +796,7 @@
(define-structure info-gateway info-gateway-interface (define-structure info-gateway info-gateway-interface
(open big-scheme (open big-scheme
string-lib srfi-13
conditions signals handle conditions signals handle
htmlout htmlout
httpd-request httpd-request
@ -821,12 +821,12 @@
handle-fatal-error handle-fatal-error
scsh scsh
let-opt let-opt
string-lib srfi-13
scheme) scheme)
(files (httpd rman-gateway))) (files (httpd rman-gateway)))
(define-structure cgi-server cgi-server-interface (define-structure cgi-server cgi-server-interface
(open string-lib (open srfi-13
rfc822 rfc822
crlf-io ; WRITE-CRLF crlf-io ; WRITE-CRLF
uri uri