opt_a                 :: DynFlags -> [String]
opt_a dflags = sOpt_a (settings dflags)
opt_a                 :: DynFlags -> [String]
opt_a dflags = sOpt_a (settings dflags)
opt_a dflags = sOpt_a (settings dflags)