From f2b5be74500fffd3dc232fca7cb3c51bc3b9abf9 Mon Sep 17 00:00:00 2001 From: Gurusamy Sarathy Date: Mon, 26 Jul 1999 02:11:31 +0000 Subject: ensure implicitly closed handles don't set $? or $! p4raw-id: //depot/perl@3752 --- embed.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'embed.h') diff --git a/embed.h b/embed.h index f2b0bfac1d..1c49a767e5 100644 --- a/embed.h +++ b/embed.h @@ -1531,7 +1531,7 @@ #define init_stacks() Perl_init_stacks(aTHX) #define intro_my() Perl_intro_my(aTHX) #define instr(a,b) Perl_instr(aTHX_ a,b) -#define io_close(a) Perl_io_close(aTHX_ a) +#define io_close(a,b) Perl_io_close(aTHX_ a,b) #define invert(a) Perl_invert(aTHX_ a) #define is_uni_alnum(a) Perl_is_uni_alnum(aTHX_ a) #define is_uni_alnumc(a) Perl_is_uni_alnumc(aTHX_ a) -- cgit v1.2.1