Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Allegro: fix call to MAKE-LOCK

  • Loading branch information...
commit 09b5c044c21ee24f8e6bdd5c72b5ad71f8f43fb8 1 parent ca90e14
@sionescu authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/impl-allegro.lisp
View
2  src/impl-allegro.lisp
@@ -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
Please sign in to comment.
Something went wrong with that request. Please try again.