whitespace only

This commit is contained in:
dons 2006-06-21 05:13:53 +00:00
parent ec3e63ef8d
commit a1b9782556

View File

@ -204,8 +204,8 @@ unsafeEval_ src mods args ldflags incs = do
--
mkHsValues :: (Show a) => Map.Map String a -> String
mkHsValues values = concat $ elems $ Map.mapWithKey convertToHs values
where convertToHs :: (Show a) => String -> a -> String
convertToHs name value = name ++ " = " ++ show value ++ "\n"
where convertToHs :: (Show a) => String -> a -> String
convertToHs name value = name ++ " = " ++ show value ++ "\n"
------------------------------------------------------------------------
--
-- | Return a compiled value's type, by using Dynamic to get a