From b810e924561328f0b4472f3ad56da9cb1175d6a6 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Wed, 26 Dec 2007 21:21:12 -0500
Subject: [PATCH] Move optimizer to extra/

---
 {core => extra}/optimizer/debugger/debugger.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)
 rename {core => extra}/optimizer/debugger/debugger.factor (97%)
 mode change 100644 => 100755

diff --git a/core/optimizer/debugger/debugger.factor b/extra/optimizer/debugger/debugger.factor
old mode 100644
new mode 100755
similarity index 97%
rename from core/optimizer/debugger/debugger.factor
rename to extra/optimizer/debugger/debugger.factor
index ed0358fe7f..900f5a3829
--- a/core/optimizer/debugger/debugger.factor
+++ b/extra/optimizer/debugger/debugger.factor
@@ -73,8 +73,8 @@ M: #push node>quot nip pushed-literals % ;
 DEFER: dataflow>quot
 
 : #call>quot ( ? node -- )
-    dup node-param dup
-    [ , dup effect-str comment, ] [ 3drop ] if ;
+    dup node-param dup ,
+    [ dup effect-str ] [ "empty call" ] if comment, ;
 
 M: #call node>quot #call>quot ;