Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Zach Beane
zacl
Commits
5640d189
Commit
5640d189
authored
Nov 29, 2016
by
Zach Beane
Browse files
Implement mp:process-lock with bordeaux-threads.
parent
721c2446
Changes
1
Hide whitespace changes
Inline
Side-by-side
package-mp.lisp
View file @
5640d189
...
...
@@ -7,10 +7,10 @@
(
defmacro
mp:with-process-lock
(
lock-form
&body
body
)
(
declare
(
ignorable
lock-form
))
`
(
progn
,@
body
))
`
(
with-lock-held
(
,
lock-form
)
,@
body
))
(
defun
mp:make-process-lock
(
&key
name
)
(
cons
:mp
-lock
name
))
(
make
-lock
name
))
(
defmacro
mp:without-scheduling
(
&body
body
)
`
(
progn
,@
body
))
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment