From a45d8a64095e7dfd6664107609fdd74c75fcc85e Mon Sep 17 00:00:00 2001
From: Eduardo Cavazos <dharmatech@finkelstein.stackeffects.info>
Date: Wed, 2 Jul 2008 12:09:03 -0500
Subject: [PATCH] bake: handle integers before sequences

---
 extra/bake/bake.factor | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/extra/bake/bake.factor b/extra/bake/bake.factor
index 834a345821..71818bc5c6 100644
--- a/extra/bake/bake.factor
+++ b/extra/bake/bake.factor
@@ -1,5 +1,6 @@
 
 USING: kernel parser namespaces sequences quotations arrays vectors splitting
+       math
        macros arrays.lib combinators.lib combinators.conditional newfx ;
 
 IN: bake
@@ -19,6 +20,7 @@ DEFER: [bake]
 : broil-element ( obj -- quot )
     {
       { [ comma?    ] [ drop [ >r ]          ] }
+      { [ integer?  ] [ [ >r ] prefix-on     ] }
       { [ sequence? ] [ [bake] [ >r ] append ] }
       { [ drop t    ] [ [ >r ] prefix-on     ] }
     }