Attached is a patch for a couple of random warnings I've looked at but
haven't gotten to fixing. The fix in nostdio.h is complained about
by gcc if compiling with -Wundef. The change in perl.c is complained about
by bcc without -DDEBUGGING. It looks like bcc dislike code like "if(0){".
Enjoy!
Steve Peters
[EMAIL PROTECTED]
--- nostdio.h.old 2003-04-16 16:25:36.000000000 -0500
+++ nostdio.h 2005-08-09 06:09:00.000000000 -0500
@@ -111,7 +111,7 @@
#define _flsbuf(c,f) _CANNOT _flsbuf_
#define fdopen(fd,p) _CANNOT _fdopen_
#define fileno(f) _CANNOT _fileno_
-#if SFIO_VERSION < 20000101L
+#if defined(SFIO_VERSION) && SFIO_VERSION < 20000101L
#define flockfile(f) _CANNOT _flockfile_
#define ftrylockfile(f) _CANNOT _ftrylockfile_
#define funlockfile(f) _CANNOT _funlockfile_
--- perl.c.old 2005-07-20 07:58:35.000000000 -0500
+++ perl.c 2005-08-09 06:20:32.000000000 -0500
@@ -2238,8 +2238,10 @@
if (!PL_restartop) {
DEBUG_x(dump_all());
+#ifdef DEBUGGING
if (!DEBUG_q_TEST)
PERL_DEBUG(PerlIO_printf(Perl_debug_log, "\nEXECUTING...\n\n"));
+#endif
DEBUG_S(PerlIO_printf(Perl_debug_log, "main thread is 0x%"UVxf"\n",
PTR2UV(thr)));
