Pass foreigns map to buildMakeActions in PSCi
commit91194b399d70a573d38cf0554c7ab645bb120b01
authorPhil Freeman <paf31@cantab.net>
dateTue 2 Jun 2015, 20:00 (11 years ago)
parent32cb3b4
.gitignore+1
@@ -9,4 +9,5 @@ cabal.sandbox.config
99*.lksh*
1010.virthualenv
1111.psci_modules/
12+bower_components/
1213tmp/
psci/PSCi.hs+1−1
@@ -248,7 +248,7 @@ indexFile = ".psci_modules" ++ pathSeparator : "index.js"
248248make :: PSCiState -> [(Either P.RebuildPolicy FilePath, P.Module)] -> Make P.Environment
249249make PSCiState{..} ms =
250250 let filePathMap = M.fromList $ (first P.getModuleName . swap) `map` (psciLoadedModules ++ ms)
251− in P.make (buildMakeActions filePathMap M.empty) (psciLoadedModules ++ ms)
251+ in P.make (buildMakeActions filePathMap (M.map snd psciForeignFiles)) (psciLoadedModules ++ ms)
252252
253253-- |
254254-- Takes a value declaration and evaluates it with the current state.