diff options
| author | Ian Lynagh <ian@well-typed.com> | 2013-05-13 19:36:49 +0100 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2013-05-13 19:36:49 +0100 |
| commit | 7e723a1c70bee46a42d2cafb9ebd7399c3c054f0 (patch) | |
| tree | 5754037e378f9c1b0af4c78155ac5e4ea02263e6 /compiler/nativeGen/SPARC | |
| parent | 1cc96d54144f34f620e31d2dee133d17a2367610 (diff) | |
| download | haskell-7e723a1c70bee46a42d2cafb9ebd7399c3c054f0.tar.gz | |
Refactor cmmMakeDynamicReference
It now has its own class, and the addImport function is defined in that
class, rather than needing to be passed as an argument.
Diffstat (limited to 'compiler/nativeGen/SPARC')
| -rw-r--r-- | compiler/nativeGen/SPARC/CodeGen.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/nativeGen/SPARC/CodeGen.hs b/compiler/nativeGen/SPARC/CodeGen.hs index 30ffcd9d9a..9c84a38f6a 100644 --- a/compiler/nativeGen/SPARC/CodeGen.hs +++ b/compiler/nativeGen/SPARC/CodeGen.hs @@ -588,7 +588,7 @@ outOfLineMachOp mop = outOfLineMachOp_table mop dflags <- getDynFlags - mopExpr <- cmmMakeDynamicReference dflags addImportNat CallReference + mopExpr <- cmmMakeDynamicReference dflags CallReference $ mkForeignLabel functionName Nothing ForeignLabelInExternalPackage IsFunction let mopLabelOrExpr |