Changeset 14328 in project for chicken


Ignore:
Timestamp:
04/21/09 14:24:59 (10 years ago)
Author:
felix winkelmann
Message:

support for deprecated, preparational work on types.db

Location:
chicken/branches/scrutiny
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • chicken/branches/scrutiny/scrutinizer.scm

    r14323 r14328  
    4949  perform-closure-conversion prepare-for-code-generation compiler-source-file create-foreign-stub expand-foreign-lambda*
    5050  transform-direct-lambdas! expand-foreign-callback-lambda* debug-lambda-list debug-variable-list debugging
    51   debugging-chicken bomb check-signature posq stringify symbolify build-lambda-list source-info->string
     51  debugging-chicken bomb check-signature posq stringify symbolify build-lambda-list
    5252  string->c-identifier c-ify-string words check-and-open-input-file close-checked-input-file fold-inner constant?
    5353  collapsable-literal? immediate? canonicalize-begin-body extract-mutable-constants string->expr get get-all
     
    8686;       | BASIC
    8787;   BASIC = * | string | symbol | char | number | boolean | list | pair |
    88 ;           procedure | vector | void | null | eof | undefined | port
     88;           procedure | vector | void | null | eof | undefined | port | deprecated
    8989;   RESULTS = *
    9090;           | (VAL1 ...)
     
    112112          ((char? lit) 'char)
    113113          (else '*)))
    114   (define (global-result id)
     114  (define (global-result id loc)
    115115    (cond ((##sys#get id '##core#type) =>
    116116           (lambda (a)
     
    118118                         (not (##sys#get id '##core#declared-type)))
    119119                    (##sys#put! id '##core#type #f)
     120                    '*)
     121                   ((eq? a 'deprecated)
     122                    (report1
     123                     loc
     124                     (sprintf "use of deprecated toplevel identifier `~a'" id) )
    120125                    '*)
    121126                   (else (list a)))))
     
    127132          ((assq id e) =>
    128133           (lambda (a)
    129              (when (eq? 'undefined (cadr a))
     134             (when (eq? 'undefined (cdr a))
    130135               (report1
    131136                loc
     
    133138                         (real-name id db))))
    134139             (list (cdr a))))
    135           (else (global-result id))))
     140          (else (global-result id loc))))
    136141  (define (always-true t loc x)
    137142    (let ((f (cond ((and (pair? t) (eq? 'or (car t)))
     
    344349       (fragment x)
    345350       (if (and (pair? params) (pair? (cdr params)))
    346            (sprintf "(~a)" (source-info->string (cadr params)))
     351           (sprintf " (line ~a)" (source-info->line (cadr params)))
    347352           "")))
    348353    (d "call-result: ~a (~a)" args loc)
     
    414419               ((##core#undefined) '(undefined))
    415420               ((##core#proc) '(procedure))
    416                ((##core#global-ref) (global-result (first params)))
     421               ((##core#global-ref) (global-result (first params) loc))
    417422               ((##core#variable) (variable-result (first params) e loc))
    418423               ((if) (let ((rt (single (walk (first subs) e loc dest) loc)))
     
    479484       (##sys#put! (car e) '##core#type (cadr e)))
    480485     (read-file dbfile))))
     486
     487(define (source-info->line info)
     488  (if (list? info)
     489      (cadr info)
     490      (and info (->string info))) )
  • chicken/branches/scrutiny/types.db

    r14312 r14328  
    222222(interaction-environment (procedure interaction-environment () *))
    223223
    224 #!eof
     224#!eof 
    225225
    226226;; chicken
    227227
    228 abort
    229 add1
    230 argc+argv
    231 argv
    232 arithmetic-shift
    233 bit-set?
    234 bitwise-and
    235 bitwise-ior
    236 bitwise-not
    237 bitwise-xor
    238 blob->string
    239 blob-size
    240 blob?
    241 blob=?
    242 breakpoint
    243 build-platform
    244 c-runtime
    245 call/cc
    246 case-sensitive
    247 char-name
    248 chicken-home
    249 chicken-version
    250 command-line-arguments
    251 condition-predicate
    252 condition-property-accessor
    253 condition?
    254 continuation-capture
    255 continuation-graft
    256 continuation-return
    257 continuation?
    258 copy-read-table
    259 cpu-time
    260 current-error-port
    261 current-exception-handler
    262 current-gc-milliseconds
    263 current-milliseconds
    264 current-read-table
    265 current-seconds
    266 define-reader-ctor
    267 delete-file
    268 enable-warnings
    269 errno
    270 error
    271 exit
    272 exit-handler
    273 expand
    274 extension-information
    275 feature?
    276 features
    277 file-exists?
    278 fixnum-bits
    279 fixnum-precision
    280 fixnum?
    281 flonum-decimal-precision
    282 flonum-epsilon
    283 flonum-maximum-decimal-exponent
    284 flonum-maximum-exponent
    285 flonum-minimum-decimal-exponent
    286 flonum-minimum-exponent
    287 flonum-precision
    288 flonum-print-precision
    289 flonum-radix
    290 flonum?
    291 flush-output
    292 force-finalizers
    293 fp-
    294 fp*
    295 fp/
    296 fp+
    297 fp<
    298 fp<=
    299 fp=
    300 fp>
    301 fp>=
    302 fpmax
    303 fpmin
    304 fpneg
    305 fx-
    306 fx*
    307 fx/
    308 fx+
    309 fx<
    310 fx<=
    311 fx=
    312 fx>
    313 fx>=
    314 fxand
    315 fxior
    316 fxmax
    317 fxmin
    318 fxmod
    319 fxneg
    320 fxnot
    321 fxshl
    322 fxshr
    323 fxxor
    324 gc
    325 gensym
    326 get
    327 get-call-chain
    328 get-environment-variable
    329 get-keyword
    330 get-output-string
    331 get-properties
    332 getenv
    333 getter-with-setter
    334 implicit-exit-handler
    335 keyword->string
    336 keyword-style
    337 keyword?
    338 load-library
    339 load-relative
    340 load-verbose
    341 machine-byte-order
    342 machine-type
    343 make-blob
    344 make-composite-condition
    345 make-parameter
    346 make-property-condition
    347 maximum-flonum
    348 memory-statistics
    349 minimum-flonum
    350 most-negative-fixnum
    351 most-positive-fixnum
    352 on-exit
    353 open-input-string
    354 open-output-string
    355 parentheses-synonyms
    356 port-name
    357 port-position
    358 port?
    359 print
    360 print-call-chain
    361 print-error-message
    362 print*
    363 procedure-information
    364 program-name
    365 promise?
    366 put!
    367 register-feature!
    368 remprop!
    369 rename-file
    370 repository-path
    371 require
    372 reset
    373 reset-handler
    374 return-to-host
    375 reverse-list->string
    376 set-finalizer!
    377 set-gc-report!
    378 set-parameterized-read-syntax!
    379 set-port-name!
    380 set-read-syntax!
    381 set-sharp-read-syntax!
    382 setter
    383 signal
    384 signum
    385 singlestep
    386 software-type
    387 software-version
    388 string->blob
    389 string->keyword
    390 string->uninterned-symbol
    391 strip-syntax
    392 sub1
    393 symbol-escape
    394 symbol-plist
    395 syntax-error
    396 system
    397 unregister-feature!
    398 vector-resize
    399 void
    400 warning
    401 with-exception-handler
     228(abort (procedure abort () *))
     229(add1 (procedure add1 () *))
     230(argc+argv (procedure argc+argv () *))
     231(argv (procedure argv () *))
     232(arithmetic-shift (procedure arithmetic-shift () *))
     233(bit-set? (procedure bit-set? () *))
     234(bitwise-and (procedure bitwise-and () *))
     235(bitwise-ior (procedure bitwise-ior () *))
     236(bitwise-not (procedure bitwise-not () *))
     237(bitwise-xor (procedure bitwise-xor () *))
     238(blob->string (procedure blob->string () *))
     239(blob-size (procedure blob-size () *))
     240(blob? (procedure blob? () *))
     241(blob=? (procedure blob=? () *))
     242(breakpoint (procedure breakpoint () *))
     243(build-platform (procedure build-platform () *))
     244(c-runtime (procedure c-runtime () *))
     245(call/cc (procedure call/cc () *))
     246(case-sensitive (procedure case-sensitive () *))
     247(char-name (procedure char-name () *))
     248(chicken-home (procedure chicken-home () *))
     249(chicken-version (procedure chicken-version () *))
     250(command-line-arguments (procedure command-line-arguments () *))
     251(condition-predicate (procedure condition-predicate () *))
     252(condition-property-accessor (procedure condition-property-accessor () *))
     253(condition? (procedure condition? () *))
     254(continuation-capture (procedure continuation-capture () *))
     255(continuation-graft (procedure continuation-graft () *))
     256(continuation-return (procedure continuation-return () *))
     257(continuation? (procedure continuation? () *))
     258(copy-read-table (procedure copy-read-table () *))
     259(cpu-time (procedure cpu-time () *))
     260(current-error-port (procedure current-error-port () *))
     261(current-exception-handler (procedure current-exception-handler () *))
     262(current-gc-milliseconds (procedure current-gc-milliseconds () *))
     263(current-milliseconds (procedure current-milliseconds () *))
     264(current-read-table (procedure current-read-table () *))
     265(current-seconds (procedure current-seconds () *))
     266(define-reader-ctor (procedure define-reader-ctor () *))
     267(delete-file (procedure delete-file () *))
     268(enable-warnings (procedure enable-warnings () *))
     269(errno (procedure errno () *))
     270(error (procedure error () *))
     271(exit (procedure exit () *))
     272(exit-handler (procedure exit-handler () *))
     273(expand (procedure expand () *))
     274(extension-information (procedure extension-information () *))
     275(feature? (procedure feature? () *))
     276(features (procedure features () *))
     277(file-exists? (procedure file-exists? () *))
     278(fixnum-bits (procedure fixnum-bits () *))
     279(fixnum-precision (procedure fixnum-precision () *))
     280(fixnum? (procedure fixnum? () *))
     281(flonum-decimal-precision (procedure flonum-decimal-precision () *))
     282(flonum-epsilon (procedure flonum-epsilon () *))
     283(flonum-maximum-decimal-exponent (procedure flonum-maximum-decimal-exponent () *))
     284(flonum-maximum-exponent (procedure flonum-maximum-exponent () *))
     285(flonum-minimum-decimal-exponent (procedure flonum-minimum-decimal-exponent () *))
     286(flonum-minimum-exponent (procedure flonum-minimum-exponent () *))
     287(flonum-precision (procedure flonum-precision () *))
     288(flonum-print-precision (procedure flonum-print-precision () *))
     289(flonum-radix (procedure flonum-radix () *))
     290(flonum? (procedure flonum? () *))
     291(flush-output (procedure flush-output () *))
     292(force-finalizers (procedure force-finalizers () *))
     293(fp- (procedure fp- () *))
     294(fp* (procedure fp* () *))
     295(fp/ (procedure fp/ () *))
     296(fp+ (procedure fp+ () *))
     297(fp< (procedure fp< () *))
     298(fp<= (procedure fp<= () *))
     299(fp= (procedure fp= () *))
     300(fp> (procedure fp> () *))
     301(fp>= (procedure fp>= () *))
     302(fpmax (procedure fpmax () *))
     303(fpmin (procedure fpmin () *))
     304(fpneg (procedure fpneg () *))
     305(fx- (procedure fx- () *))
     306(fx* (procedure fx* () *))
     307(fx/ (procedure fx/ () *))
     308(fx+ (procedure fx+ () *))
     309(fx< (procedure fx< () *))
     310(fx<= (procedure fx<= () *))
     311(fx= (procedure fx= () *))
     312(fx> (procedure fx> () *))
     313(fx>= (procedure fx>= () *))
     314(fxand (procedure fxand () *))
     315(fxior (procedure fxior () *))
     316(fxmax (procedure fxmax () *))
     317(fxmin (procedure fxmin () *))
     318(fxmod (procedure fxmod () *))
     319(fxneg (procedure fxneg () *))
     320(fxnot (procedure fxnot () *))
     321(fxshl (procedure fxshl () *))
     322(fxshr (procedure fxshr () *))
     323(fxxor (procedure fxxor () *))
     324(gc (procedure gc () *))
     325(gensym (procedure gensym () *))
     326(get (procedure get () *))
     327(get-call-chain (procedure get-call-chain () *))
     328(get-environment-variable (procedure get-environment-variable () *))
     329(get-keyword (procedure get-keyword () *))
     330(get-output-string (procedure get-output-string () *))
     331(get-properties (procedure get-properties () *))
     332(getenv (procedure getenv () *))
     333(getter-with-setter (procedure getter-with-setter () *))
     334(implicit-exit-handler (procedure implicit-exit-handler () *))
     335(keyword->string (procedure keyword->string () *))
     336(keyword-style (procedure keyword-style () *))
     337(keyword? (procedure keyword? () *))
     338(load-library (procedure load-library () *))
     339(load-relative (procedure load-relative () *))
     340(load-verbose (procedure load-verbose () *))
     341(machine-byte-order (procedure machine-byte-order () *))
     342(machine-type (procedure machine-type () *))
     343(make-blob (procedure make-blob () *))
     344(make-composite-condition (procedure make-composite-condition () *))
     345(make-parameter (procedure make-parameter () *))
     346(make-property-condition (procedure make-property-condition () *))
     347(maximum-flonum (procedure maximum-flonum () *))
     348(memory-statistics (procedure memory-statistics () *))
     349(minimum-flonum (procedure minimum-flonum () *))
     350(most-negative-fixnum (procedure most-negative-fixnum () *))
     351(most-positive-fixnum (procedure most-positive-fixnum () *))
     352(on-exit (procedure on-exit () *))
     353(open-input-string (procedure open-input-string () *))
     354(open-output-string (procedure open-output-string () *))
     355(parentheses-synonyms (procedure parentheses-synonyms () *))
     356(port-name (procedure port-name () *))
     357(port-position (procedure port-position () *))
     358(port? (procedure port? () *))
     359(print (procedure print () *))
     360(print-call-chain (procedure print-call-chain () *))
     361(print-error-message (procedure print-error-message () *))
     362(print* (procedure print* () *))
     363(procedure-information (procedure procedure-information () *))
     364(program-name (procedure program-name () *))
     365(promise? (procedure promise? () *))
     366(put! (procedure put! () *))
     367(register-feature! (procedure register-feature! () *))
     368(remprop! (procedure remprop! () *))
     369(rename-file (procedure rename-file () *))
     370(repository-path (procedure repository-path () *))
     371(require (procedure require () *))
     372(reset (procedure reset () *))
     373(reset-handler (procedure reset-handler () *))
     374(return-to-host (procedure return-to-host () *))
     375(reverse-list->string (procedure reverse-list->string () *))
     376(set-finalizer! (procedure set-finalizer! () *))
     377(set-gc-report! (procedure set-gc-report! () *))
     378(set-parameterized-read-syntax! (procedure set-parameterized-read-syntax! () *))
     379(set-port-name! (procedure set-port-name! () *))
     380(set-read-syntax! (procedure set-read-syntax! () *))
     381(set-sharp-read-syntax! (procedure set-sharp-read-syntax! () *))
     382(setter (procedure setter () *))
     383(signal (procedure signal () *))
     384(signum (procedure signum () *))
     385(singlestep (procedure singlestep () *))
     386(software-type (procedure software-type () *))
     387(software-version (procedure software-version () *))
     388(string->blob (procedure string->blob () *))
     389(string->keyword (procedure string->keyword () *))
     390(string->uninterned-symbol (procedure string->uninterned-symbol () *))
     391(strip-syntax (procedure strip-syntax () *))
     392(sub1 (procedure sub1 () *))
     393(symbol-escape (procedure symbol-escape () *))
     394(symbol-plist (procedure symbol-plist () *))
     395(syntax-error (procedure syntax-error () *))
     396(system (procedure system () *))
     397(unregister-feature! (procedure unregister-feature! () *))
     398(vector-resize (procedure vector-resize () *))
     399(void (procedure void () *))
     400(warning (procedure warning () *))
     401(with-exception-handler (procedure with-exception-handler () *))
    402402
    403403;; data-structures
    404404
    405 ->string
    406 alist-ref
    407 alist-update!
    408 always?
    409 any?
    410 atom?
    411 binary-search
    412 butlast
    413 chop
    414 complement
    415 compose
    416 compress
    417 conc
    418 conjoin
    419 constantly
    420 disjoin
    421 each
    422 flatten
    423 flip
    424 identity
    425 intersperse
    426 join
    427 left-section
    428 list->queue
    429 list-of?
    430 make-queue
    431 merge
    432 merge!
    433 never?
    434 none?
    435 noop
    436 o
    437 project
    438 queue->list
    439 queue-add!
    440 queue-empty?
    441 queue-first
    442 queue-last
    443 queue-push-back!
    444 queue-push-back-list!
    445 queue-remove!
    446 queue?
    447 rassoc
    448 right-section
    449 shuffle
    450 sort
    451 sort!
    452 sorted?
    453 string-chomp
    454 string-chop
    455 string-compare3
    456 string-compare3-ci
    457 string-intersperse
    458 string-split
    459 string-translate
    460 string-translate*
    461 substring-ci=?
    462 substring-index
    463 substring-index-ci
    464 substring=?
    465 tail?
     405(->string (procedure ->string () *))
     406(alist-ref (procedure alist-ref () *))
     407(alist-update! (procedure alist-update! () *))
     408(always? (procedure always? () *))
     409(any? (procedure any? () *))
     410(atom? (procedure atom? () *))
     411(binary-search (procedure binary-search () *))
     412(butlast (procedure butlast () *))
     413(chop (procedure chop () *))
     414(complement (procedure complement () *))
     415(compose (procedure compose () *))
     416(compress (procedure compress () *))
     417(conc (procedure conc () *))
     418(conjoin (procedure conjoin () *))
     419(constantly (procedure constantly () *))
     420(disjoin (procedure disjoin () *))
     421(each (procedure each () *))
     422(flatten (procedure flatten () *))
     423(flip (procedure flip () *))
     424(identity (procedure identity () *))
     425(intersperse (procedure intersperse () *))
     426(join (procedure join () *))
     427(left-section (procedure left-section () *))
     428(list->queue (procedure list->queue () *))
     429(list-of? (procedure list-of? () *))
     430(make-queue (procedure make-queue () *))
     431(merge (procedure merge () *))
     432(merge! (procedure merge! () *))
     433(never? (procedure never? () *))
     434(none? (procedure none? () *))
     435(noop (procedure noop () *))
     436(o (procedure o () *))
     437(project (procedure project () *))
     438(queue->list (procedure queue->list () *))
     439(queue-add! (procedure queue-add! () *))
     440(queue-empty? (procedure queue-empty? () *))
     441(queue-first (procedure queue-first () *))
     442(queue-last (procedure queue-last () *))
     443(queue-push-back! (procedure queue-push-back! () *))
     444(queue-push-back-list! (procedure queue-push-back-list! () *))
     445(queue-remove! (procedure queue-remove! () *))
     446(queue? (procedure queue? () *))
     447(rassoc (procedure rassoc () *))
     448(right-section (procedure right-section () *))
     449(shuffle (procedure shuffle () *))
     450(sort (procedure sort () *))
     451(sort! (procedure sort! () *))
     452(sorted? (procedure sorted? () *))
     453(string-chomp (procedure string-chomp () *))
     454(string-chop (procedure string-chop () *))
     455(string-compare3 (procedure string-compare3 () *))
     456(string-compare3-ci (procedure string-compare3-ci () *))
     457(string-intersperse (procedure string-intersperse () *))
     458(string-split (procedure string-split () *))
     459(string-translate (procedure string-translate () *))
     460(string-translate* (procedure string-translate* () *))
     461(substring-ci=? (procedure substring-ci=? () *))
     462(substring-index (procedure substring-index () *))
     463(substring-index-ci (procedure substring-index-ci () *))
     464(substring=? (procedure substring=? () *))
     465(tail? (procedure tail? () *))
    466466
    467467;; extras
    468468
    469 format
    470 fprintf
    471 pp
    472 pretty-print
    473 pretty-print-width
    474 printf
    475 random
    476 random-seed
    477 randomize
    478 read-byte
    479 read-file
    480 read-line
    481 read-lines
    482 read-string
    483 read-string!
    484 read-token
    485 sprintf
    486 write-byte
    487 write-line
    488 write-string
     469(format (procedure format () *))
     470(fprintf (procedure fprintf () *))
     471(pp (procedure pp () *))
     472(pretty-print (procedure pretty-print () *))
     473(pretty-print-width (procedure pretty-print-width () *))
     474(printf (procedure printf () *))
     475(random (procedure random () *))
     476(random-seed (procedure random-seed () *))
     477(randomize (procedure randomize () *))
     478(read-byte (procedure read-byte () *))
     479(read-file (procedure read-file () *))
     480(read-line (procedure read-line () *))
     481(read-lines (procedure read-lines () *))
     482(read-string (procedure read-string () *))
     483(read-string! (procedure read-string! () *))
     484(read-token (procedure read-token () *))
     485(sprintf (procedure sprintf () *))
     486(write-byte (procedure write-byte () *))
     487(write-line (procedure write-line () *))
     488(write-string (procedure write-string () *))
    489489
    490490;; files
    491491
    492 delete-file*
    493 file-copy
    494 file-move
    495 make-pathname
    496 directory-null?
    497 make-absolute-pathname
    498 create-temporary-file
    499 decompose-pathname
    500 absolute-pathname?
    501 pathname-directory
    502 pathname-extension
    503 pathname-file
    504 pathname-replace-directory
    505 pathname-replace-extension
    506 pathname-replace-file
    507 pathname-strip-directory
    508 pathname-strip-extension
    509 normalize-pathname
     492(delete-file* (procedure delete-file* () *))
     493(file-copy (procedure file-copy () *))
     494(file-move (procedure file-move () *))
     495(make-pathname (procedure make-pathname () *))
     496(directory-null? (procedure directory-null? () *))
     497(make-absolute-pathname (procedure make-absolute-pathname () *))
     498(create-temporary-file (procedure create-temporary-file () *))
     499(decompose-pathname (procedure decompose-pathname () *))
     500(absolute-pathname? (procedure absolute-pathname? () *))
     501(pathname-directory (procedure pathname-directory () *))
     502(pathname-extension (procedure pathname-extension () *))
     503(pathname-file (procedure pathname-file () *))
     504(pathname-replace-directory (procedure pathname-replace-directory () *))
     505(pathname-replace-extension (procedure pathname-replace-extension () *))
     506(pathname-replace-file (procedure pathname-replace-file () *))
     507(pathname-strip-directory (procedure pathname-strip-directory () *))
     508(pathname-strip-extension (procedure pathname-strip-extension () *))
     509(normalize-pathname (procedure normalize-pathname () *))
    510510
    511511;; irregex
    512512
    513 irregex
    514 string->irregex
    515 sre->irregex
    516 string->sre
    517 irregex?
    518 irregex-match-data?
    519 irregex-new-matches
    520 irregex-reset-matches!
    521 irregex-match-start
    522 irregex-match-end
    523 irregex-match-substring
    524 irregex-search
    525 irregex-search/matches
    526 irregex-match
    527 irregex-match-string
    528 irregex-replace
    529 irregex-replace/all
    530 irregex-dfa
    531 irregex-dfa/search
    532 irregex-dfa/extract
    533 irregex-nfa
    534 irregex-flags
    535 irregex-submatches
    536 irregex-lengths
    537 irregex-names
     513(irregex (procedure irregex () *))
     514(string->irregex (procedure string->irregex () *))
     515(sre->irregex (procedure sre->irregex () *))
     516(string->sre (procedure string->sre () *))
     517(irregex? (procedure irregex? () *))
     518(irregex-match-data? (procedure irregex-match-data? () *))
     519(irregex-new-matches (procedure irregex-new-matches () *))
     520(irregex-reset-matches! (procedure irregex-reset-matches! () *))
     521(irregex-match-start (procedure irregex-match-start () *))
     522(irregex-match-end (procedure irregex-match-end () *))
     523(irregex-match-substring (procedure irregex-match-substring () *))
     524(irregex-search (procedure irregex-search () *))
     525(irregex-search/matches (procedure irregex-search/matches () *))
     526(irregex-match (procedure irregex-match () *))
     527(irregex-match-string (procedure irregex-match-string () *))
     528(irregex-replace (procedure irregex-replace () *))
     529(irregex-replace/all (procedure irregex-replace/all () *))
     530(irregex-dfa (procedure irregex-dfa () *))
     531(irregex-dfa/search (procedure irregex-dfa/search () *))
     532(irregex-dfa/extract (procedure irregex-dfa/extract () *))
     533(irregex-nfa (procedure irregex-nfa () *))
     534(irregex-flags (procedure irregex-flags () *))
     535(irregex-submatches (procedure irregex-submatches () *))
     536(irregex-lengths (procedure irregex-lengths () *))
     537(irregex-names (procedure irregex-names () *))
    538538
    539539;; lolevel
    540540
    541 address->pointer
    542 align-to-word
    543 allocate
    544 block-ref
    545 block-set!
    546 extend-procedure
    547 extended-procedure?
    548 free
    549 global-bound?
    550 global-make-unbound!
    551 global-ref
    552 global-set!
    553 locative->object
    554 locative-ref
    555 locative-set!
    556 locative?
    557 make-locative
    558 make-record-instance
    559 make-weak-locative
    560 move-memory!
    561 mutate-procedure
    562 null-pointer
    563 null-pointer?
    564 number-of-bytes
    565 number-of-slots
    566 object->pointer
    567 object-become!
    568 object-copy
    569 object-evict
    570 object-evict-to-location
    571 object-evicted?
    572 object-release
    573 object-size
    574 object-unevict
    575 pointer->address
    576 pointer-like?
    577 pointer->object
    578 pointer-f32-ref
    579 pointer-f32-set!
    580 pointer-f64-ref
    581 pointer-f64-set!
    582 pointer-offset
    583 pointer-s16-ref
    584 pointer-s16-set!
    585 pointer-s32-ref
    586 pointer-s32-set!
    587 pointer-s8-ref
    588 pointer-s8-set!
    589 pointer-tag
    590 pointer-u16-ref
    591 pointer-u16-set!
    592 pointer-u32-ref
    593 pointer-u32-set!
    594 pointer-u8-ref
    595 pointer-u8-set!
    596 pointer=?
    597 pointer?
    598 procedure-data
    599 record->vector
    600 record-instance?
    601 record-instance-length
    602 record-instance-slot
    603 record-instance-slot-set!
    604 record-instance-type
    605 set-invalid-procedure-call-handler!
    606 set-procedure-data!
    607 tag-pointer
    608 tagged-pointer?
    609 unbound-variable-value
    610 vector-like?
     541(address->pointer (procedure address->pointer () *))
     542(align-to-word (procedure align-to-word () *))
     543(allocate (procedure allocate () *))
     544(block-ref (procedure block-ref () *))
     545(block-set! (procedure block-set! () *))
     546(extend-procedure (procedure extend-procedure () *))
     547(extended-procedure? (procedure extended-procedure? () *))
     548(free (procedure free () *))
     549(global-bound? (procedure global-bound? () *))
     550(global-make-unbound! (procedure global-make-unbound! () *))
     551(global-ref (procedure global-ref () *))
     552(global-set! (procedure global-set! () *))
     553(locative->object (procedure locative->object () *))
     554(locative-ref (procedure locative-ref () *))
     555(locative-set! (procedure locative-set! () *))
     556(locative? (procedure locative? () *))
     557(make-locative (procedure make-locative () *))
     558(make-record-instance (procedure make-record-instance () *))
     559(make-weak-locative (procedure make-weak-locative () *))
     560(move-memory! (procedure move-memory! () *))
     561(mutate-procedure (procedure mutate-procedure () *))
     562(null-pointer (procedure null-pointer () *))
     563(null-pointer? (procedure null-pointer? () *))
     564(number-of-bytes (procedure number-of-bytes () *))
     565(number-of-slots (procedure number-of-slots () *))
     566(object->pointer (procedure object->pointer () *))
     567(object-become! (procedure object-become! () *))
     568(object-copy (procedure object-copy () *))
     569(object-evict (procedure object-evict () *))
     570(object-evict-to-location (procedure object-evict-to-location () *))
     571(object-evicted? (procedure object-evicted? () *))
     572(object-release (procedure object-release () *))
     573(object-size (procedure object-size () *))
     574(object-unevict (procedure object-unevict () *))
     575(pointer->address (procedure pointer->address () *))
     576(pointer-like? (procedure pointer-like? () *))
     577(pointer->object (procedure pointer->object () *))
     578(pointer-f32-ref (procedure pointer-f32-ref () *))
     579(pointer-f32-set! (procedure pointer-f32-set! () *))
     580(pointer-f64-ref (procedure pointer-f64-ref () *))
     581(pointer-f64-set! (procedure pointer-f64-set! () *))
     582(pointer-offset (procedure pointer-offset () *))
     583(pointer-s16-ref (procedure pointer-s16-ref () *))
     584(pointer-s16-set! (procedure pointer-s16-set! () *))
     585(pointer-s32-ref (procedure pointer-s32-ref () *))
     586(pointer-s32-set! (procedure pointer-s32-set! () *))
     587(pointer-s8-ref (procedure pointer-s8-ref () *))
     588(pointer-s8-set! (procedure pointer-s8-set! () *))
     589(pointer-tag (procedure pointer-tag () *))
     590(pointer-u16-ref (procedure pointer-u16-ref () *))
     591(pointer-u16-set! (procedure pointer-u16-set! () *))
     592(pointer-u32-ref (procedure pointer-u32-ref () *))
     593(pointer-u32-set! (procedure pointer-u32-set! () *))
     594(pointer-u8-ref (procedure pointer-u8-ref () *))
     595(pointer-u8-set! (procedure pointer-u8-set! () *))
     596(pointer=? (procedure pointer=? () *))
     597(pointer? (procedure pointer? () *))
     598(procedure-data (procedure procedure-data () *))
     599(record->vector (procedure record->vector () *))
     600(record-instance? (procedure record-instance? () *))
     601(record-instance-length (procedure record-instance-length () *))
     602(record-instance-slot (procedure record-instance-slot () *))
     603(record-instance-slot-set! (procedure record-instance-slot-set! () *))
     604(record-instance-type (procedure record-instance-type () *))
     605(set-invalid-procedure-call-handler! (procedure set-invalid-procedure-call-handler! () *))
     606(set-procedure-data! (procedure set-procedure-data! () *))
     607(tag-pointer (procedure tag-pointer () *))
     608(tagged-pointer? (procedure tagged-pointer? () *))
     609(unbound-variable-value (procedure unbound-variable-value () *))
     610(vector-like? (procedure vector-like? () *))
    611611
    612612;; ports
    613613
    614 call-with-input-string
    615 call-with-output-string
    616 make-input-port
    617 make-output-port
    618 port-for-each
    619 port-map
    620 port-fold
    621 make-broadcast-port
    622 make-concatenated-port
    623 with-error-output-to-port
    624 with-input-from-port
    625 with-input-from-string
    626 with-output-to-port
    627 with-output-to-string
    628 with-error-output-to-port
     614(call-with-input-string (procedure call-with-input-string () *))
     615(call-with-output-string (procedure call-with-output-string () *))
     616(make-input-port (procedure make-input-port () *))
     617(make-output-port (procedure make-output-port () *))
     618(port-for-each (procedure port-for-each () *))
     619(port-map (procedure port-map () *))
     620(port-fold (procedure port-fold () *))
     621(make-broadcast-port (procedure make-broadcast-port () *))
     622(make-concatenated-port (procedure make-concatenated-port () *))
     623(with-error-output-to-port (procedure with-error-output-to-port () *))
     624(with-input-from-port (procedure with-input-from-port () *))
     625(with-input-from-string (procedure with-input-from-string () *))
     626(with-output-to-port (procedure with-output-to-port () *))
     627(with-output-to-string (procedure with-output-to-string () *))
     628(with-error-output-to-port (procedure with-error-output-to-port () *))
    629629
    630630;; posix
    631631
    632 _exit
    633 call-with-input-pipe
    634 call-with-output-pipe
    635 canonical-path
    636 change-directory
    637 change-file-mode
    638 change-file-owner
    639 close-input-pipe
    640 close-output-pipe
    641 create-directory
    642 create-fifo
    643 create-pipe
    644 create-session
    645 create-symbolic-link
    646 current-directory
    647 current-effective-group-id
    648 current-effective-user-id
    649 current-effective-user-name
    650 current-environment                     ;
    651 DEPRECATED
    652 get-environment-variables
    653 current-group-id
    654 current-process-id
    655 current-user-id
    656 current-user-name
    657 delete-directory
    658 directory
    659 directory?
    660 duplicate-fileno
    661 errno/2big
    662 errno/acces
    663 errno/again
    664 errno/badf
    665 errno/busy
    666 errno/child
    667 errno/deadlk
    668 errno/dom
    669 errno/exist
    670 errno/fault
    671 errno/fbig
    672 errno/ilseq
    673 errno/intr
    674 errno/inval
    675 errno/io
    676 errno/isdir
    677 errno/mfile
    678 errno/mlink
    679 errno/nametoolong
    680 errno/nfile
    681 errno/nodev
    682 errno/noent
    683 errno/noexec
    684 errno/nolck
    685 errno/nomem
    686 errno/nospc
    687 errno/nosys
    688 errno/notdir
    689 errno/notempty
    690 errno/notty
    691 errno/nxio
    692 errno/perm
    693 errno/pipe
    694 errno/range
    695 errno/rofs
    696 errno/spipe
    697 errno/srch
    698 errno/wouldblock
    699 errno/xdev
    700 fcntl/dupfd
    701 fcntl/getfd
    702 fcntl/getfl
    703 fcntl/setfd
    704 fcntl/setfl
    705 fifo?
    706 file-access-time
    707 file-change-time
    708 file-close
    709 file-control
    710 file-execute-access?
    711 file-link
    712 file-lock
    713 file-lock/blocking
    714 file-mkstemp
    715 file-modification-time
    716 file-open
    717 file-owner
    718 file-permissions
    719 file-position
    720 file-read
    721 file-read-access?
    722 file-select
    723 file-size
    724 file-stat
    725 file-test-lock
    726 file-truncate
    727 file-unlock
    728 file-write
    729 file-write-access?
    730 fileno/stderr
    731 fileno/stdin
    732 fileno/stdout
    733 find-files
    734 get-groups
    735 get-host-name
    736 glob
    737 group-information
    738 initialize-groups
    739 local-time->seconds
    740 local-timezone-abbreviation
    741 map-file-to-memory
    742 map/anonymous
    743 map/file
    744 map/fixed
    745 map/private
    746 map/shared
    747 memory-mapped-file-pointer
    748 memory-mapped-file?
    749 open-input-file*
    750 open-input-pipe
    751 open-output-file*
    752 open-output-pipe
    753 open/append
    754 open/binary
    755 open/creat
    756 open/excl
    757 open/fsync
    758 open/noctty
    759 open/nonblock
    760 open/rdonly
    761 open/rdwr
    762 open/read
    763 open/sync
    764 open/text
    765 open/trunc
    766 open/write
    767 open/wronly
    768 parent-process-id
    769 perm/irgrp
    770 perm/iroth
    771 perm/irusr
    772 perm/irwxg
    773 perm/irwxo
    774 perm/irwxu
    775 perm/isgid
    776 perm/isuid
    777 perm/isvtx
    778 perm/iwgrp
    779 perm/iwoth
    780 perm/iwusr
    781 perm/ixgrp
    782 perm/ixoth
    783 perm/ixusr
    784 pipe/buf
    785 port->fileno
    786 process
    787 process*
    788 process-execute
    789 process-fork
    790 process-group-id
    791 process-run
    792 process-signal
    793 process-wait
    794 prot/exec
    795 prot/none
    796 prot/read
    797 prot/write
    798 read-symbolic-link
    799 regular-file?
    800 seconds->local-time
    801 seconds->string
    802 seconds->utc-time
    803 seek/cur
    804 seek/end
    805 seek/set
    806 set-alarm!
    807 set-buffering-mode!
    808 set-groups!
    809 set-root-directory!
    810 set-signal-handler!
    811 set-signal-mask!
    812 setenv
    813 signal-handler
    814 signal-mask
    815 signal-mask!
    816 signal-masked?
    817 signal-unmask!
    818 signal/abrt
    819 signal/alrm
    820 signal/chld
    821 signal/cont
    822 signal/fpe
    823 signal/hup
    824 signal/ill
    825 signal/int
    826 signal/io
    827 signal/kill
    828 signal/pipe
    829 signal/prof
    830 signal/quit
    831 signal/segv
    832 signal/stop
    833 signal/term
    834 signal/trap
    835 signal/tstp
    836 signal/urg
    837 signal/usr1
    838 signal/usr2
    839 signal/vtalrm
    840 signal/winch
    841 signal/xcpu
    842 signal/xfsz
    843 signals-list
    844 sleep
    845 stat-block-device?
    846 stat-char-device?
    847 stat-directory?
    848 stat-fifo?
    849 stat-regular?
    850 stat-socket?
    851 stat-symlink?
    852 string->time
    853 symbolic-link?
    854 system-information
    855 terminal-name
    856 terminal-port?
    857 terminal-size
    858 time->string
    859 unmap-file-from-memory
    860 unsetenv
    861 user-information
    862 utc-time->seconds
    863 with-input-from-pipe
    864 with-output-to-pipe
     632(_exit (procedure _exit () *))
     633(call-with-input-pipe (procedure call-with-input-pipe () *))
     634(call-with-output-pipe (procedure call-with-output-pipe () *))
     635(canonical-path (procedure canonical-path () *))
     636(change-directory (procedure change-directory () *))
     637(change-file-mode (procedure change-file-mode () *))
     638(change-file-owner (procedure change-file-owner () *))
     639(close-input-pipe (procedure close-input-pipe () *))
     640(close-output-pipe (procedure close-output-pipe () *))
     641(create-directory (procedure create-directory () *))
     642(create-fifo (procedure create-fifo () *))
     643(create-pipe (procedure create-pipe () *))
     644(create-session (procedure create-session () *))
     645(create-symbolic-link (procedure create-symbolic-link () *))
     646(current-directory (procedure current-directory () *))
     647(current-effective-group-id (procedure current-effective-group-id () *))
     648(current-effective-user-id (procedure current-effective-user-id () *))
     649(current-effective-user-name (procedure current-effective-user-name () *))
     650(current-environment deprecated)
     651(get-environment-variables (procedure get-environment-variables () *))
     652(current-group-id (procedure current-group-id () *))
     653(current-process-id (procedure current-process-id () *))
     654(current-user-id (procedure current-user-id () *))
     655(current-user-name (procedure current-user-name () *))
     656(delete-directory (procedure delete-directory () *))
     657(directory (procedure directory () *))
     658(directory? (procedure directory? () *))
     659(duplicate-fileno (procedure duplicate-fileno () *))
     660(errno/2big (procedure errno/2big () *))
     661(errno/acces (procedure errno/acces () *))
     662(errno/again (procedure errno/again () *))
     663(errno/badf (procedure errno/badf () *))
     664(errno/busy (procedure errno/busy () *))
     665(errno/child (procedure errno/child () *))
     666(errno/deadlk (procedure errno/deadlk () *))
     667(errno/dom (procedure errno/dom () *))
     668(errno/exist (procedure errno/exist () *))
     669(errno/fault (procedure errno/fault () *))
     670(errno/fbig (procedure errno/fbig () *))
     671(errno/ilseq (procedure errno/ilseq () *))
     672(errno/intr (procedure errno/intr () *))
     673(errno/inval (procedure errno/inval () *))
     674(errno/io (procedure errno/io () *))
     675(errno/isdir (procedure errno/isdir () *))
     676(errno/mfile (procedure errno/mfile () *))
     677(errno/mlink (procedure errno/mlink () *))
     678(errno/nametoolong (procedure errno/nametoolong () *))
     679(errno/nfile (procedure errno/nfile () *))
     680(errno/nodev (procedure errno/nodev () *))
     681(errno/noent (procedure errno/noent () *))
     682(errno/noexec (procedure errno/noexec () *))
     683(errno/nolck (procedure errno/nolck () *))
     684(errno/nomem (procedure errno/nomem () *))
     685(errno/nospc (procedure errno/nospc () *))
     686(errno/nosys (procedure errno/nosys () *))
     687(errno/notdir (procedure errno/notdir () *))
     688(errno/notempty (procedure errno/notempty () *))
     689(errno/notty (procedure errno/notty () *))
     690(errno/nxio (procedure errno/nxio () *))
     691(errno/perm (procedure errno/perm () *))
     692(errno/pipe (procedure errno/pipe () *))
     693(errno/range (procedure errno/range () *))
     694(errno/rofs (procedure errno/rofs () *))
     695(errno/spipe (procedure errno/spipe () *))
     696(errno/srch (procedure errno/srch () *))
     697(errno/wouldblock (procedure errno/wouldblock () *))
     698(errno/xdev (procedure errno/xdev () *))
     699(fcntl/dupfd (procedure fcntl/dupfd () *))
     700(fcntl/getfd (procedure fcntl/getfd () *))
     701(fcntl/getfl (procedure fcntl/getfl () *))
     702(fcntl/setfd (procedure fcntl/setfd () *))
     703(fcntl/setfl (procedure fcntl/setfl () *))
     704(fifo? (procedure fifo? () *))
     705(file-access-time (procedure file-access-time () *))
     706(file-change-time (procedure file-change-time () *))
     707(file-close (procedure file-close () *))
     708(file-control (procedure file-control () *))
     709(file-execute-access? (procedure file-execute-access? () *))
     710(file-link (procedure file-link () *))
     711(file-lock (procedure file-lock () *))
     712(file-lock/blocking (procedure file-lock/blocking () *))
     713(file-mkstemp (procedure file-mkstemp () *))
     714(file-modification-time (procedure file-modification-time () *))
     715(file-open (procedure file-open () *))
     716(file-owner (procedure file-owner () *))
     717(file-permissions (procedure file-permissions () *))
     718(file-position (procedure file-position () *))
     719(file-read (procedure file-read () *))
     720(file-read-access? (procedure file-read-access? () *))
     721(file-select (procedure file-select () *))
     722(file-size (procedure file-size () *))
     723(file-stat (procedure file-stat () *))
     724(file-test-lock (procedure file-test-lock () *))
     725(file-truncate (procedure file-truncate () *))
     726(file-unlock (procedure file-unlock () *))
     727(file-write (procedure file-write () *))
     728(file-write-access? (procedure file-write-access? () *))
     729(fileno/stderr (procedure fileno/stderr () *))
     730(fileno/stdin (procedure fileno/stdin () *))
     731(fileno/stdout (procedure fileno/stdout () *))
     732(find-files (procedure find-files () *))
     733(get-groups (procedure get-groups () *))
     734(get-host-name (procedure get-host-name () *))
     735(glob (procedure glob () *))
     736(group-information (procedure group-information () *))
     737(initialize-groups (procedure initialize-groups () *))
     738(local-time->seconds (procedure local-time->seconds () *))
     739(local-timezone-abbreviation (procedure local-timezone-abbreviation () *))
     740(map-file-to-memory (procedure map-file-to-memory () *))
     741(map/anonymous (procedure map/anonymous () *))
     742(map/file (procedure map/file () *))
     743(map/fixed (procedure map/fixed () *))
     744(map/private (procedure map/private () *))
     745(map/shared (procedure map/shared () *))
     746(memory-mapped-file-pointer (procedure memory-mapped-file-pointer () *))
     747(memory-mapped-file? (procedure memory-mapped-file? () *))
     748(open-input-file* (procedure open-input-file* () *))
     749(open-input-pipe (procedure open-input-pipe () *))
     750(open-output-file* (procedure open-output-file* () *))
     751(open-output-pipe (procedure open-output-pipe () *))
     752(open/append (procedure open/append () *))
     753(open/binary (procedure open/binary () *))
     754(open/creat (procedure open/creat () *))
     755(open/excl (procedure open/excl () *))
     756(open/fsync (procedure open/fsync () *))
     757(open/noctty (procedure open/noctty () *))
     758(open/nonblock (procedure open/nonblock () *))
     759(open/rdonly (procedure open/rdonly () *))
     760(open/rdwr (procedure open/rdwr () *))
     761(open/read (procedure open/read () *))
     762(open/sync (procedure open/sync () *))
     763(open/text (procedure open/text () *))
     764(open/trunc (procedure open/trunc () *))
     765(open/write (procedure open/write () *))
     766(open/wronly (procedure open/wronly () *))
     767(parent-process-id (procedure parent-process-id () *))
     768(perm/irgrp (procedure perm/irgrp () *))
     769(perm/iroth (procedure perm/iroth () *))
     770(perm/irusr (procedure perm/irusr () *))
     771(perm/irwxg (procedure perm/irwxg () *))
     772(perm/irwxo (procedure perm/irwxo () *))
     773(perm/irwxu (procedure perm/irwxu () *))
     774(perm/isgid (procedure perm/isgid () *))
     775(perm/isuid (procedure perm/isuid () *))
     776(perm/isvtx (procedure perm/isvtx () *))
     777(perm/iwgrp (procedure perm/iwgrp () *))
     778(perm/iwoth (procedure perm/iwoth () *))
     779(perm/iwusr (procedure perm/iwusr () *))
     780(perm/ixgrp (procedure perm/ixgrp () *))
     781(perm/ixoth (procedure perm/ixoth () *))
     782(perm/ixusr (procedure perm/ixusr () *))
     783(pipe/buf (procedure pipe/buf () *))
     784(port->fileno (procedure port->fileno () *))
     785(process (procedure process () *))
     786(process* (procedure process* () *))
     787(process-execute (procedure process-execute () *))
     788(process-fork (procedure process-fork () *))
     789(process-group-id (procedure process-group-id () *))
     790(process-run (procedure process-run () *))
     791(process-signal (procedure process-signal () *))
     792(process-wait (procedure process-wait () *))
     793(prot/exec (procedure prot/exec () *))
     794(prot/none (procedure prot/none () *))
     795(prot/read (procedure prot/read () *))
     796(prot/write (procedure prot/write () *))
     797(read-symbolic-link (procedure read-symbolic-link () *))
     798(regular-file? (procedure regular-file? () *))
     799(seconds->local-time (procedure seconds->local-time () *))
     800(seconds->string (procedure seconds->string () *))
     801(seconds->utc-time (procedure seconds->utc-time () *))
     802(seek/cur (procedure seek/cur () *))
     803(seek/end (procedure seek/end () *))
     804(seek/set (procedure seek/set () *))
     805(set-alarm! (procedure set-alarm! () *))
     806(set-buffering-mode! (procedure set-buffering-mode! () *))
     807(set-groups! (procedure set-groups! () *))
     808(set-root-directory! (procedure set-root-directory! () *))
     809(set-signal-handler! (procedure set-signal-handler! () *))
     810(set-signal-mask! (procedure set-signal-mask! () *))
     811(setenv (procedure setenv () *))
     812(signal-handler (procedure signal-handler () *))
     813(signal-mask (procedure signal-mask () *))
     814(signal-mask! (procedure signal-mask! () *))
     815(signal-masked? (procedure signal-masked? () *))
     816(signal-unmask! (procedure signal-unmask! () *))
     817(signal/abrt (procedure signal/abrt () *))
     818(signal/alrm (procedure signal/alrm () *))
     819(signal/chld (procedure signal/chld () *))
     820(signal/cont (procedure signal/cont () *))
     821(signal/fpe (procedure signal/fpe () *))
     822(signal/hup (procedure signal/hup () *))
     823(signal/ill (procedure signal/ill () *))
     824(signal/int (procedure signal/int () *))
     825(signal/io (procedure signal/io () *))
     826(signal/kill (procedure signal/kill () *))
     827(signal/pipe (procedure signal/pipe () *))
     828(signal/prof (procedure signal/prof () *))
     829(signal/quit (procedure signal/quit () *))
     830(signal/segv (procedure signal/segv () *))
     831(signal/stop (procedure signal/stop () *))
     832(signal/term (procedure signal/term () *))
     833(signal/trap (procedure signal/trap () *))
     834(signal/tstp (procedure signal/tstp () *))
     835(signal/urg (procedure signal/urg () *))
     836(signal/usr1 (procedure signal/usr1 () *))
     837(signal/usr2 (procedure signal/usr2 () *))
     838(signal/vtalrm (procedure signal/vtalrm () *))
     839(signal/winch (procedure signal/winch () *))
     840(signal/xcpu (procedure signal/xcpu () *))
     841(signal/xfsz (procedure signal/xfsz () *))
     842(signals-list (procedure signals-list () *))
     843(sleep (procedure sleep () *))
     844(stat-block-device? (procedure stat-block-device? () *))
     845(stat-char-device? (procedure stat-char-device? () *))
     846(stat-directory? (procedure stat-directory? () *))
     847(stat-fifo? (procedure stat-fifo? () *))
     848(stat-regular? (procedure stat-regular? () *))
     849(stat-socket? (procedure stat-socket? () *))
     850(stat-symlink? (procedure stat-symlink? () *))
     851(string->time (procedure string->time () *))
     852(symbolic-link? (procedure symbolic-link? () *))
     853(system-information (procedure system-information () *))
     854(terminal-name (procedure terminal-name () *))
     855(terminal-port? (procedure terminal-port? () *))
     856(terminal-size (procedure terminal-size () *))
     857(time->string (procedure time->string () *))
     858(unmap-file-from-memory (procedure unmap-file-from-memory () *))
     859(unsetenv (procedure unsetenv () *))
     860(user-information (procedure user-information () *))
     861(utc-time->seconds (procedure utc-time->seconds () *))
     862(with-input-from-pipe (procedure with-input-from-pipe () *))
     863(with-output-to-pipe (procedure with-output-to-pipe () *))
    865864
    866865;; regex
    867866
    868 glob->regexp
    869 glob?
    870 grep
    871 regex-chardef-table
    872 regex-chardef-table?
    873 regexp
    874 regexp-escape
    875 regexp?
    876 string-match
    877 string-match-positions
    878 string-search
    879 string-search-positions
    880 string-split-fields
    881 string-substitute
    882 string-substitute*
     867(glob->regexp (procedure glob->regexp () *))
     868(glob? (procedure glob? () *))
     869(grep (procedure grep () *))
     870(regex-chardef-table (procedure regex-chardef-table () *))
     871(regex-chardef-table? (procedure regex-chardef-table? () *))
     872(regexp (procedure regexp () *))
     873(regexp-escape (procedure regexp-escape () *))
     874(regexp? (procedure regexp? () *))
     875(string-match (procedure string-match () *))
     876(string-match-positions (procedure string-match-positions () *))
     877(string-search (procedure string-search () *))
     878(string-search-positions (procedure string-search-positions () *))
     879(string-split-fields (procedure string-split-fields () *))
     880(string-substitute (procedure string-substitute () *))
     881(string-substitute* (procedure string-substitute* () *))
    883882
    884883;; srfi-1
    885884
    886 alist-cons
    887 alist-copy
    888 alist-delete
    889 alist-delete!
    890 any
    891 append!
    892 append-map
    893 append-map!
    894 append-reverse
    895 append-reverse!
    896 assoc
    897 break
    898 break!
    899 car+cdr
    900 circular-list
    901 circular-list?
    902 concatenate
    903 concatenate!
    904 cons*
    905 count
    906 delete
    907 delete!
    908 delete-duplicates
    909 delete-duplicates!
    910 dotted-list?
    911 drop
    912 drop-right
    913 drop-right!
    914 drop-while
    915 eighth
    916 every
    917 fifth
    918 filter
    919 filter!
    920 filter-map
    921 find
    922 find-tail
    923 first
    924 fold
    925 fold-right
    926 fourth
    927 iota
    928 last
    929 last-pair
    930 length+
    931 list-copy
    932 list-index
    933 list-tabulate
    934 list=
    935 lset-adjoin
    936 lset-diff+intersection
    937 lset-diff+intersection!
    938 lset-difference
    939 lset-difference!
    940 lset-intersection
    941 lset-intersection!
    942 lset-union
    943 lset-union!
    944 lset-xor
    945 lset-xor!
    946 lset<=
    947 lset=
    948 make-list
    949 map
    950 map!
    951 map-in-order
    952 member
    953 ninth
    954 not-pair?
    955 null-list?
    956 pair-fold
    957 pair-fold-right
    958 pair-for-each
    959 partition
    960 partition!
    961 proper-list?
    962 reduce
    963 reduce-right
    964 remove
    965 remove!
    966 reverse!
    967 second
    968 seventh
    969 sixth
    970 span
    971 span!
    972 split-at
    973 split-at!
    974 take
    975 take!
    976 take-right
    977 take-while
    978 take-while!
    979 tenth
    980 third
    981 unfold
    982 unfold-right
    983 unzip1
    984 unzip2
    985 unzip3
    986 unzip4
    987 unzip5
    988 xcons
    989 zip
     885(alist-cons (procedure alist-cons () *))
     886(alist-copy (procedure alist-copy () *))
     887(alist-delete (procedure alist-delete () *))
     888(alist-delete! (procedure alist-delete! () *))
     889(any (procedure any () *))
     890(append! (procedure append! () *))
     891(append-map (procedure append-map () *))
     892(append-map! (procedure append-map! () *))
     893(append-reverse (procedure append-reverse () *))
     894(append-reverse! (procedure append-reverse! () *))
     895(assoc (procedure assoc () *))
     896(break (procedure break () *))
     897(break! (procedure break! () *))
     898(car+cdr (procedure car+cdr () *))
     899(circular-list (procedure circular-list () *))
     900(circular-list? (procedure circular-list? () *))
     901(concatenate (procedure concatenate () *))
     902(concatenate! (procedure concatenate! () *))
     903(cons* (procedure cons* () *))
     904(count (procedure count () *))
     905(delete (procedure delete () *))
     906(delete! (procedure delete! () *))
     907(delete-duplicates (procedure delete-duplicates () *))
     908(delete-duplicates! (procedure delete-duplicates! () *))
     909(dotted-list? (procedure dotted-list? () *))
     910(drop (procedure drop () *))
     911(drop-right (procedure drop-right () *))
     912(drop-right! (procedure drop-right! () *))
     913(drop-while (procedure drop-while () *))
     914(eighth (procedure eighth () *))
     915(every (procedure every () *))
     916(fifth (procedure fifth () *))
     917(filter (procedure filter () *))
     918(filter! (procedure filter! () *))
     919(filter-map (procedure filter-map () *))
     920(find (procedure find () *))
     921(find-tail (procedure find-tail () *))
     922(first (procedure first () *))
     923(fold (procedure fold () *))
     924(fold-right (procedure fold-right () *))
     925(fourth (procedure fourth () *))
     926(iota (procedure iota () *))
     927(last (procedure last () *))
     928(last-pair (procedure last-pair () *))
     929(length+ (procedure length+ () *))
     930(list-copy (procedure list-copy () *))
     931(list-index (procedure list-index () *))
     932(list-tabulate (procedure list-tabulate () *))
     933(list= (procedure list= () *))
     934(lset-adjoin (procedure lset-adjoin () *))
     935(lset-diff+intersection (procedure lset-diff+intersection () *))
     936(lset-diff+intersection! (procedure lset-diff+intersection! () *))
     937(lset-difference (procedure lset-difference () *))
     938(lset-difference! (procedure lset-difference! () *))
     939(lset-intersection (procedure lset-intersection () *))
     940(lset-intersection! (procedure lset-intersection! () *))
     941(lset-union (procedure lset-union () *))
     942(lset-union! (procedure lset-union! () *))
     943(lset-xor (procedure lset-xor () *))
     944(lset-xor! (procedure lset-xor! () *))
     945(lset<= (procedure lset<= () *))
     946(lset= (procedure lset= () *))
     947(make-list (procedure make-list () *))
     948(map (procedure map () *))
     949(map! (procedure map! () *))
     950(map-in-order (procedure map-in-order () *))
     951(member (procedure member () *))
     952(ninth (procedure ninth () *))
     953(not-pair? (procedure not-pair? () *))
     954(null-list? (procedure null-list? () *))
     955(pair-fold (procedure pair-fold () *))
     956(pair-fold-right (procedure pair-fold-right () *))
     957(pair-for-each (procedure pair-for-each () *))
     958(partition (procedure partition () *))
     959(partition! (procedure partition! () *))
     960(proper-list? (procedure proper-list? () *))
     961(reduce (procedure reduce () *))
     962(reduce-right (procedure reduce-right () *))
     963(remove (procedure remove () *))
     964(remove! (procedure remove! () *))
     965(reverse! (procedure reverse! () *))
     966(second (procedure second () *))
     967(seventh (procedure seventh () *))
     968(sixth (procedure sixth () *))
     969(span (procedure span () *))
     970(span! (procedure span! () *))
     971(split-at (procedure split-at () *))
     972(split-at! (procedure split-at! () *))
     973(take (procedure take () *))
     974(take! (procedure take! () *))
     975(take-right (procedure take-right () *))
     976(take-while (procedure take-while () *))
     977(take-while! (procedure take-while! () *))
     978(tenth (procedure tenth () *))
     979(third (procedure third () *))
     980(unfold (procedure unfold () *))
     981(unfold-right (procedure unfold-right () *))
     982(unzip1 (procedure unzip1 () *))
     983(unzip2 (procedure unzip2 () *))
     984(unzip3 (procedure unzip3 () *))
     985(unzip4 (procedure unzip4 () *))
     986(unzip5 (procedure unzip5 () *))
     987(xcons (procedure xcons () *))
     988(zip (procedure zip () *))
    990989
    991990;; srfi-13
    992991
    993 check-substring-spec
    994 kmp-step
    995 make-kmp-restart-vector
    996 string->list
    997 string-any
    998 string-append/shared
    999 string-ci<
    1000 string-ci<=
    1001 string-ci<>
    1002 string-ci=
    1003 string-ci>
    1004 string-ci>=
    1005 string-compare
    1006 string-compare-ci
    1007 string-concatenate
    1008 string-concatenate-reverse
    1009 string-concatenate-reverse/shared
    1010 string-concatenate/shared
    1011 string-contains
    1012 string-contains-ci
    1013 string-copy
    1014 string-copy!
    1015 string-count
    1016 string-delete
    1017 string-downcase
    1018 string-downcase!
    1019 string-drop
    1020 string-drop-right
    1021 string-every
    1022 string-fill!
    1023 string-filter
    1024 string-fold
    1025 string-fold-right
    1026 string-for-each
    1027 string-for-each-index
    1028 string-hash
    1029 string-hash-ci
    1030 string-index
    1031 string-index-right
    1032 string-join
    1033 string-kmp-partial-search
    1034 string-map
    1035 string-map!
    1036 string-null?
    1037 string-pad
    1038 string-pad-right
    1039 string-parse-final-start+end
    1040 string-parse-start+end
    1041 string-prefix-ci?
    1042 string-prefix-length
    1043 string-prefix-length-ci
    1044 string-prefix?
    1045 string-replace
    1046 string-reverse
    1047 string-reverse!
    1048 string-skip
    1049 string-skip-right
    1050 string-suffix-ci?
    1051 string-suffix-length
    1052 string-suffix-length-ci
    1053 string-suffix?
    1054 string-tabulate
    1055 string-take
    1056 string-take-right
    1057 string-titlecase
    1058 string-titlecase!
    1059 string-tokenize
    1060 string-trim
    1061 string-trim-both
    1062 string-trim-right
    1063 string-unfold
    1064 string-unfold-right
    1065 string-upcase
    1066 string-upcase!
    1067 string-xcopy!
    1068 string<
    1069 string<=
    1070 string<>
    1071 string=
    1072 string>
    1073 string>=
    1074 substring-spec-ok?
    1075 substring/shared
    1076 xsubstring
     992(check-substring-spec (procedure check-substring-spec () *))
     993(kmp-step (procedure kmp-step () *))
     994(make-kmp-restart-vector (procedure make-kmp-restart-vector () *))
     995(string->list (procedure string->list () *))
     996(string-any (procedure string-any () *))
     997(string-append/shared (procedure string-append/shared () *))
     998(string-ci< (procedure string-ci< () *))
     999(string-ci<= (procedure string-ci<= () *))
     1000(string-ci<> (procedure string-ci<> () *))
     1001(string-ci= (procedure string-ci= () *))
     1002(string-ci> (procedure string-ci> () *))
     1003(string-ci>= (procedure string-ci>= () *))
     1004(string-compare (procedure string-compare () *))
     1005(string-compare-ci (procedure string-compare-ci () *))
     1006(string-concatenate (procedure string-concatenate () *))
     1007(string-concatenate-reverse (procedure string-concatenate-reverse () *))
     1008(string-concatenate-reverse/shared (procedure string-concatenate-reverse/shared () *))
     1009(string-concatenate/shared (procedure string-concatenate/shared () *))
     1010(string-contains (procedure string-contains () *))
     1011(string-contains-ci (procedure string-contains-ci () *))
     1012(string-copy (procedure string-copy () *))
     1013(string-copy! (procedure string-copy! () *))
     1014(string-count (procedure string-count () *))
     1015(string-delete (procedure string-delete () *))
     1016(string-downcase (procedure string-downcase () *))
     1017(string-downcase! (procedure string-downcase! () *))
     1018(string-drop (procedure string-drop () *))
     1019(string-drop-right (procedure string-drop-right () *))
     1020(string-every (procedure string-every () *))
     1021(string-fill! (procedure string-fill! () *))
     1022(string-filter (procedure string-filter () *))
     1023(string-fold (procedure string-fold () *))
     1024(string-fold-right (procedure string-fold-right () *))
     1025(string-for-each (procedure string-for-each () *))
     1026(string-for-each-index (procedure string-for-each-index () *))
     1027(string-hash (procedure string-hash () *))
     1028(string-hash-ci (procedure string-hash-ci () *))
     1029(string-index (procedure string-index () *))
     1030(string-index-right (procedure string-index-right () *))
     1031(string-join (procedure string-join () *))
     1032(string-kmp-partial-search (procedure string-kmp-partial-search () *))
     1033(string-map (procedure string-map () *))
     1034(string-map! (procedure string-map! () *))
     1035(string-null? (procedure string-null? () *))
     1036(string-pad (procedure string-pad () *))
     1037(string-pad-right (procedure string-pad-right () *))
     1038(string-parse-final-start+end (procedure string-parse-final-start+end () *))
     1039(string-parse-start+end (procedure string-parse-start+end () *))
     1040(string-prefix-ci? (procedure string-prefix-ci? () *))
     1041(string-prefix-length (procedure string-prefix-length () *))
     1042(string-prefix-length-ci (procedure string-prefix-length-ci () *))
     1043(string-prefix? (procedure string-prefix? () *))
     1044(string-replace (procedure string-replace () *))
     1045(string-reverse (procedure string-reverse () *))
     1046(string-reverse! (procedure string-reverse! () *))
     1047(string-skip (procedure string-skip () *))
     1048(string-skip-right (procedure string-skip-right () *))
     1049(string-suffix-ci? (procedure string-suffix-ci? () *))
     1050(string-suffix-length (procedure string-suffix-length () *))
     1051(string-suffix-length-ci (procedure string-suffix-length-ci () *))
     1052(string-suffix? (procedure string-suffix? () *))
     1053(string-tabulate (procedure string-tabulate () *))
     1054(string-take (procedure string-take () *))
     1055(string-take-right (procedure string-take-right () *))
     1056(string-titlecase (procedure string-titlecase () *))
     1057(string-titlecase! (procedure string-titlecase! () *))
     1058(string-tokenize (procedure string-tokenize () *))
     1059(string-trim (procedure string-trim () *))
     1060(string-trim-both (procedure string-trim-both () *))
     1061(string-trim-right (procedure string-trim-right () *))
     1062(string-unfold (procedure string-unfold () *))
     1063(string-unfold-right (procedure string-unfold-right () *))
     1064(string-upcase (procedure string-upcase () *))
     1065(string-upcase! (procedure string-upcase! () *))
     1066(string-xcopy! (procedure string-xcopy! () *))
     1067(string< (procedure string< () *))
     1068(string<= (procedure string<= () *))
     1069(string<> (procedure string<> () *))
     1070(string= (procedure string= () *))
     1071(string> (procedure string> () *))
     1072(string>= (procedure string>= () *))
     1073(substring-spec-ok? (procedure substring-spec-ok? () *))
     1074(substring/shared (procedure substring/shared () *))
     1075(xsubstring (procedure xsubstring () *))
    10771076
    10781077;; srfi-14
    10791078
    1080 ->char-set
    1081 char-set
    1082 char-set->list
    1083 char-set->string
    1084 char-set-adjoin
    1085 char-set-adjoin!
    1086 char-set-any
    1087 char-set-complement
    1088 char-set-complement!
    1089 char-set-contains?
    1090 char-set-copy
    1091 char-set-count
    1092 char-set-cursor
    1093 char-set-cursor-next
    1094 char-set-delete
    1095 char-set-delete!
    1096 char-set-diff+intersection
    1097 char-set-diff+intersection!
    1098 char-set-difference
    1099 char-set-difference!
    1100 char-set-every
    1101 char-set-filter
    1102 char-set-filter!
    1103 char-set-fold
    1104 char-set-for-each
    1105 char-set-hash
    1106 char-set-intersection
    1107 char-set-intersection!
    1108 char-set-map
    1109 char-set-ref
    1110 char-set-size
    1111 char-set-unfold
    1112 char-set-unfold!
    1113 char-set-union
    1114 char-set-union!
    1115 char-set-xor
    1116 char-set-xor!
    1117 char-set:ascii
    1118 char-set:blank
    1119 char-set:digit
    1120 char-set:empty
    1121 char-set:full
    1122 char-set:graphic
    1123 char-set:hex-digit
    1124 char-set:iso-control
    1125 char-set:letter
    1126 char-set:letter+digit
    1127 char-set:lower-case
    1128 char-set:printing
    1129 char-set:punctuation
    1130 char-set:s
    1131 char-set:symbol
    1132 char-set:title-case
    1133 char-set:upper-case
    1134 char-set:whitespace
    1135 char-set<=
    1136 char-set=
    1137 char-set?
    1138 end-of-char-set?
    1139 list->char-set
    1140 list->char-set!
    1141 make-char-set
    1142 string->char-set
    1143 string->char-set!
    1144 ucs-range->char-set
    1145 ucs-range->char-set!
     1079(->char-set (procedure ->char-set () *))
     1080(char-set (procedure char-set () *))
     1081(char-set->list (procedure char-set->list () *))
     1082(char-set->string (procedure char-set->string () *))
     1083(char-set-adjoin (procedure char-set-adjoin () *))
     1084(char-set-adjoin! (procedure char-set-adjoin! () *))
     1085(char-set-any (procedure char-set-any () *))
     1086(char-set-complement (procedure char-set-complement () *))
     1087(char-set-complement! (procedure char-set-complement! () *))
     1088(char-set-contains? (procedure char-set-contains? () *))
     1089(char-set-copy (procedure char-set-copy () *))
     1090(char-set-count (procedure char-set-count () *))
     1091(char-set-cursor (procedure char-set-cursor () *))
     1092(char-set-cursor-next (procedure char-set-cursor-next () *))
     1093(char-set-delete (procedure char-set-delete () *))
     1094(char-set-delete! (procedure char-set-delete! () *))
     1095(char-set-diff+intersection (procedure char-set-diff+intersection () *))
     1096(char-set-diff+intersection! (procedure char-set-diff+intersection! () *))
     1097(char-set-difference (procedure char-set-difference () *))
     1098(char-set-difference! (procedure char-set-difference! () *))
     1099(char-set-every (procedure char-set-every () *))
     1100(char-set-filter (procedure char-set-filter () *))
     1101(char-set-filter! (procedure char-set-filter! () *))
     1102(char-set-fold (procedure char-set-fold () *))
     1103(char-set-for-each (procedure char-set-for-each () *))
     1104(char-set-hash (procedure char-set-hash () *))
     1105(char-set-intersection (procedure char-set-intersection () *))
     1106(char-set-intersection! (procedure char-set-intersection! () *))
     1107(char-set-map (procedure char-set-map () *))
     1108(char-set-ref (procedure char-set-ref () *))
     1109(char-set-size (procedure char-set-size () *))
     1110(char-set-unfold (procedure char-set-unfold () *))
     1111(char-set-unfold! (procedure char-set-unfold! () *))
     1112(char-set-union (procedure char-set-union () *))
     1113(char-set-union! (procedure char-set-union! () *))
     1114(char-set-xor (procedure char-set-xor () *))
     1115(char-set-xor! (procedure char-set-xor! () *))
     1116(char-set:ascii (procedure char-set:ascii () *))
     1117(char-set:blank (procedure char-set:blank () *))
     1118(char-set:digit (procedure char-set:digit () *))
     1119(char-set:empty (procedure char-set:empty () *))
     1120(char-set:full (procedure char-set:full () *))
     1121(char-set:graphic (procedure char-set:graphic () *))
     1122(char-set:hex-digit (procedure char-set:hex-digit () *))
     1123(char-set:iso-control (procedure char-set:iso-control () *))
     1124(char-set:letter (procedure char-set:letter () *))
     1125(char-set:letter+digit (procedure char-set:letter+digit () *))
     1126(char-set:lower-case (procedure char-set:lower-case () *))
     1127(char-set:printing (procedure char-set:printing () *))
     1128(char-set:punctuation (procedure char-set:punctuation () *))
     1129(char-set:s (procedure char-set:s () *))
     1130(char-set:symbol (procedure char-set:symbol () *))
     1131(char-set:title-case (procedure char-set:title-case () *))
     1132(char-set:upper-case (procedure char-set:upper-case () *))
     1133(char-set:whitespace (procedure char-set:whitespace () *))
     1134(char-set<= (procedure char-set<= () *))
     1135(char-set= (procedure char-set= () *))
     1136(char-set? (procedure char-set? () *))
     1137(end-of-char-set? (procedure end-of-char-set? () *))
     1138(list->char-set (procedure list->char-set () *))
     1139(list->char-set! (procedure list->char-set! () *))
     1140(make-char-set (procedure make-char-set () *))
     1141(string->char-set (procedure string->char-set () *))
     1142(string->char-set! (procedure string->char-set! () *))
     1143(ucs-range->char-set (procedure ucs-range->char-set () *))
     1144(ucs-range->char-set! (procedure ucs-range->char-set! () *))
    11461145
    11471146;; srfi-18
    11481147
    1149 abandoned-mutex-exception?
    1150 condition-variable-broadcast!
    1151 condition-variable-signal!
    1152 condition-variable-specific
    1153 condition-variable-specific-set!
    1154 condition-variable?
    1155 current-thread
    1156 current-time
    1157 join-timeout-exception?
    1158 make-condition-variable
    1159 make-mutex
    1160 make-thread
    1161 milliseconds->time
    1162 mutex-lock!
    1163 mutex-name
    1164 mutex-specific
    1165 mutex-specific-set!
    1166 mutex-state
    1167 mutex-unlock!
    1168 mutex?
    1169 raise
    1170 seconds->time
    1171 srfi-18:current-time
    1172 srfi-18:time?
    1173 terminated-thread-exception?
    1174 thread-join!
    1175 thread-name
    1176 thread-quantum
    1177 thread-quantum-set!
    1178 thread-resume!
    1179 thread-signal!
    1180 thread-sleep!
    1181 thread-specific
    1182 thread-specific-set!
    1183 thread-start!
    1184 thread-state
    1185 thread-suspend!
    1186 thread-terminate!
    1187 thread-wait-for-i/o!
    1188 thread-yield!
    1189 thread?
    1190 time->milliseconds
    1191 time->seconds
    1192 time?
    1193 uncaught-exception-reason
    1194 uncaught-exception?
     1148(abandoned-mutex-exception? (procedure abandoned-mutex-exception? () *))
     1149(condition-variable-broadcast! (procedure condition-variable-broadcast! () *))
     1150(condition-variable-signal! (procedure condition-variable-signal! () *))
     1151(condition-variable-specific (procedure condition-variable-specific () *))
     1152(condition-variable-specific-set! (procedure condition-variable-specific-set! () *))
     1153(condition-variable? (procedure condition-variable? () *))
     1154(current-thread (procedure current-thread () *))
     1155(current-time (procedure current-time () *))
     1156(join-timeout-exception? (procedure join-timeout-exception? () *))
     1157(make-condition-variable (procedure make-condition-variable () *))
     1158(make-mutex (procedure make-mutex () *))
     1159(make-thread (procedure make-thread () *))
     1160(milliseconds->time (procedure milliseconds->time () *))
     1161(mutex-lock! (procedure mutex-lock! () *))
     1162(mutex-name (procedure mutex-name () *))
     1163(mutex-specific (procedure mutex-specific () *))
     1164(mutex-specific-set! (procedure mutex-specific-set! () *))
     1165(mutex-state (procedure mutex-state () *))
     1166(mutex-unlock! (procedure mutex-unlock! () *))
     1167(mutex? (procedure mutex? () *))
     1168(raise (procedure raise () *))
     1169(seconds->time (procedure seconds->time () *))
     1170(srfi-18:current-time (procedure srfi-18:current-time () *))
     1171(srfi-18:time? (procedure srfi-18:time? () *))
     1172(terminated-thread-exception? (procedure terminated-thread-exception? () *))
     1173(thread-join! (procedure thread-join! () *))
     1174(thread-name (procedure thread-name () *))
     1175(thread-quantum (procedure thread-quantum () *))
     1176(thread-quantum-set! (procedure thread-quantum-set! () *))
     1177(thread-resume! (procedure thread-resume! () *))
     1178(thread-signal! (procedure thread-signal! () *))
     1179(thread-sleep! (procedure thread-sleep! () *))
     1180(thread-specific (procedure thread-specific () *))
     1181(thread-specific-set! (procedure thread-specific-set! () *))
     1182(thread-start! (procedure thread-start! () *))
     1183(thread-state (procedure thread-state () *))
     1184(thread-suspend! (procedure thread-suspend! () *))
     1185(thread-terminate! (procedure thread-terminate! () *))
     1186(thread-wait-for-i/o! (procedure thread-wait-for-i/o! () *))
     1187(thread-yield! (procedure thread-yield! () *))
     1188(thread? (procedure thread? () *))
     1189(time->milliseconds (procedure time->milliseconds () *))
     1190(time->seconds (procedure time->seconds () *))
     1191(time? (procedure time? () *))
     1192(uncaught-exception-reason (procedure uncaught-exception-reason () *))
     1193(uncaught-exception? (procedure uncaught-exception? () *))
    11951194
    11961195;; srfi-4
    11971196
    1198 blob->f32vector
    1199 blob->f32vector/shared
    1200 blob->f64vector
    1201 blob->f64vector/shared
    1202 blob->s16vector
    1203 blob->s16vector/shared
    1204 blob->s32vector
    1205 blob->s32vector/shared
    1206 blob->s8vector
    1207 blob->s8vector/shared
    1208 blob->u16vector
    1209 blob->u16vector/shared
    1210 blob->u32vector
    1211 blob->u32vector/shared
    1212 blob->u8vector
    1213 blob->u8vector/shared
    1214 byte-vector->f32vector
    1215 byte-vector->f64vector
    1216 byte-vector->s16vector
    1217 byte-vector->s32vector
    1218 byte-vector->s8vector
    1219 byte-vector->u16vector
    1220 byte-vector->u32vector
    1221 byte-vector->u8vector
    1222 f32vector
    1223 f32vector->blob
    1224 f32vector->blob/shared
    1225 f32vector->byte-vector
    1226 f32vector->list
    1227 f32vector-length
    1228 f32vector-ref
    1229 f32vector-set!
    1230 f32vector?
    1231 f64vector
    1232 f64vector->blob
    1233 f64vector->blob/shared
    1234 f64vector->byte-vector
    1235 f64vector->list
    1236 f64vector-length
    1237 f64vector-ref
    1238 f64vector-set!
    1239 f64vector?
    1240 list->f32vector
    1241 list->f64vector
    1242 list->s16vector
    1243 list->s32vector
    1244 list->s8vector
    1245 list->u16vector
    1246 list->u32vector
    1247 list->u8vector
    1248 make-f32vector
    1249 make-f64vector
    1250 make-s16vector
    1251 make-s32vector
    1252 make-s8vector
    1253 make-u16vector
    1254 make-u32vector
    1255 make-u8vector
    1256 read-u8vector
    1257 read-u8vector!
    1258 release-number-vector
    1259 s16vector
    1260 s16vector->blob
    1261 s16vector->blob/shared
    1262 s16vector->byte-vector
    1263 s16vector->list
    1264 s16vector-length
    1265 s16vector-ref
    1266 s16vector-set!
    1267 s16vector?
    1268 s32vector
    1269 s32vector->blob
    1270 s32vector->blob/shared
    1271 s32vector->byte-vector
    1272 s32vector->list
    1273 s32vector-length
    1274 s32vector-ref
    1275 s32vector-set!
    1276 s32vector?
    1277 s8vector
    1278 s8vector->blob
    1279 s8vector->blob/shared
    1280 s8vector->byte-vector
    1281 s8vector->list
    1282 s8vector-length
    1283 s8vector-ref
    1284 s8vector-set!
    1285 s8vector?
    1286 subf32vector
    1287 subf64vector
    1288 subs16vector
    1289 subs32vector
    1290 subs8vector
    1291 subu16vector
    1292 subu32vector
    1293 subu8vector
    1294 u16vector
    1295 u16vector->blob
    1296 u16vector->blob/shared
    1297 u16vector->byte-vector
    1298 u16vector->list
    1299 u16vector-length
    1300 u16vector-ref
    1301 u16vector-set!
    1302 u16vector?
    1303 u32vector
    1304 u32vector->blob
    1305 u32vector->blob/shared
    1306 u32vector->byte-vector
    1307 u32vector->list
    1308 u32vector-length
    1309 u32vector-ref
    1310 u32vector-set!
    1311 u32vector?
    1312 u8vector
    1313 u8vector->blob
    1314 u8vector->blob/shared
    1315 u8vector->byte-vector
    1316 u8vector->list
    1317 u8vector-length
    1318 u8vector-ref
    1319 u8vector-set!
    1320 u8vector?
    1321 write-u8vector
     1197(blob->f32vector (procedure blob->f32vector () *))
     1198(blob->f32vector/shared (procedure blob->f32vector/shared () *))
     1199(blob->f64vector (procedure blob->f64vector () *))
     1200(blob->f64vector/shared (procedure blob->f64vector/shared () *))
     1201(blob->s16vector (procedure blob->s16vector () *))
     1202(blob->s16vector/shared (procedure blob->s16vector/shared () *))
     1203(blob->s32vector (procedure blob->s32vector () *))
     1204(blob->s32vector/shared (procedure blob->s32vector/shared () *))
     1205(blob->s8vector (procedure blob->s8vector () *))
     1206(blob->s8vector/shared (procedure blob->s8vector/shared () *))
     1207(blob->u16vector (procedure blob->u16vector () *))
     1208(blob->u16vector/shared (procedure blob->u16vector/shared () *))
     1209(blob->u32vector (procedure blob->u32vector () *))
     1210(blob->u32vector/shared (procedure blob->u32vector/shared () *))
     1211(blob->u8vector (procedure blob->u8vector () *))
     1212(blob->u8vector/shared (procedure blob->u8vector/shared () *))
     1213(byte-vector->f32vector (procedure byte-vector->f32vector () *))
     1214(byte-vector->f64vector (procedure byte-vector->f64vector () *))
     1215(byte-vector->s16vector (procedure byte-vector->s16vector () *))
     1216(byte-vector->s32vector (procedure byte-vector->s32vector () *))
     1217(byte-vector->s8vector (procedure byte-vector->s8vector () *))
     1218(byte-vector->u16vector (procedure byte-vector->u16vector () *))
     1219(byte-vector->u32vector (procedure byte-vector->u32vector () *))
     1220(byte-vector->u8vector (procedure byte-vector->u8vector () *))
     1221(f32vector (procedure f32vector () *))
     1222(f32vector->blob (procedure f32vector->blob () *))
     1223(f32vector->blob/shared (procedure f32vector->blob/shared () *))
     1224(f32vector->byte-vector (procedure f32vector->byte-vector () *))
     1225(f32vector->list (procedure f32vector->list () *))
     1226(f32vector-length (procedure f32vector-length () *))
     1227(f32vector-ref (procedure f32vector-ref () *))
     1228(f32vector-set! (procedure f32vector-set! () *))
     1229(f32vector? (procedure f32vector? () *))
     1230(f64vector (procedure f64vector () *))
     1231(f64vector->blob (procedure f64vector->blob () *))
     1232(f64vector->blob/shared (procedure f64vector->blob/shared () *))
     1233(f64vector->byte-vector (procedure f64vector->byte-vector () *))
     1234(f64vector->list (procedure f64vector->list () *))
     1235(f64vector-length (procedure f64vector-length () *))
     1236(f64vector-ref (procedure f64vector-ref () *))
     1237(f64vector-set! (procedure f64vector-set! () *))
     1238(f64vector? (procedure f64vector? () *))
     1239(list->f32vector (procedure list->f32vector () *))
     1240(list->f64vector (procedure list->f64vector () *))
     1241(list->s16vector (procedure list->s16vector () *))
     1242(list->s32vector (procedure list->s32vector () *))
     1243(list->s8vector (procedure list->s8vector () *))
     1244(list->u16vector (procedure list->u16vector () *))
     1245(list->u32vector (procedure list->u32vector () *))
     1246(list->u8vector (procedure list->u8vector () *))
     1247(make-f32vector (procedure make-f32vector () *))
     1248(make-f64vector (procedure make-f64vector () *))
     1249(make-s16vector (procedure make-s16vector () *))
     1250(make-s32vector (procedure make-s32vector () *))
     1251(make-s8vector (procedure make-s8vector () *))
     1252(make-u16vector (procedure make-u16vector () *))
     1253(make-u32vector (procedure make-u32vector () *))
     1254(make-u8vector (procedure make-u8vector () *))
     1255(read-u8vector (procedure read-u8vector () *))
     1256(read-u8vector! (procedure read-u8vector! () *))
     1257(release-number-vector (procedure release-number-vector () *))
     1258(s16vector (procedure s16vector () *))
     1259(s16vector->blob (procedure s16vector->blob () *))
     1260(s16vector->blob/shared (procedure s16vector->blob/shared () *))
     1261(s16vector->byte-vector (procedure s16vector->byte-vector () *))
     1262(s16vector->list (procedure s16vector->list () *))
     1263(s16vector-length (procedure s16vector-length () *))
     1264(s16vector-ref (procedure s16vector-ref () *))
     1265(s16vector-set! (procedure s16vector-set! () *))
     1266(s16vector? (procedure s16vector? () *))
     1267(s32vector (procedure s32vector () *))
     1268(s32vector->blob (procedure s32vector->blob () *))
     1269(s32vector->blob/shared (procedure s32vector->blob/shared () *))
     1270(s32vector->byte-vector (procedure s32vector->byte-vector () *))
     1271(s32vector->list (procedure s32vector->list () *))
     1272(s32vector-length (procedure s32vector-length () *))
     1273(s32vector-ref (procedure s32vector-ref () *))
     1274(s32vector-set! (procedure s32vector-set! () *))
     1275(s32vector? (procedure s32vector? () *))
     1276(s8vector (procedure s8vector () *))
     1277(s8vector->blob (procedure s8vector->blob () *))
     1278(s8vector->blob/shared (procedure s8vector->blob/shared () *))
     1279(s8vector->byte-vector (procedure s8vector->byte-vector () *))
     1280(s8vector->list (procedure s8vector->list () *))
     1281(s8vector-length (procedure s8vector-length () *))
     1282(s8vector-ref (procedure s8vector-ref () *))
     1283(s8vector-set! (procedure s8vector-set! () *))
     1284(s8vector? (procedure s8vector? () *))
     1285(subf32vector (procedure subf32vector () *))
     1286(subf64vector (procedure subf64vector () *))
     1287(subs16vector (procedure subs16vector () *))
     1288(subs32vector (procedure subs32vector () *))
     1289(subs8vector (procedure subs8vector () *))
     1290(subu16vector (procedure subu16vector () *))
     1291(subu32vector (procedure subu32vector () *))
     1292(subu8vector (procedure subu8vector () *))
     1293(u16vector (procedure u16vector () *))
     1294(u16vector->blob (procedure u16vector->blob () *))
     1295(u16vector->blob/shared (procedure u16vector->blob/shared () *))
     1296(u16vector->byte-vector (procedure u16vector->byte-vector () *))
     1297(u16vector->list (procedure u16vector->list () *))
     1298(u16vector-length (procedure u16vector-length () *))
     1299(u16vector-ref (procedure u16vector-ref () *))
     1300(u16vector-set! (procedure u16vector-set! () *))
     1301(u16vector? (procedure u16vector? () *))
     1302(u32vector (procedure u32vector () *))
     1303(u32vector->blob (procedure u32vector->blob () *))
     1304(u32vector->blob/shared (procedure u32vector->blob/shared () *))
     1305(u32vector->byte-vector (procedure u32vector->byte-vector () *))
     1306(u32vector->list (procedure u32vector->list () *))
     1307(u32vector-length (procedure u32vector-length () *))
     1308(u32vector-ref (procedure u32vector-ref () *))
     1309(u32vector-set! (procedure u32vector-set! () *))
     1310(u32vector? (procedure u32vector? () *))
     1311(u8vector (procedure u8vector () *))
     1312(u8vector->blob (procedure u8vector->blob () *))
     1313(u8vector->blob/shared (procedure u8vector->blob/shared () *))
     1314(u8vector->byte-vector (procedure u8vector->byte-vector () *))
     1315(u8vector->list (procedure u8vector->list () *))
     1316(u8vector-length (procedure u8vector-length () *))
     1317(u8vector-ref (procedure u8vector-ref () *))
     1318(u8vector-set! (procedure u8vector-set! () *))
     1319(u8vector? (procedure u8vector? () *))
     1320(write-u8vector (procedure write-u8vector () *))
    13221321
    13231322;; srfi-69
    13241323
    1325 alist->hash-table
    1326 eq?-hash
    1327 equal?-hash
    1328 eqv?-hash
    1329 hash
    1330 hash-by-identity
    1331 hash-table->alist
    1332 hash-table-clear!
    1333 hash-table-copy
    1334 hash-table-delete!
    1335 hash-table-equivalence-function
    1336 hash-table-exists?
    1337 hash-table-fold
    1338 hash-table-for-each
    1339 hash-table-has-initial?
    1340 hash-table-hash-function
    1341 hash-table-initial
    1342 hash-table-keys
    1343 hash-table-map
    1344 hash-table-max-load
    1345 hash-table-merge
    1346 hash-table-merge!
    1347 hash-table-min-load
    1348 hash-table-ref
    1349 hash-table-ref/default
    1350 hash-table-remove!
    1351 hash-table-set!
    1352 hash-table-size
    1353 hash-table-update!
    1354 hash-table-update!/default
    1355 hash-table-values
    1356 hash-table-walk
    1357 hash-table-weak-keys
    1358 hash-table-weak-values
    1359 hash-table?
    1360 keyword-hash
    1361 make-hash-table
    1362 number-hash
    1363 object-uid-hash
    1364 string-ci-hash
    1365 string-hash
    1366 symbol-hash
     1324(alist->hash-table (procedure alist->hash-table () *))
     1325(eq?-hash (procedure eq?-hash () *))
     1326(equal?-hash (procedure equal?-hash () *))
     1327(eqv?-hash (procedure eqv?-hash () *))
     1328(hash (procedure hash () *))
     1329(hash-by-identity (procedure hash-by-identity () *))
     1330(hash-table->alist (procedure hash-table->alist () *))
     1331(hash-table-clear! (procedure hash-table-clear! () *))
     1332(hash-table-copy (procedure hash-table-copy () *))
     1333(hash-table-delete! (procedure hash-table-delete! () *))
     1334(hash-table-equivalence-function (procedure hash-table-equivalence-function () *))
     1335(hash-table-exists? (procedure hash-table-exists? () *))
     1336(hash-table-fold (procedure hash-table-fold () *))
     1337(hash-table-for-each (procedure hash-table-for-each () *))
     1338(hash-table-has-initial? (procedure hash-table-has-initial? () *))
     1339(hash-table-hash-function (procedure hash-table-hash-function () *))
     1340(hash-table-initial (procedure hash-table-initial () *))
     1341(hash-table-keys (procedure hash-table-keys () *))
     1342(hash-table-map (procedure hash-table-map () *))
     1343(hash-table-max-load (procedure hash-table-max-load () *))
     1344(hash-table-merge (procedure hash-table-merge () *))
     1345(hash-table-merge! (procedure hash-table-merge! () *))
     1346(hash-table-min-load (procedure hash-table-min-load () *))
     1347(hash-table-ref (procedure hash-table-ref () *))
     1348(hash-table-ref/default (procedure hash-table-ref/default () *))
     1349(hash-table-remove! (procedure hash-table-remove! () *))
     1350(hash-table-set! (procedure hash-table-set! () *))
     1351(hash-table-size (procedure hash-table-size () *))
     1352(hash-table-update! (procedure hash-table-update! () *))
     1353(hash-table-update!/default (procedure hash-table-update!/default () *))
     1354(hash-table-values (procedure hash-table-values () *))
     1355(hash-table-walk (procedure hash-table-walk () *))
     1356(hash-table-weak-keys (procedure hash-table-weak-keys () *))
     1357(hash-table-weak-values (procedure hash-table-weak-values () *))
     1358(hash-table? (procedure hash-table? () *))
     1359(keyword-hash (procedure keyword-hash () *))
     1360(make-hash-table (procedure make-hash-table () *))
     1361(number-hash (procedure number-hash () *))
     1362(object-uid-hash (procedure object-uid-hash () *))
     1363(string-ci-hash (procedure string-ci-hash () *))
     1364(string-hash (procedure string-hash () *))
     1365(symbol-hash (procedure symbol-hash () *))
    13671366
    13681367;; tcp
    13691368
    1370 tcp-abandon-port
    1371 tcp-accept
    1372 tcp-accept-ready?
    1373 tcp-accept-timeout
    1374 tcp-addresses
    1375 tcp-buffer-size
    1376 tcp-close
    1377 tcp-connect
    1378 tcp-connect-timeout
    1379 tcp-listen
    1380 tcp-listener-fileno
    1381 tcp-listener-port
    1382 tcp-listener?
    1383 tcp-port-numbers
    1384 tcp-read-timeout
    1385 tcp-write-timeout
     1369(tcp-abandon-port (procedure tcp-abandon-port () *))
     1370(tcp-accept (procedure tcp-accept () *))
     1371(tcp-accept-ready? (procedure tcp-accept-ready? () *))
     1372(tcp-accept-timeout (procedure tcp-accept-timeout () *))
     1373(tcp-addresses (procedure tcp-addresses () *))
     1374(tcp-buffer-size (procedure tcp-buffer-size () *))
     1375(tcp-close (procedure tcp-close () *))
     1376(tcp-connect (procedure tcp-connect () *))
     1377(tcp-connect-timeout (procedure tcp-connect-timeout () *))
     1378(tcp-listen (procedure tcp-listen () *))
     1379(tcp-listener-fileno (procedure tcp-listener-fileno () *))
     1380(tcp-listener-port (procedure tcp-listener-port () *))
     1381(tcp-listener? (procedure tcp-listener? () *))
     1382(tcp-port-numbers (procedure tcp-port-numbers () *))
     1383(tcp-read-timeout (procedure tcp-read-timeout () *))
     1384(tcp-write-timeout (procedure tcp-write-timeout () *))
    13861385
    13871386;; utils
    13881387
    1389 for-each-argv-line
    1390 for-each-line
    1391 read-all
    1392 system*
    1393 qs
     1388(for-each-argv-line (procedure for-each-argv-line () *))
     1389(for-each-line (procedure for-each-line () *))
     1390(read-all (procedure read-all () *))
     1391(system* (procedure system* () *))
     1392(qs (procedure qs () *))
    13941393
    13951394;; missing: setup-api, setup-download
Note: See TracChangeset for help on using the changeset viewer.