diff options
| author | Nicholas Clark <nick@ccl4.org> | 2005-04-06 15:05:32 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2005-04-06 15:05:32 +0000 |
| commit | 8f77bfdb1ccc695676a1e8260398001deb0b18cf (patch) | |
| tree | 7a990401bd6bdfecf31f0b183c4546c7953f580b /ext | |
| parent | a221a8a55f0bbb6b52da5c544e7bc886f16754e8 (diff) | |
| download | perl-8f77bfdb1ccc695676a1e8260398001deb0b18cf.tar.gz | |
Casting to/from (void *) sufficient to make a C++ compiler happy.
p4raw-id: //depot/perl@24175
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/File/Glob/bsd_glob.c | 2 | ||||
| -rw-r--r-- | ext/threads/shared/shared.xs | 2 | ||||
| -rwxr-xr-x | ext/threads/threads.xs | 4 |
3 files changed, 4 insertions, 4 deletions
diff --git a/ext/File/Glob/bsd_glob.c b/ext/File/Glob/bsd_glob.c index c01e75a6e1..31d3aa45ac 100644 --- a/ext/File/Glob/bsd_glob.c +++ b/ext/File/Glob/bsd_glob.c @@ -1141,7 +1141,7 @@ g_opendir(register Char *str, glob_t *pglob) } if (pglob->gl_flags & GLOB_ALTDIRFUNC) - return((*pglob->gl_opendir)(buf)); + return((DIR*)(*pglob->gl_opendir)(buf)); return(PerlDir_open(buf)); } diff --git a/ext/threads/shared/shared.xs b/ext/threads/shared/shared.xs index f9222420c7..1ac3dce832 100644 --- a/ext/threads/shared/shared.xs +++ b/ext/threads/shared/shared.xs @@ -304,7 +304,7 @@ Perl_sharedsv_associate(pTHX_ SV **psv, SV *ssv, shared_sv *data) ssv = newSV(0); SvREFCNT(ssv) = 0; } - data = PerlMemShared_malloc(sizeof(shared_sv)); + data = (shared_sv *) PerlMemShared_malloc(sizeof(shared_sv)); Zero(data,1,shared_sv); SHAREDSvPTR(data) = ssv; /* Tag shared side SV with data pointer */ diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs index 00ef0aa3f0..693c922c82 100755 --- a/ext/threads/threads.xs +++ b/ext/threads/threads.xs @@ -388,7 +388,7 @@ Perl_ithread_create(pTHX_ SV *obj, char* classname, SV* init_function, SV* param MUTEX_LOCK(&create_destruct_mutex); - thread = PerlMemShared_malloc(sizeof(ithread)); + thread = (ithread *) PerlMemShared_malloc(sizeof(ithread)); if (!thread) { MUTEX_UNLOCK(&create_destruct_mutex); PerlLIO_write(PerlIO_fileno(Perl_error_log), @@ -760,7 +760,7 @@ BOOT: MUTEX_INIT(&create_destruct_mutex); MUTEX_LOCK(&create_destruct_mutex); PL_threadhook = &Perl_ithread_hook; - thread = PerlMemShared_malloc(sizeof(ithread)); + thread = (ithread *) PerlMemShared_malloc(sizeof(ithread)); if (!thread) { PerlLIO_write(PerlIO_fileno(Perl_error_log), PL_no_mem, strlen(PL_no_mem)); |