- (am_installed, top_dir) <- findTopDir (Just (topDir dflags))
- let top_dir'
- -- XXX Euch:
- | isWindowsHost && not am_installed
- = top_dir </> ".." </> ".." </> "inplace-datadir"
- | otherwise = top_dir
- f <- readFile (top_dir' </> "extra-gcc-opts")