From 2b63029da80ca5176ade4aba6f6d6deaf485084d Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@shill.local>
Date: Sun, 18 Oct 2009 18:57:41 -0500
Subject: [PATCH] vm: fix GC safety issue in non-optimizing compiler

---
 vm/jit.hpp | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/vm/jit.hpp b/vm/jit.hpp
index 63b4454514..6ebc3f2c0e 100644
--- a/vm/jit.hpp
+++ b/vm/jit.hpp
@@ -25,9 +25,10 @@ struct jit {
 		emit_with(parent_vm->userenv[JIT_PUSH_IMMEDIATE],literal);
 	}
 
-	void word_jump(cell word) {
+	void word_jump(cell word_) {
+		gc_root<word> word(word_,parent_vm);
 		literal(tag_fixnum(xt_tail_pic_offset));
-		literal(word);
+		literal(word.value());
 		emit(parent_vm->userenv[JIT_WORD_JUMP]);
 	}