Permalink
Browse files

once-only not needed in with-thread

  • Loading branch information...
1 parent 230e187 commit fb32157733abbcb7e315f14b3b68951ee4bfd4c3 @lmj committed May 3, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/thread-util.lisp
View
@@ -30,7 +30,7 @@
(in-package #:lparallel.thread-util)
-(defmacro/once with-thread ((&key &once bindings &once name) &body body)
+(defmacro with-thread ((&key bindings name) &body body)
`(let1 *default-special-bindings* ,bindings
(make-thread (lambda () ,@body) :name ,name)))

0 comments on commit fb32157

Please sign in to comment.