Opts :: DynFlags -> [String]
picPOpts dflags
 | gopt Opt_PIC dflags = ["-U __PIC__", "-D__PIC__"]
 | otherwise           = []

--
picPOpts :: DynFlags -> [String]
picPOpts dflags
 | gopt Opt_PIC dflags = ["-U __PIC__", "-D__PIC__"]
 | otherwise           = []
picPOpts dflags
 | gopt Opt_PIC dflags = ["-U __PIC__", "-D__PIC__"]
 | otherwise           = []