diff --git a/compiler/stgSyn/StgSyn.hs b/compiler/stgSyn/StgSyn.hs
index f7dae5dbe21b0042487fde75e0a44ced0cf377f0..dc0960ebb7172c7d44db1f3c527154deae9b6264 100644
--- a/compiler/stgSyn/StgSyn.hs
+++ b/compiler/stgSyn/StgSyn.hs
@@ -732,7 +732,7 @@ pprGenStgBinding (StgNonRec bndr rhs)
 
 pprGenStgBinding (StgRec pairs)
   = vcat [ text "Rec {"
-         , vcat (map ppr_bind pairs)
+         , vcat (intersperse blankLine (map ppr_bind pairs))
          , text "end Rec }" ]
   where
     ppr_bind (bndr, expr)