diff --git a/compiler/utils/Outputable.lhs b/compiler/utils/Outputable.lhs
index 6a9c5d552006fa384396dd6052f5c3ea262bf9eb..ca2adbb1183b91626a6fba4485676112c38a0c94 100644
--- a/compiler/utils/Outputable.lhs
+++ b/compiler/utils/Outputable.lhs
@@ -363,10 +363,10 @@ printForC dflags handle doc =
   Pretty.printDoc LeftMode handle
     (runSDoc doc (initSDocContext' dflags (PprCode CStyle)))
 
-printForAsm :: Handle -> SDoc -> IO ()
-printForAsm handle doc =
+printForAsm :: DynFlags -> Handle -> SDoc -> IO ()
+printForAsm dflags handle doc =
   Pretty.printDoc LeftMode handle
-    (runSDoc doc (initSDocContext (PprCode AsmStyle)))
+    (runSDoc doc (initSDocContext' dflags (PprCode AsmStyle)))
 
 pprCode :: CodeStyle -> SDoc -> SDoc
 pprCode cs d = withPprStyle (PprCode cs) d