From 078571265690274aac73ac38ec082996a2705028 Mon Sep 17 00:00:00 2001
From: slava <slava@factorcode.org>
Date: Tue, 5 Dec 2006 06:23:32 +0000
Subject: [PATCH] compile-quot no longer honors "compile" variable

---
 core/compiler/compiler.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/core/compiler/compiler.factor b/core/compiler/compiler.factor
index 59930220f0..68565b83c5 100644
--- a/core/compiler/compiler.factor
+++ b/core/compiler/compiler.factor
@@ -67,7 +67,7 @@ M: f batch-ends drop ;
     vocabs compile-vocabs changed-words get clear-hash ;
 
 : compile-quot ( quot -- word )
-    define-temp "compile" get [ dup compile ] when ;
+    define-temp dup compile ;
 
 : compile-1 ( quot -- ) compile-quot execute ;