Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-09 14:07:34 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Added thread-terminate

Browse source
This commit is contained in:
Justin Ethier 2015-12-19 23:59:52 -05:00
parent 72e3a2e91b
commit 00210623d7
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
scheme/base.sld
View file

@ -9,6 +9,7 @@
thread-specific-set!
thread-start!
thread-yield!
thread-terminate!
;; END threads
; TODO: need filter for the next two. also, they really belong in SRFI-1, not here
;delete
@ -684,6 +685,6 @@
(mutator-id (Cyc-spawn-thread! thunk)))
(vector-set! t 2 mutator-id)))
(define (thread-yield!) (thread-sleep! 1))
;; TODO: thread-terminate!
(define (thread-terminate!) (Cyc-end-thread!))
;; TODO: thread-join!
))