summaryrefslogtreecommitdiff
path: root/testsuite/tests/driver/recomp015/Generate.hs
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/driver/recomp015/Generate.hs')
-rw-r--r--testsuite/tests/driver/recomp015/Generate.hs7
1 files changed, 7 insertions, 0 deletions
diff --git a/testsuite/tests/driver/recomp015/Generate.hs b/testsuite/tests/driver/recomp015/Generate.hs
new file mode 100644
index 0000000000..059c763dd6
--- /dev/null
+++ b/testsuite/tests/driver/recomp015/Generate.hs
@@ -0,0 +1,7 @@
+import Control.Monad (forM_)
+
+main :: IO ()
+main = forM_ [0..0xffff] $ \i -> do
+ putStrLn $ ".section s" ++ show i ++ ",\"\",@progbits"
+ putStrLn $ ".asciz \"Section " ++ show i ++ "\""
+ putStrLn ""