mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-29 19:30:36 +02:00
Code Activity

SRFI-18: Export 'current-thread'.

Browse source 
Fixes <http://debbugs.gnu.org/16890>.
Reported by Xin Wang <dram.wang@gmail.com>.

* module/srfi/srfi-18.scm: Reexport 'current-thread'.
* THANKS: Add "Xin Wang" to fixes section.
This commit is contained in:
Mark H Weaver 2014-02-27 21:31:57 -05:00
parent bc8e6d7d8c
commit 6587bcfa53
2 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

1
THANKS
View file

@ -183,6 +183,7 @@ For fixes or providing information which led to a fix:
Andreas Vögele
Michael Talbot-Wilson
Michael Tuexen
Xin Wang
Thomas Wawrzinek
Mark H. Weaver
Göran Weinholt

6
module/srfi/srfi-18.scm
View file

@ -1,6 +1,6 @@
;;; srfi-18.scm --- Multithreading support
;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc.
;; Copyright (C) 2008, 2009, 2010, 2014 Free Software Foundation, Inc.
;;
;; This library is free software; you can redistribute it and/or
;; modify it under the terms of the GNU Lesser General Public
@ -82,7 +82,7 @@
uncaught-exception?
uncaught-exception-reason
)
:re-export (thread? mutex? condition-variable?)
:re-export (current-thread thread? mutex? condition-variable?)
:replace (current-time
make-thread
make-mutex
@ -380,4 +380,4 @@
(cons (inexact->exact fx)
(inexact->exact (truncate (* (- x fx) 1000000)))))))
;; srfi-18.scm ends here
;; srfi-18.scm ends here