summaryrefslogtreecommitdiff
path: root/win32/perlhost.h
diff options
context:
space:
mode:
authorSteve Hay <steve.m.hay@googlemail.com>2017-02-19 13:33:37 +0000
committerSteve Hay <steve.m.hay@googlemail.com>2017-02-19 15:30:26 +0000
commit1f664ef5314fb6e438137c44c95cf5ecdbdb5e9b (patch)
tree0c788a9cfa8bc4f6e1561230cfaf8e85a421ab99 /win32/perlhost.h
parentb3dc9cf3c7fae44f9823063eb1c1a3d593421b03 (diff)
downloadperl-1f664ef5314fb6e438137c44c95cf5ecdbdb5e9b.tar.gz
Add support for VS2015 (VC++ 14.0)
Due to the rewritten CRT in this version of Visual C++ it is no longer possible (or at least not at all easy) to make use of the ioinfo struct, which commit b47a847f62 (re-)introduced in order to fix RT#120091/118059. Therefore, we effectively revert commit b47a847f62 for VS2015 onwards on the basis that being able to build with VS2015 onwards is more important than the RT#120091/118059 bug fix. This does unfortunately mean that perls built with <=VS2013 will not be compatible with perls built with >=VS2015, but they may well not have been compatible anyway because of the CRT rewrite, and certainly wouldn't be compatible if perl builds with VS2015 were not supported! See RT#125714 for more discussion about this.
Diffstat (limited to 'win32/perlhost.h')
-rw-r--r--win32/perlhost.h6
1 files changed, 3 insertions, 3 deletions
diff --git a/win32/perlhost.h b/win32/perlhost.h
index 9963319a92..84b08c9b90 100644
--- a/win32/perlhost.h
+++ b/win32/perlhost.h
@@ -836,15 +836,15 @@ PerlStdIOFdupopen(struct IPerlStdIO* piPerl, FILE* pf)
int fileno = win32_dup(win32_fileno(pf));
/* open the file in the same mode */
- if((pf)->_flag & _IOREAD) {
+ if (PERLIO_FILE_flag(pf) & PERLIO_FILE_flag_RD) {
mode[0] = 'r';
mode[1] = 0;
}
- else if((pf)->_flag & _IOWRT) {
+ else if (PERLIO_FILE_flag(pf) & PERLIO_FILE_flag_WR) {
mode[0] = 'a';
mode[1] = 0;
}
- else if((pf)->_flag & _IORW) {
+ else if (PERLIO_FILE_flag(pf) & PERLIO_FILE_flag_RW) {
mode[0] = 'r';
mode[1] = '+';
mode[2] = 0;