whitespace only
This commit is contained in:
parent
ec3e63ef8d
commit
a1b9782556
@ -204,8 +204,8 @@ unsafeEval_ src mods args ldflags incs = do
|
|||||||
--
|
--
|
||||||
mkHsValues :: (Show a) => Map.Map String a -> String
|
mkHsValues :: (Show a) => Map.Map String a -> String
|
||||||
mkHsValues values = concat $ elems $ Map.mapWithKey convertToHs values
|
mkHsValues values = concat $ elems $ Map.mapWithKey convertToHs values
|
||||||
where convertToHs :: (Show a) => String -> a -> String
|
where convertToHs :: (Show a) => String -> a -> String
|
||||||
convertToHs name value = name ++ " = " ++ show value ++ "\n"
|
convertToHs name value = name ++ " = " ++ show value ++ "\n"
|
||||||
------------------------------------------------------------------------
|
------------------------------------------------------------------------
|
||||||
--
|
--
|
||||||
-- | Return a compiled value's type, by using Dynamic to get a
|
-- | Return a compiled value's type, by using Dynamic to get a
|
||||||
|
Loading…
x
Reference in New Issue
Block a user