diff options
Diffstat (limited to 'testsuite/tests')
| -rw-r--r-- | testsuite/tests/rts/rdynamic.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/rts/rdynamic.hs b/testsuite/tests/rts/rdynamic.hs index ebd079fd20..5fb4651ff9 100644 --- a/testsuite/tests/rts/rdynamic.hs +++ b/testsuite/tests/rts/rdynamic.hs @@ -29,7 +29,7 @@ loadFunction mpkg m valsym = do let symbol = prefixUnderscore ++ maybe "" (\p -> zEncodeString p ++ "_") mpkg ++ zEncodeString m ++ "_" ++ zEncodeString valsym - ++ "_static_closure" + ++ "_closure" ptr@(Ptr addr) <- withCString symbol c_lookupSymbol if (ptr == nullPtr) then return Nothing |