From 10e5c074d9dd2166b752c9b3b0146bf41d4473a1 Mon Sep 17 00:00:00 2001
From: James Cash <james.nvc@gmail.com>
Date: Tue, 3 Jun 2008 05:18:36 -0400
Subject: [PATCH] Fix for changed effect of uncons

---
 extra/project-euler/134/134.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/project-euler/134/134.factor b/extra/project-euler/134/134.factor
index ddba76d5a0..4e54a18f19 100644
--- a/extra/project-euler/134/134.factor
+++ b/extra/project-euler/134/134.factor
@@ -39,7 +39,7 @@ IN: project-euler.134
 PRIVATE>
 
 : euler134 ( -- answer )
-    0 5 lprimes-from uncons [ 1000000 > ] luntil
+    0 5 lprimes-from uncons swap [ 1000000 > ] luntil
     [ [ s + ] keep ] leach drop ;
 
 ! [ euler134 ] 10 ave-time