mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-20 22:29:16 +02:00
25 lines
968 B
Text
25 lines
968 B
Text
|
|
(define-module (srfi 18)
|
|
(export
|
|
current-thread thread? make-thread thread-name
|
|
thread-specific thread-specific-set! thread-start!
|
|
thread-yield! thread-sleep! thread-terminate!
|
|
thread-join! mutex? make-mutex mutex-name
|
|
mutex-specific mutex-specific-set! mutex-state
|
|
mutex-lock! mutex-unlock! condition-variable?
|
|
make-condition-variable condition-variable-name
|
|
condition-variable-specific condition-variable-specific-set!
|
|
condition-variable-signal! condition-variable-broadcast!
|
|
current-time time? time->seconds seconds->time
|
|
current-exception-handler with-exception-handler raise
|
|
join-timeout-exception? abandoned-mutex-exception?
|
|
terminated-thread-exception? uncaught-exception?
|
|
uncaught-exception-reason)
|
|
(import-immutable (scheme)
|
|
(srfi 9)
|
|
(chibi ast)
|
|
(chibi time))
|
|
(include "18/types.scm")
|
|
(include-shared "18/threads")
|
|
(include "18/interface.scm"))
|
|
|