From 23c21e8117d94133e2ff38cf5cb485d6d6f41d52 Mon Sep 17 00:00:00 2001
From: Fendor <power.walross@gmail.com>
Date: Mon, 23 Aug 2021 16:14:15 +0200
Subject: [PATCH] Add CPP statements for IncludeSpecs

---
 src/HIE/Bios/Ghc/Gap.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/HIE/Bios/Ghc/Gap.hs b/src/HIE/Bios/Ghc/Gap.hs
index dd025bb6..8142984e 100644
--- a/src/HIE/Bios/Ghc/Gap.hs
+++ b/src/HIE/Bios/Ghc/Gap.hs
@@ -260,6 +260,9 @@ mapOverIncludePaths f df = df
       G.IncludeSpecs
           (map f $ G.includePathsQuote  (includePaths df))
           (map f $ G.includePathsGlobal (includePaths df))
+#if __GLASGOW_HASKELL__ >= 902
+          (map f $ G.includePathsQuoteImplicit (includePaths df))
+#endif
 #else
       map f (includePaths df)
 #endif
@@ -521,4 +524,4 @@ hostIsDynamic :: Bool
 hostIsDynamic = Platform.hostIsDynamic
 #else
 hostIsDynamic = G.dynamicGhc
-#endif
\ No newline at end of file
+#endif