summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>1999-02-02 20:38:45 +0000
committerJarkko Hietaniemi <jhi@iki.fi>1999-02-02 20:38:45 +0000
commit968dcd912296607f6d74dceeeccc670bbe106928 (patch)
tree62e2e1c3ba88a2ec7b96113d6e275ba8473323c5 /pp_sys.c
parent628afcb57eaa4f7bb1ceaa4febd38349022e5db1 (diff)
downloadperl-968dcd912296607f6d74dceeeccc670bbe106928.tar.gz
telldir prototype issue, from mists of time...
p4raw-id: //depot/cfgperl@2803
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 538fb684db..a35a2060b9 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -3276,7 +3276,11 @@ PP(pp_telldir)
{
djSP; dTARGET;
#if defined(HAS_TELLDIR) || defined(telldir)
-# ifdef NEED_TELLDIR_PROTO /* XXX does _anyone_ need this? --AD 2/20/1998 */
+ /* XXX does _anyone_ need this? --AD 2/20/1998 */
+ /* XXX netbsd still seemed to.
+ XXX HAS_TELLDIR_PROTO is new style, NEED_TELLDIR_PROTO is old style.
+ --JHI 1999-Feb-02 */
+# if !defined(HAS_TELLDIR_PROTO) || defined(NEED_TELLDIR_PROTO)
long telldir _((DIR *));
# endif
GV *gv = (GV*)POPs;