Move Main.hs to Config.hs and override _start()

Now if one tries to execute the built binary with 'stack run' or by just
executing it, a helpful message prints to the screen instead of the
segmentation fault that normally happens.

This technically makes things not portable to other architectures, but
it's all just window dressing and can be taken out if need be for other
architectures.

1 files changed, 8 insertions, 0 deletions

diff --git a/src/Config.hs b/src/Config.hs
new file mode 100644
index 0000000..14326cb
--- /dev/null
+++ b/src/Config.hs
@@ -0,0 +1,8 @@
+module Config () where
+
+import Wetterhorn.Core
+
+foreign export ccall wetterhorn :: IO Wetterhorn
+
+wetterhorn :: IO Wetterhorn
+wetterhorn = initWetterhorn defaultConfig