perl 5.003_01: lib/File/Basename.pm

[p5sagit/p5-mst-13.2.git] / miniperlmain.c

diff --git a/miniperlmain.c b/miniperlmain.c
index 89087bd..bc81e99 100644 (file)
--- a/miniperlmain.c
+++ b/miniperlmain.c
@@ -51,6 +51,8 @@ char **env;
     perl_destruct( my_perl );
     perl_free( my_perl );
 
+    PERL_SYS_TERM();
+
     exit( exitstatus );
 }
 
@@ -61,4 +63,5 @@ char **env;
 static void
 xs_init()
 {
+  dXSUB_SYS;
 }