summaryrefslogtreecommitdiff
path: root/vms/vmsish.h
diff options
context:
space:
mode:
authorDave Mitchell <davem@fdisolutions.com>2007-09-25 18:00:32 +0000
committerDave Mitchell <davem@fdisolutions.com>2007-09-25 18:00:32 +0000
commitcbec8ebe2f7855c619451e56c6921e1537d3eba5 (patch)
treeb15c2a3f29a517dce5b080fa94e0beef050444dc /vms/vmsish.h
parent6f8d0260355f8c4ae7955768122638ad99f0ebab (diff)
downloadperl-cbec8ebe2f7855c619451e56c6921e1537d3eba5.tar.gz
make PERL_SYS_INIT/INIT3/TERM into functions
p4raw-id: //depot/perl@31970
Diffstat (limited to 'vms/vmsish.h')
-rw-r--r--vms/vmsish.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/vms/vmsish.h b/vms/vmsish.h
index a9452eb4f1..a0a52a3f86 100644
--- a/vms/vmsish.h
+++ b/vms/vmsish.h
@@ -402,8 +402,8 @@ struct interp_intern {
#else
#define BIT_BUCKET "/dev/null"
#endif
-#define PERL_SYS_INIT(c,v) MALLOC_CHECK_TAINT2(*c,*v) vms_image_init((c),(v)); PERLIO_INIT; MALLOC_INIT
-#define PERL_SYS_TERM() HINTS_REFCNT_TERM; OP_REFCNT_TERM; PERLIO_TERM; MALLOC_TERM
+#define PERL_SYS_INIT_BODY(c,v) MALLOC_CHECK_TAINT2(*c,*v) vms_image_init((c),(v)); PERLIO_INIT; MALLOC_INIT
+#define PERL_SYS_TERM_BODY() HINTS_REFCNT_TERM; OP_REFCNT_TERM; PERLIO_TERM; MALLOC_TERM
#define dXSUB_SYS
#define HAS_KILL
#define HAS_WAIT