summaryrefslogtreecommitdiff
path: root/perlmain.c
diff options
context:
space:
mode:
Diffstat (limited to 'perlmain.c')
-rw-r--r--perlmain.c38
1 files changed, 0 insertions, 38 deletions
diff --git a/perlmain.c b/perlmain.c
deleted file mode 100644
index d3ff323a73..0000000000
--- a/perlmain.c
+++ /dev/null
@@ -1,38 +0,0 @@
-#include "INTERN.h"
-#include "perl.h"
-
-main(argc, argv, env)
-int argc;
-char **argv;
-char **env;
-{
- int exitstatus;
- PerlInterpreter *my_perl;
-
- my_perl = perl_alloc();
- if (!my_perl)
- exit(1);
- perl_construct( my_perl );
-
- exitstatus = perl_parse( my_perl, argc, argv, env );
- if (exitstatus)
- exit( exitstatus );
-
- exitstatus = perl_run( my_perl );
-
- perl_destruct( my_perl );
- perl_free( my_perl );
-
- exit( exitstatus );
-}
-
-/* Register any extra external extensions */
-
-void
-perl_init_ext()
-{
- char *file = __FILE__;
- /* Do not delete this line--writemain depends on it */
- boot_DynamicLoader();
-
-}