diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2011-01-30 18:17:35 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2011-01-30 18:17:35 -0800 |
| commit | 492d5e91d589b68dc61ce2927c7519ecc48ec3db (patch) | |
| tree | 5392333f863bd31e52f932e93f3ce7f34ea7da45 | |
| parent | fecdd80d49663864df3cdd7f25489d37a17cda0c (diff) | |
| download | pandoc-492d5e91d589b68dc61ce2927c7519ecc48ec3db.tar.gz | |
Fixed Interact.hs to handle the cpp macros in UTF8.
| -rw-r--r-- | Interact.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Interact.hs b/Interact.hs index 8fa7b5b3b..80b5a34f5 100644 --- a/Interact.hs +++ b/Interact.hs @@ -20,7 +20,7 @@ main = do let setupConfig = read $ unlines $ drop 1 $ lines setupConfig' let (Just (ComponentLocalBuildInfo { componentPackageDeps = deps })) = libraryConfig setupConfig let packageSpecs = map (toPackageSpec . snd) deps - let args = ["-cpp","-i../dist/build/autogen"] ++ concatMap (\p -> ["-package",p]) packageSpecs + let args = ["-optP-include", "-optP../dist/build/autogen/cabal_macros.h","-cpp","-I../dist/build/autogen","-i../dist/build/autogen"] ++ concatMap (\p -> ["-package",p]) packageSpecs print args ph <- runProcess "ghci" args (Just "src") Nothing Nothing Nothing Nothing waitForProcess ph |