From a9f140e118f99cddcc3b78faad476d68a5b27f0f Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 25 Dec 2007 01:33:56 +0000
Subject: [PATCH] remove unnecessary assignment

svn: r8119
---
 src/mzscheme/src/port.c | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/src/mzscheme/src/port.c b/src/mzscheme/src/port.c
index 40e2ba6238..028222e656 100644
--- a/src/mzscheme/src/port.c
+++ b/src/mzscheme/src/port.c
@@ -977,9 +977,6 @@ void scheme_suspend_remembered_threads(void)
       prev = tm;
     }
   }
-
-  if (prev)
-    prev->next = NULL;
 }
 
 void scheme_resume_remembered_threads(void)