[armedbear-devel] BUG: threads:mailbox-send

[Uchida Yasuo]

Hi folks,

The function  threads:mailbox-send seems not working.
In the example below, (threads:mailbox-peek mbox) returns NIL.
It should be "item".
The attatched patch fixes this problem.


Armed Bear Common Lisp 1.1.0-dev-svn-13992
Java 1.6.0_24 Sun Microsystems Inc.
OpenJDK 64-Bit Server VM
Low-level initialization completed in 1.396 seconds.
Startup completed in 4.0 seconds.
Type ":help" for a list of available commands.
CL-USER(1): (setf mbox (threads:make-mailbox))
#S(MAILBOX :QUEUE NIL)
CL-USER(2): (threads:mailbox-send mbox "item")
NIL
CL-USER(3): (threads:mailbox-peek mbox)
NIL
T
CL-USER(4): 


Many thanks.
--
Yasuo Uchida
-------------- next part --------------
A non-text attachment was scrubbed...
Name: mods.diff
Type: text/x-patch
Size: 422 bytes
Desc: not available
URL: <https://mailman.common-lisp.net/pipermail/armedbear-devel/attachments/20120705/d91aece8/attachment.bin>