{-# OPTIONS_GHC -Wno-missing-fields #-}

module GHC.DynFlags
  ( baseDynFlags,
  )
where

import Config
import DynFlags
import Fingerprint
import Platform

-- | Taken from HLint.
fakeSettings :: Settings
fakeSettings :: Settings
fakeSettings =
  Settings :: Platform
-> FilePath
-> FilePath
-> Maybe FilePath
-> FilePath
-> FilePath
-> FilePath
-> FilePath
-> [(FilePath, FilePath)]
-> [FilePath]
-> FilePath
-> Bool
-> Bool
-> Bool
-> Bool
-> Bool
-> FilePath
-> (FilePath, [Option])
-> FilePath
-> (FilePath, [Option])
-> (FilePath, [Option])
-> (FilePath, [Option])
-> (FilePath, [Option])
-> (FilePath, [Option])
-> FilePath
-> FilePath
-> FilePath
-> FilePath
-> FilePath
-> (FilePath, [Option])
-> (FilePath, [Option])
-> (FilePath, [Option])
-> FilePath
-> [FilePath]
-> [FilePath]
-> Fingerprint
-> [FilePath]
-> [FilePath]
-> [FilePath]
-> [FilePath]
-> [FilePath]
-> [FilePath]
-> [FilePath]
-> [FilePath]
-> [FilePath]
-> PlatformConstants
-> Settings
Settings
    { sTargetPlatform :: Platform
sTargetPlatform = Platform
platform,
      sPlatformConstants :: PlatformConstants
sPlatformConstants = PlatformConstants
platformConstants,
      sProjectVersion :: FilePath
sProjectVersion = FilePath
cProjectVersion,
      sProgramName :: FilePath
sProgramName = "ghc",
      sOpt_P_fingerprint :: Fingerprint
sOpt_P_fingerprint = Fingerprint
fingerprint0,
      sPgm_F :: FilePath
sPgm_F = ""
    }
  where
    platform :: Platform
platform =
      $WPlatform :: Arch
-> OS -> Int -> Bool -> Bool -> Bool -> Bool -> Bool -> Platform
Platform
        { platformWordSize :: Int
platformWordSize = 8,
          platformOS :: OS
platformOS = OS
OSUnknown,
          platformUnregisterised :: Bool
platformUnregisterised = Bool
True
        }
    platformConstants :: PlatformConstants
platformConstants =
      PlatformConstants :: ()
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Int
-> Bool
-> Bool
-> Int
-> Integer
-> Integer
-> Integer
-> PlatformConstants
PlatformConstants {pc_DYNAMIC_BY_DEFAULT :: Bool
pc_DYNAMIC_BY_DEFAULT = Bool
False, pc_WORD_SIZE :: Int
pc_WORD_SIZE = 8}

fakeLlvmConfig :: (LlvmTargets, LlvmPasses)
fakeLlvmConfig :: (LlvmTargets, LlvmPasses)
fakeLlvmConfig = ([], [])

baseDynFlags :: DynFlags
baseDynFlags :: DynFlags
baseDynFlags = Settings -> (LlvmTargets, LlvmPasses) -> DynFlags
defaultDynFlags Settings
fakeSettings (LlvmTargets, LlvmPasses)
fakeLlvmConfig