a3x/whatsxmpp
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

name your damn locks, people

Browse source
This commit is contained in:
eta 2020-04-06 21:22:41 +01:00
parent 297170ae6b
commit 2a1e7303d0
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
stuff.lisp
View file

@ -25,10 +25,10 @@
:initarg :socket :initarg :socket
:accessor component-socket) :accessor component-socket)
(socket-lock (socket-lock
:initform (bt:make-recursive-lock) :initform (bt:make-recursive-lock "component socket lock")
:accessor component-socket-lock) :accessor component-socket-lock)
(data-lock (data-lock
:initform (bt:make-recursive-lock) :initform (bt:make-recursive-lock "component data lock")
:accessor component-data-lock) :accessor component-data-lock)
(sink (sink
:initarg :sink :initarg :sink