From 09fb8d878b5179435047f6501b0767a96cc68d70 Mon Sep 17 00:00:00 2001 From: Eduardo Cavazos Date: Mon, 30 Jun 2008 10:36:13 -0500 Subject: [PATCH] bake: use combinators.conditional --- extra/bake/bake.factor | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/extra/bake/bake.factor b/extra/bake/bake.factor index da48cd2755..7a12a3cc97 100644 --- a/extra/bake/bake.factor +++ b/extra/bake/bake.factor @@ -1,17 +1,11 @@ USING: kernel parser combinators sequences splitting quotations arrays macros - arrays.lib combinators.cleave newfx dns.util ; + arrays.lib combinators.cleave combinators.conditional newfx ; IN: bake ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! -MACRO: 1cond ( tbl -- ) - [ [ 1st [ dup ] prepend ] [ 2nd ] bi {2} ] map - [ cond ] prefix-on ; - -! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! - SYMBOL: , SYMBOL: @