gold用

gold.hs

#!/usr/bin/runhaskell
-- cabal install --with-ld=./gold.hs
import Data.List
import System.Environment
import System.Exit
import System.Process

ignores :: [String]
ignores = [ "--hash-size"
          , "--reduce-memory-overheads"
          ]

main :: IO ()
main = getArgs >>=
       rawSystem "/usr/bin/ld.gold" . filter (\arg -> not $ any (`isPrefixOf` arg) ignores) >>=
       exitWith