Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Tobias Decking
GHC
Commits
2246c514
Commit
2246c514
authored
Oct 24, 2006
by
Simon Marlow
Browse files
fix a printf format warning
parent
220dec86
Changes
1
Hide whitespace changes
Inline
Side-by-side
rts/STM.c
View file @
2246c514
...
...
@@ -906,7 +906,7 @@ static volatile StgBool token_locked = FALSE;
static
void
getTokenBatch
(
Capability
*
cap
)
{
while
(
cas
((
void
*
)
&
token_locked
,
FALSE
,
TRUE
)
==
TRUE
)
{
/* nothing */
}
max_commits
+=
TOKEN_BATCH_SIZE
;
TRACE
(
"%p : cap got token batch, max_commits=%
lld"
,
cap
,
max_commits
);
TRACE
(
"%p : cap got token batch, max_commits=%
"
FMT_Int64
,
cap
,
max_commits
);
cap
->
transaction_tokens
=
TOKEN_BATCH_SIZE
;
token_locked
=
FALSE
;
}
...
...
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