summaryrefslogtreecommitdiff
path: root/src/Main.hs
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2024-10-13 16:50:13 +0200
committerRoman Smrž <roman.smrz@seznam.cz>2024-10-14 20:52:21 +0200
commit0c8bad166577f9973ba5701aee5ca5d9a3f3bc5d (patch)
treec5d0db1f5ca41f95755770bcbec76c0c3fcc62dc /src/Main.hs
parent321859ab1fe4a6b1f3cc7084b8836474ff872e2b (diff)
Custom C main instead of wrapper binaryHEADmasterdevel
Changelog: Use custom C main instead of wrapper binary for unshare(2) call.
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 42b2e5b..01bb766 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -157,3 +157,7 @@ main = do
ok <- allM (uncurry $ runTest out $ optTest opts) $
concat $ replicate (optRepeat opts) $ concat tests
when (not ok) exitFailure
+
+foreign export ccall testerMain :: IO ()
+testerMain :: IO ()
+testerMain = main