Permalink
Browse files

Allegro: fix call to MAKE-LOCK

  • Loading branch information...
1 parent ca90e14 commit 09b5c044c21ee24f8e6bdd5c72b5ad71f8f43fb8 @sionescu committed Mar 26, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/impl-allegro.lisp
View
@@ -61,7 +61,7 @@ Distributed under the MIT license (see LICENSE file)
(defvar *thread-results* (make-hash-table :weak-keys t))
-(defvar *thread-join-lock* (make-lock :name "Bordeaux threads join lock"))
+(defvar *thread-join-lock* (make-lock "Bordeaux threads join lock"))
(defun %make-thread (function name)
(mp:process-run-function

0 comments on commit 09b5c04

Please sign in to comment.