995 gbuildInfo (GBuildFLib flib) = foreignLibBuildInfo flib  function
996 gbuildInfo (GReplFLib  _ flib) = foreignLibBuildInfo flib
1001 gbuildName (GBuildFLib flib) = unUnqualComponentName $ foreignLibName flib  function
1002 gbuildName (GReplFLib  _ flib) = unUnqualComponentName $ foreignLibName flib
1007 gbuildTargetName lbi (GBuildFLib flib) = flibTargetName lbi flib
1008 gbuildTargetName lbi (GReplFLib  _ flib) = flibTargetName lbi flib
1023 flibTargetName lbi flib =
1024     case (os, foreignLibType flib) of
1035     nm = unUnqualComponentName $ foreignLibName flib
1047       let nums = foreignLibVersion flib os
1067 flibBuildName lbi flib
1070   | (os, foreignLibType flib) ==
1072   = let nums = foreignLibVersion flib os
1074   | otherwise = flibTargetName lbi flib
1081     nm = unUnqualComponentName $ foreignLibName flib
1094       GBuildFLib flib -> withDynFLib flib
1095       GReplFLib  _ flib -> withDynFLib flib
1097     withDynFLib flib =
1098       case foreignLibType flib of
1100           ForeignLibStandalone `notElem` foreignLibOptions flib
1109 gbuildModDefFiles (GBuildFLib flib) = foreignLibModDefFile flib  function
1110 gbuildModDefFiles (GReplFLib _ flib) = foreignLibModDefFile flib
1185       GBuildFLib flib -> return $ flibSources flib
1186       GReplFLib  _ flib -> return $ flibSources flib
1242     flibSources flib@ForeignLib{foreignLibBuildInfo = bnfo} =
1247             inputSourceModules = foreignLibModules flib
1501     GBuildFLib flib -> do
1512           linkOpts = case foreignLibType flib of
1541       let buildName = flibBuildName lbi flib
1868 installFLib verbosity lbi targetDir builtDir _pkg flib =
1869     install (foreignLibIsShared flib)
1872             (flibTargetName lbi flib)
1884       when (not (null (foreignLibVersion flib os))) $ do
1897               let link1 = flibBuildName lbi flib
1905           nm = unUnqualComponentName $ foreignLibName flib