projects
/
mate.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
hlint: use CamelCase for printf stuff
[mate.git]
/
Mate
/
Strings.hs
diff --git
a/Mate/Strings.hs
b/Mate/Strings.hs
index 6e541814e7645247ee0f2a638d61fe7cd4a31aab..36b2342eb1f8b1c97f7fb0679921fc32ce33c1c9 100644
(file)
--- a/
Mate/Strings.hs
+++ b/
Mate/Strings.hs
@@
-44,5
+44,5
@@
allocateJavaString str = do
BI.memset newstr 0 (fromIntegral $ strlen + 1)
copyBytes newstr arr strlen
let w32_ptr = fromIntegral $ ptrToIntPtr newstr
BI.memset newstr 0 (fromIntegral $ strlen + 1)
copyBytes newstr arr strlen
let w32_ptr = fromIntegral $ ptrToIntPtr newstr
- printf
_s
tr "new str ptr: 0x%08x (%s)@%d\n" w32_ptr (toString str) strlen
+ printf
S
tr "new str ptr: 0x%08x (%s)@%d\n" w32_ptr (toString str) strlen
return w32_ptr
return w32_ptr