From 31491df5f1c551a5262e16d273b49acea8b9d6d9 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@shill.local>
Date: Wed, 22 Jul 2009 06:05:33 -0500
Subject: [PATCH] Removed unused code from compiler.cfg.def-use

---
 basis/compiler/cfg/def-use/def-use.factor | 9 ---------
 1 file changed, 9 deletions(-)

diff --git a/basis/compiler/cfg/def-use/def-use.factor b/basis/compiler/cfg/def-use/def-use.factor
index 1c52c081a1..0f488de559 100644
--- a/basis/compiler/cfg/def-use/def-use.factor
+++ b/basis/compiler/cfg/def-use/def-use.factor
@@ -49,12 +49,3 @@ M: _conditional-branch uses-vregs [ src1>> ] [ src2>> ] bi 2array ;
 M: _compare-imm-branch uses-vregs src1>> 1array ;
 M: _dispatch uses-vregs src>> 1array ;
 M: insn uses-vregs drop f ;
-
-: map-unique ( seq quot -- assoc )
-    map concat unique ; inline
-
-: gen-set ( instructions -- seq )
-    [ uses-vregs ] map-unique ;
-
-: kill-set ( instructions -- seq )
-    [ defs-vregs ] map-unique ;