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
ae8fc4d5
Commit
ae8fc4d5
authored
Nov 10, 2006
by
sven.panne@aedion.de
Browse files
Added a workaround for format specifier mismatch
parent
f4510d27
Changes
1
Hide whitespace changes
Inline
Side-by-side
rts/Hpc.c
View file @
ae8fc4d5
...
...
@@ -32,6 +32,13 @@ typedef struct _Info {
struct
_Info
*
next
;
}
Info
;
// This is a cruel hack, we should completely redesign the format specifier handling in the RTS.
#if SIZEOF_LONG == 8
#define PRIuWORD64 "lu"
#else
#define PRIuWORD64 "llu"
#endif
Info
*
modules
=
0
;
Info
*
nextModule
=
0
;
StgWord64
*
tixBoxes
=
0
;
// local copy of tixBoxes array, from file.
...
...
@@ -314,7 +321,7 @@ exitHpc(void) {
}
if
(
tmpModule
->
tixArr
)
{
fprintf
(
f
,
"%
lld"
,
tmpModule
->
tixArr
[
i
]);
fprintf
(
f
,
"%
"
PRIuWORD64
,
tmpModule
->
tixArr
[
i
]);
}
else
{
fprintf
(
f
,
"0"
);
}
...
...
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