From 3bc42d0d37bc0aa1f2e9bf8fbe82769906ba57db Mon Sep 17 00:00:00 2001
From: Calvin Rose <calsrose@gmail.com>
Date: Mon, 19 Feb 2024 13:19:23 -0600
Subject: [PATCH] Only re-register when using poll.

---
 src/core/ev.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/core/ev.c b/src/core/ev.c
index 7422e562..3aa0e9a9 100644
--- a/src/core/ev.c
+++ b/src/core/ev.c
@@ -451,7 +451,9 @@ static void *janet_stream_unmarshal(JanetMarshalContext *ctx) {
 #else
     p->handle = (JanetHandle) janet_unmarshal_int(ctx);
 #endif
+#ifdef JANET_EV_POLL
     janet_register_stream(p);
+#endif
     return p;
 }
 
@@ -1457,7 +1459,7 @@ void janet_ev_deinit(void) {
     CloseHandle(janet_vm.iocp);
 }
 
-void janet_register_stream(JanetStream *stream) {
+static void janet_register_stream(JanetStream *stream) {
     if (NULL == CreateIoCompletionPort(stream->handle, janet_vm.iocp, (ULONG_PTR) stream, 0)) {
         janet_panicf("failed to listen for events: %V", janet_ev_lasterr());
     }