summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghci/should_run/UnboxedTuples/ByteCode.hs
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/ghci/should_run/UnboxedTuples/ByteCode.hs')
-rw-r--r--testsuite/tests/ghci/should_run/UnboxedTuples/ByteCode.hs17
1 files changed, 17 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/should_run/UnboxedTuples/ByteCode.hs b/testsuite/tests/ghci/should_run/UnboxedTuples/ByteCode.hs
new file mode 100644
index 0000000000..a1bce35ad0
--- /dev/null
+++ b/testsuite/tests/ghci/should_run/UnboxedTuples/ByteCode.hs
@@ -0,0 +1,17 @@
+{-# LANGUAGE CPP, UnboxedTuples, MagicHash, ScopedTypeVariables, PolyKinds #-}
+{-# OPTIONS_GHC -fbyte-code #-}
+
+#include "MachDeps.h"
+
+#if WORD_SIZE_IN_BITS < 64
+#define WW Word64
+#else
+#define WW Word
+#endif
+
+module ByteCode where
+
+import GHC.Exts
+import GHC.Word
+
+#include "Common.hs-incl"