diff options
Diffstat (limited to 'compiler/GHC/Driver/Session.hs')
-rw-r--r-- | compiler/GHC/Driver/Session.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Driver/Session.hs b/compiler/GHC/Driver/Session.hs index b72d579e33..7cab547af2 100644 --- a/compiler/GHC/Driver/Session.hs +++ b/compiler/GHC/Driver/Session.hs @@ -1384,7 +1384,7 @@ jsonLogAction :: LogAction jsonLogAction dflags reason severity srcSpan msg = do defaultLogActionHPutStrDoc dflags stdout - (withPprStyle (mkCodeStyle CStyle) (doc $$ text "")) + (withPprStyle (PprCode CStyle) (doc $$ text "")) where doc = renderJSON $ JSObject [ ( "span", json srcSpan ) |