From 32f5e4ecdbfe08dc4549e5fa371a98bca104b46c Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 21 Feb 2003 09:33:05 +0000
Subject: * io.c (argf_to_io): should prefetch argv.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_6@3525 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 eval.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'eval.c')

diff --git a/eval.c b/eval.c
index 2b019264e3..f21c5c1333 100644
--- a/eval.c
+++ b/eval.c
@@ -7891,7 +7891,9 @@ rb_thread_schedule()
 	next->gid = 0;
 	rb_thread_ready(next);
 	next->status = THREAD_TO_KILL;
-	rb_thread_save_context(curr_thread);
+	if (!rb_thread_dead(curr_thread)) {
+	    rb_thread_save_context(curr_thread);
+	}
 	rb_thread_deadlock();
     }
     next->wait_for = 0;
-- 
cgit v1.2.3