Make PackageName into a proper newtype
[hadrian.git] / src / Rules / Generate.hs
index 586afae..cdeb1a3 100644 (file)
@@ -147,7 +147,7 @@ generateConfigHs = do
         , "cStage                :: String"
         , "cStage                = show (STAGE :: Int)"
         , "cIntegerLibrary       :: String"
-        , "cIntegerLibrary       = " ++ quote (pkgName integerLibrary)
+        , "cIntegerLibrary       = " ++ quote (pkgNameString integerLibrary)
         , "cIntegerLibraryType   :: IntegerLibrary"
         , "cIntegerLibraryType   = " ++ cIntegerLibraryType
         , "cSupportsSplitObjs    :: String"