summaryrefslogtreecommitdiff
path: root/perlio.c
diff options
context:
space:
mode:
authorSteve Peters <steve@fisharerojo.org>2006-10-30 13:58:15 +0000
committerSteve Peters <steve@fisharerojo.org>2006-10-30 13:58:15 +0000
commitd06fc7d4ca982fb56f0bbeb3d160a8e6c2f856da (patch)
treed0763bf1d38b7deeffadfe09b9aedb830afe53d0 /perlio.c
parent58e2a187089bff134d6be8e45e155c798efe2773 (diff)
downloadperl-d06fc7d4ca982fb56f0bbeb3d160a8e6c2f856da.tar.gz
Initial cleanups to support compiling Win32 with MinGW g++.
p4raw-id: //depot/perl@29155
Diffstat (limited to 'perlio.c')
-rw-r--r--perlio.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/perlio.c b/perlio.c
index a5d4377350..0b202de80b 100644
--- a/perlio.c
+++ b/perlio.c
@@ -3375,7 +3375,7 @@ PerlIOStdio_set_ptrcnt(pTHX_ PerlIO *f, STDCHAR * ptr, SSize_t cnt)
FILE * const stdio = PerlIOSelf(f, PerlIOStdio)->stdio;
if (ptr != NULL) {
#ifdef STDIO_PTR_LVALUE
- PerlSIO_set_ptr(stdio, (void*)ptr); /* LHS STDCHAR* cast non-portable */
+ PerlSIO_set_ptr(stdio, ptr); /* LHS STDCHAR* cast non-portable */
#ifdef STDIO_PTR_LVAL_SETS_CNT
if (PerlSIO_get_cnt(stdio) != (cnt)) {
assert(PerlSIO_get_cnt(stdio) == (cnt));