+++ /dev/null
-#include "Rts.h"
-
-/* A quick and dirty hack to resurrect -fvia-C from bitrot.
- *
- * The main function has been removed from rts. It's now generated by
- * compiler/main/DriverPipeline.hs but that doesn't play nice with
- * -fvia-C.
- */
-
-extern StgClosure ZCMain_main_closure;
-
-int main(int argc, char *argv[])
-{
- RtsConfig __conf = defaultRtsConfig;
- __conf.rts_opts_enabled = RtsOptsAll;
- return hs_main(argc, argv, &ZCMain_main_closure, __conf);
-}