X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=pkgsrc-ghc.git;a=blobdiff_plain;f=files%2Fbootstrap-main.c;fp=files%2Fbootstrap-main.c;h=0000000000000000000000000000000000000000;hp=ea1d2f81f80bd6d04713e1f8d9e1ea170756b12b;hb=9533b2b09d98a0e7326dc0c58d8d34febe5d3175;hpb=96e61103d139f67648ba7729b614e2cedcbb1ad4 diff --git a/files/bootstrap-main.c b/files/bootstrap-main.c deleted file mode 100644 index ea1d2f8..0000000 --- a/files/bootstrap-main.c +++ /dev/null @@ -1,17 +0,0 @@ -#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); -}