Commit 1e13a6e1 authored by Andrey Mokhov's avatar Andrey Mokhov
Browse files

Add support for Alex, Happy and Hsc2Hs builders.

parent 8b1feb5b
......@@ -39,15 +39,18 @@ build = buildWithResources []
interestingInfo :: Builder -> [String] -> [String]
interestingInfo builder ss = case builder of
Alex -> prefixAndSuffix 0 3 ss
Ar -> prefixAndSuffix 2 1 ss
Ld -> prefixAndSuffix 4 0 ss
Gcc _ -> prefixAndSuffix 0 4 ss
GccM _ -> prefixAndSuffix 0 1 ss
Ghc _ -> prefixAndSuffix 0 4 ss
GhcCabal -> prefixAndSuffix 3 0 ss
GhcM _ -> prefixAndSuffix 1 1 ss
GhcPkg _ -> prefixAndSuffix 3 0 ss
Haddock -> prefixAndSuffix 1 0 ss
GhcCabal -> prefixAndSuffix 3 0 ss
Happy -> prefixAndSuffix 0 3 ss
Hsc2Hs -> prefixAndSuffix 0 3 ss
Ld -> prefixAndSuffix 4 0 ss
_ -> ss
where
prefixAndSuffix n m list =
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment