commit 310735e7adce0145c653386c21686b4a1b96aea9
Author: Ian Lynagh i...@well-typed.com
Date: Sun Apr 21 16:03:40 2013 +0100
Use ffi_prep_closure_loc rather than ffi_prep_closure
The latter is deprecated. Part of #7718.
---
rts/Adjustor.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/rts/Adjustor.c b/rts/Adjustor.c
index fbf95df..e4d6e8c 100644
--- a/rts/Adjustor.c
+++ b/rts/Adjustor.c
@@ -131,7 +131,7 @@ createAdjustor (int cconv,
barf(createAdjustor: failed to allocate memory);
}
-r = ffi_prep_closure(cl, cif, (void*)wptr, hptr/*userdata*/);
+r = ffi_prep_closure_loc(cl, cif, (void*)wptr, hptr/*userdata*/, code);
if (r != FFI_OK) barf(ffi_prep_closure failed: %d, r);
The barf() text (/ffi_prep_closure/ffi_prep_closure_loc/) might be adjusted as
well.
return (void*)code;
--
Sergei
signature.asc
Description: PGP signature
___
ghc-devs mailing list
ghc-devs@haskell.org
http://www.haskell.org/mailman/listinfo/ghc-devs