summaryrefslogtreecommitdiff
path: root/compiler/ilxGen/tests/test2d.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/ilxGen/tests/test2d.hs')
-rw-r--r--compiler/ilxGen/tests/test2d.hs7
1 files changed, 7 insertions, 0 deletions
diff --git a/compiler/ilxGen/tests/test2d.hs b/compiler/ilxGen/tests/test2d.hs
new file mode 100644
index 0000000000..8126127a32
--- /dev/null
+++ b/compiler/ilxGen/tests/test2d.hs
@@ -0,0 +1,7 @@
+foreign import ccall "libHS_cbits.so" "get_prog_argc" unsafe primArgc :: Int
+
+foreign import "ilxHello" unsafe ilxHello :: IO ()
+foreign import "ilxBad" unsafe ilxBad :: IO ()
+
+
+main = if (primArgc == 0) then ilxHello else ilxBad