From: Jonathan Stowe <gellyfish@gellyfish.com>
Date: Sun, 1 Apr 2001 10:04:55 +0000 (+0100)
Subject: [PATH bsd_glob.c perl@9472] Shut up gcc warning in bsd_glob.c
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3fcf1688d7dab5cc2430127221a7bc4cc93ed344;p=p5sagit%2Fp5-mst-13.2.git

[PATH bsd_glob.c perl@9472] Shut up gcc warning in bsd_glob.c
Message-ID: <Pine.LNX.4.30.0104010958250.7703-100000@orpheus.gellyfish.com>

p4raw-id: //depot/perl@9509
---

diff --git a/ext/File/Glob/bsd_glob.c b/ext/File/Glob/bsd_glob.c
index 1a12ddf..15ee659 100644
--- a/ext/File/Glob/bsd_glob.c
+++ b/ext/File/Glob/bsd_glob.c
@@ -710,7 +710,7 @@ glob3(Char *pathbuf, Char *pathend, Char *pattern,
 
 	/* Search directory for matching names. */
 	if (pglob->gl_flags & GLOB_ALTDIRFUNC)
-		readdirfunc = pglob->gl_readdir;
+               readdirfunc = (Direntry_t *(*)(DIR *))pglob->gl_readdir;
 	else
 		readdirfunc = my_readdir;
 	while ((dp = (*readdirfunc)(dirp))) {