1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
Index: b/lib/Data/GI/CodeGen/CabalHooks.hs
===================================================================
--- a/lib/Data/GI/CodeGen/CabalHooks.hs
+++ b/lib/Data/GI/CodeGen/CabalHooks.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
-- | Convenience hooks for writing custom @Setup.hs@ files for
-- bindings.
module Data.GI.CodeGen.CabalHooks
@@ -38,6 +39,10 @@ import qualified Data.Set as S
import Data.Text (Text)
import qualified Data.Text as T
+#ifndef EXTRA_GIR_SEARCH_PATH
+#define EXTRA_GIR_SEARCH_PATH
+#endif
+
type ConfHook = (GenericPackageDescription, HookedBuildInfo) -> ConfigFlags
-> IO LocalBuildInfo
@@ -68,7 +73,7 @@ genModuleCode name version pkgName pkgVe
let ovs = mconcat parsed
- (gir, girDeps) <- loadGIRInfo verbosity name (Just version) [] (girFixups ovs)
+ (gir, girDeps) <- loadGIRInfo verbosity name (Just version) [EXTRA_GIR_SEARCH_PATH] (girFixups ovs)
let (apis, deps) = filterAPIsAndDeps ovs gir girDeps
allAPIs = M.union apis deps
cfg = Config {modName = name,
|
