aboutsummaryrefslogtreecommitdiff
path: root/hypsrc-test/src/ClangCppBug.hs
diff options
context:
space:
mode:
Diffstat (limited to 'hypsrc-test/src/ClangCppBug.hs')
-rw-r--r--hypsrc-test/src/ClangCppBug.hs21
1 files changed, 21 insertions, 0 deletions
diff --git a/hypsrc-test/src/ClangCppBug.hs b/hypsrc-test/src/ClangCppBug.hs
new file mode 100644
index 00000000..4b0bc35f
--- /dev/null
+++ b/hypsrc-test/src/ClangCppBug.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE CPP #-}
+module ClangCppBug where
+
+foo :: Int
+foo = 1
+
+-- Clang doesn't mind these:
+#define BAX 2
+{-# INLINE bar #-}
+
+bar :: Int
+bar = 3
+
+-- But it doesn't like this:
+{-# RULES
+"bar/qux" bar = qux
+"qux/foo" qux = foo
+ #-}
+
+qux :: Int
+qux = 88