diff --git a/src/Stack/Package.hs b/src/Stack/Package.hs
index 4db50d2a4b..3654039b3f 100644
--- a/src/Stack/Package.hs
+++ b/src/Stack/Package.hs
@@ -358,7 +358,7 @@ data BioInput = BioInput
 generateBuildInfoOpts :: BioInput -> BuildInfoOpts
 generateBuildInfoOpts BioInput {..} =
     BuildInfoOpts
-        { bioOpts = ghcOpts ++ cppOptions biBuildInfo
+        { bioOpts = ghcOpts ++ fmap ("-optP" <>) (cppOptions biBuildInfo)
         -- NOTE for future changes: Due to this use of nubOrd (and other uses
         -- downstream), these generated options must not rely on multiple
         -- argument sequences.  For example, ["--main-is", "Foo.hs", "--main-