From 5d6e827870baf57a02e11aeae08026214a5853be Mon Sep 17 00:00:00 2001
From: alexwl <alexey.a.kiryushin@gmail.com>
Date: Sun, 14 Oct 2018 23:08:31 +0300
Subject: Fix https://github.com/alexwl/haskell-code-explorer/issues/8

---
 src/HaskellCodeExplorer/Preprocessor.hs | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

(limited to 'src/HaskellCodeExplorer')

diff --git a/src/HaskellCodeExplorer/Preprocessor.hs b/src/HaskellCodeExplorer/Preprocessor.hs
index 6a90ff9..8dcf548 100644
--- a/src/HaskellCodeExplorer/Preprocessor.hs
+++ b/src/HaskellCodeExplorer/Preprocessor.hs
@@ -23,7 +23,6 @@ import HaskellCodeExplorer.Types
   )
 import System.FilePath (normalise,takeExtension,takeFileName)
 
-
 -- | Finds locations of line pragmas and creates an index
 createSourceCodeTransformation ::
      HaskellModulePath -> T.Text -> T.Text -> (SourceCodeTransformation, T.Text)
@@ -50,7 +49,14 @@ createSourceCodeTransformation currentModulePath originalSourceCode sourceCodeAf
       pragmaPath = filePath :: LinePragma -> HaskellFilePath
       currentFileExtension =
         takeExtension . T.unpack . getHaskellFilePath $ currentFilePath
-      standardHeaderFiles = ["stdc-predef.h", "cabal_macros.h", "ghcversion.h"]      
+      standardHeaderFiles =
+        [ "stdc-predef.h"
+        , "cabal_macros.h"
+        , "ghcversion.h"
+        , "HsVersions.h"
+        , "ghc_boot_platform.h"
+        , "ghcautoconf.h"
+        ]
       hasIncludedFiles =
         L.any
           ((\path ->
-- 
cgit v1.2.3