module GHC.Driver.Config.Linker
  ( initFrameworkOpts
  ) where

import GHC.Linker.Config

import GHC.Driver.Session

initFrameworkOpts :: DynFlags -> FrameworkOpts
initFrameworkOpts :: DynFlags -> FrameworkOpts
initFrameworkOpts DynFlags
dflags = FrameworkOpts
  { foFrameworkPaths :: [String]
foFrameworkPaths    = DynFlags -> [String]
frameworkPaths    DynFlags
dflags
  , foCmdlineFrameworks :: [String]
foCmdlineFrameworks = DynFlags -> [String]
cmdlineFrameworks DynFlags
dflags
  }