summaryrefslogtreecommitdiff
path: root/testsuite/tests/driver/T4931.hs
blob: 08b583a68defbd2c7f82b4dbbdeca544243ef4ec (plain)
1
2
3
4
5
6
7
8
{-# LANGUAGE CPP #-}
{-# OPTIONS_GHC -DFOO="bar baz" #-}
main = print FOO

-- Test that GHC can compile option pragmas containing spaces.
-- When a .hsc contains `#define FOO "bar baz"`, hsc2hs emits:
--
--     {-# OPTIONS_GHC -optc-DFOO="bar baz" #-}