… | |
… | |
580 | |
580 | |
581 | static void |
581 | static void |
582 | deliantra_main () |
582 | deliantra_main () |
583 | { |
583 | { |
584 | char *argv[] = { 0 }; |
584 | char *argv[] = { 0 }; |
585 | call_argv ("::main", G_DISCARD | G_VOID, argv); |
585 | call_argv ("DC::Main::main", G_DISCARD | G_VOID, argv); |
586 | } |
586 | } |
587 | |
587 | |
588 | #ifdef __MACOSX__ |
588 | #ifdef __MACOSX__ |
589 | /* to due surprising braindamage on the side of SDL design, we |
589 | /* to due surprising braindamage on the side of SDL design, we |
590 | * do some mind-boggling hack here: SDL requires a custom main() |
590 | * do some mind-boggling hack here: SDL requires a custom main() |
591 | * on OS X, so... we provide one and call the original main(), which, |
591 | * on OS X, so... we provide one and call the original main(), which, |
592 | * due to share dlibrary magic, calls -lSDLmain's main, not perl's main, |
592 | * due to shared library magic, calls -lSDLmain's main, not perl's main, |
593 | * and which calls our main (== SDL_main) back. |
593 | * and which calls our main (== SDL_main) back. |
594 | */ |
594 | */ |
595 | extern C_LINKAGE int |
595 | extern C_LINKAGE int |
596 | main (int argc, char *argv[]) |
596 | main (int argc, char *argv[]) |
597 | { |
597 | { |