diff options
| author | Ian Lynagh <ian@well-typed.com> | 2013-04-21 16:03:40 +0100 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2013-04-21 16:03:40 +0100 |
| commit | 310735e7adce0145c653386c21686b4a1b96aea9 (patch) | |
| tree | ad090223d3338f443f07e2d63db7dd031f27494e | |
| parent | 144db21e9519fac0af5a845b57b605567c1aaa25 (diff) | |
| download | haskell-310735e7adce0145c653386c21686b4a1b96aea9.tar.gz | |
Use ffi_prep_closure_loc rather than ffi_prep_closure
The latter is deprecated. Part of #7718.
| -rw-r--r-- | rts/Adjustor.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Adjustor.c b/rts/Adjustor.c index fbf95df936..e4d6e8c529 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); return (void*)code; |