haskell/ghcide
1
1
Fork 0
mirror of https://github.com/haskell/ghcide.git synced 2024-12-02 08:53:07 +03:00
Code Issues Projects Releases Wiki Activity

Less extensions

Browse Source
This commit is contained in:
Neil Mitchell 2019-09-11 22:45:41 +01:00
parent 99621e5f78
commit 9cfb9aa9ab
1 changed files with 1 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/Development/IDE/Core/Preprocessor.hs
View File

@ -1,9 +1,6 @@
-- Copyright (c) 2019 The DAML Authors. All rights reserved.
-- SPDX-License-Identifier: Apache-2.0
{-# LANGUAGE RankNTypes #-}
{-# LANGUAGE CPP #-}
module Development.IDE.Core.Preprocessor
( preprocessor
) where
@ -70,7 +67,6 @@ parsePragmasIntoDynFlags fp contents = catchSrcErrors "pragmas" $ do
return dflags
-- | Run (unlit) literate haskell preprocessor on a file, or buffer if set
runLhs :: DynFlags -> FilePath -> Maybe SB.StringBuffer -> IO SB.StringBuffer
runLhs dflags filename contents = withTempDir $ \dir -> do
@ -98,6 +94,7 @@ runLhs dflags filename contents = withTempDir $ \dir -> do
escape (c:cs) = c : escape cs
escape [] = []
-- | Run CPP on a file
runCpp :: DynFlags -> FilePath -> Maybe SB.StringBuffer -> IO SB.StringBuffer
runCpp dflags filename contents = withTempDir $ \dir -> do