(declare (ignore name value))
nil)
-#!+(and sb-lutex sb-thread)
-(defun make-lutex () nil)
-
(defmacro with-mutex ((mutex) &body body)
(declare (ignore mutex))
`(locally ,@body))
(declare (ignore mutex))
`(locally ,@body))
-(defun make-spinlock (&key name value)
- (declare (ignore name value))
- nil)
-
-(defun get-spinlock (spinlock)
- (declare (ignore spinlock))
- t)
-
-(defun release-spinlock (spinlock)
- (declare (ignore spinlock))
- nil)
-
-(defmacro with-spinlock ((spinlock) &body body)
- (declare (ignore spinlock))
- `(locally ,@body))