with DEBUG_LEAKING_SCALARS, dump multiply-freed scalars

[p5sagit/p5-mst-13.2.git] / ext / IO / poll.c

diff --git a/ext/IO/poll.c b/ext/IO/poll.c
index 02a99b9..9d39d57 100644 (file)
--- a/ext/IO/poll.c
+++ b/ext/IO/poll.c
@@ -135,3 +135,12 @@ again:
 }
 
 #endif /* EMULATE_POLL_WITH_SELECT */
+
+/* gcc for SunOS 4 produces code from an empty (code/symbolwise)
+ * source code file that makes the SunOS 4.x /usr/bin/ld fail with
+ * ld: poll.o: premature EOF
+ * To avoid this, have at least something in here.  */
+#if defined(__sun) && !defined(__SVR4) && defined(__GNUC__)
+static int dummy;
+#endif
+