perl 5.003_01: vms/genconfig.pl

[p5sagit/p5-mst-13.2.git] / vms / writemain.pl

diff --git a/vms/writemain.pl b/vms/writemain.pl
index cd4c534..eb059f8 100644 (file)
--- a/vms/writemain.pl
+++ b/vms/writemain.pl
@@ -36,6 +36,7 @@ print OUT <<'EOH';
 static void
 xs_init()
 {
+    dXSUB_SYS;
 EOH
 
 if (@ARGV) {