projects
/
mate.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
nativeMaschine: s/unsigned int/ptrdiff_t/g
[mate.git]
/
Mate
/
GarbageAlloc.hs
diff --git
a/Mate/GarbageAlloc.hs
b/Mate/GarbageAlloc.hs
index 1a272fbaedbbd02265d47a3a72785ab5b755cd8e..56bb8f17a80cde7cfa65808258fdecaa74a907be 100644
(file)
--- a/
Mate/GarbageAlloc.hs
+++ b/
Mate/GarbageAlloc.hs
@@
-24,8
+24,8
@@
mallocString size = do
printfStr "mallocString: %d\n" size
mallocBytes size
printfStr "mallocString: %d\n" size
mallocBytes size
-foreign export ccall mallocObject :: Int -> IO C
UInt
-mallocObject :: Int -> IO C
UInt
+foreign export ccall mallocObject :: Int -> IO C
Ptrdiff
+mallocObject :: Int -> IO C
Ptrdiff
mallocObject size = do
ptr <- mallocBytes size
printfStr "mallocObject: %d\n" size
mallocObject size = do
ptr <- mallocBytes size
printfStr "mallocObject: %d\n" size