summaryrefslogtreecommitdiff
path: root/os2
diff options
context:
space:
mode:
authorTony Cook <tony@develop-help.com>2016-05-16 16:51:51 +1000
committerTony Cook <tony@develop-help.com>2017-01-19 11:10:59 +1100
commit564894eac8e9ca301638cfa07ae8791b6132f146 (patch)
tree626b94ee2fa2f30aae93f255771bdfd453b78007 /os2
parentfc408859b7454742bb5eff25287a44d5d1256f78 (diff)
downloadperl-564894eac8e9ca301638cfa07ae8791b6132f146.tar.gz
(perl #126228) partly revert 8cc95fdb and fix a3c8358c
a3c8358c changed: -#define dXSUB_SYS int dummy +#define dXSUB_SYS which made dXSUB_SYS into not-a-declaration, this apparently broke something, since 8cc95fdb then went through all the definitions of dXSUB_SYS, made each of them into not-a-declaration and then ensured ExtUtilis::Miniperl emitted dXSUB_SYS in a place where it didn't matter whether it was a declaration or a statement. When these changes were made perl.h didn't have dNOOP, but now we do, so we can make dXSUB_SYS a declaration again, as its name implies. Based on a patch originally created by Daniel Dragan (bulk88).
Diffstat (limited to 'os2')
-rw-r--r--os2/os2ish.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/os2/os2ish.h b/os2/os2ish.h
index 70c8cbecf9..fb71cd0fd9 100644
--- a/os2/os2ish.h
+++ b/os2/os2ish.h
@@ -274,7 +274,7 @@ void Perl_OS2_term(void **excH, int exitstatus, int flags);
/* #define PERL_SYS_TERM_BODY() STMT_START { \
if (Perl_HAB_set) WinTerminate(Perl_hab); } STMT_END */
-#define dXSUB_SYS OS2_XS_init()
+#define dXSUB_SYS int fake = OS2_XS_init() PERL_UNUSED_DECL
#ifdef PERL_IS_AOUT
/* # define HAS_FORK */