diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-02-17 01:47:35 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-02-17 01:47:35 +0000 |
| commit | 4a52a3daffadd96cbf5882659a7b4be69a820252 (patch) | |
| tree | dbc80aa3319afebbf653921460b10bb151d367ca /XSUB.h | |
| parent | 3730b96e60864694cf0c222f80e6ed2b3c27335b (diff) | |
| download | perl-4a52a3daffadd96cbf5882659a7b4be69a820252.tar.gz | |
[win32] DLLs are now ok on mingw32/gcc-2.8.0 after removing the
FORCE_ARG_STRING() hack (that bug is fixed in gcc now). mingw32
build passes all tests except t/lib/io_xs.t (seems to be due to
broken tmpfile() in the CRT or import lib)
p4raw-id: //depot/win32/perl@530
Diffstat (limited to 'XSUB.h')
| -rw-r--r-- | XSUB.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -6,7 +6,7 @@ #define XS(name) void name(cv) CV* cv; #endif -#if defined(WIN32) && defined(__GNUC__) +#if 0 /*defined(WIN32) && defined(__GNUC__)*/ /* this bug is gone in mingw32/gcc-2.8.0*/ #define STRINGIFY_THINGY(x) #x #define FORCE_ARG_STRING(x) STRINGIFY_THINGY(x) #else @@ -50,7 +50,7 @@ #ifdef XS_VERSION # define XS_VERSION_BOOTCHECK \ STMT_START { \ - char *xs_version = FORCE_ARG_STRING(XS_VERSION); \ + char *xs_version = FORCE_ARG_STRING(XS_VERSION); \ char *vn = "", *module = SvPV(ST(0),na); \ if (items >= 2) /* version supplied as bootstrap arg */ \ Sv = ST(1); \ |