OS/2: provide prototype.

[perl5.git] / os2 / os2ish.h

diff --git a/os2/os2ish.h b/os2/os2ish.h
index a60e573..22ea083 100644 (file)
--- a/os2/os2ish.h
+++ b/os2/os2ish.h
@@ -382,6 +382,8 @@ void *emx_realloc (void *, size_t);
 # define HAS_BOOL 1
 #endif
 
+extern int* _fd_flags(int fd); /* where's the real prototype of this? */
+
 static inline bool
 _PERLIO_IS_BINMODE_FD(int fd)
 {