diff --git a/compiler/main/GHC.hs b/compiler/main/GHC.hs
index e02f6b8e6bbe9918c8a4c8f55f4382a30149ae65..9ed8aaa989a7d0c089e43e2f878104cd8a0ae2de 100644
--- a/compiler/main/GHC.hs
+++ b/compiler/main/GHC.hs
@@ -1302,7 +1302,6 @@ pprParenSymName a = parenSymOcc (getOccName a) (ppr (getName a))
 
 -- ----------------------------------------------------------------------------
 
-#if 0
 
 -- ToDo:
 --   - Data and Typeable instances for HsSyn.
@@ -1316,7 +1315,6 @@ pprParenSymName a = parenSymOcc (getOccName a) (ppr (getName a))
 -- :browse will use either lm_toplev or inspect lm_interface, depending
 -- on whether the module is interpreted or not.
 
-#endif
 
 -- Extract the filename, stringbuffer content and dynflags associed to a module
 --