Resolved merge.

[factor.git] / extra / project-euler / 117 / 117.factor

diff --git a/extra/project-euler/117/117.factor b/extra/project-euler/117/117.factor
index cb485d3ce237fbef8b8fff6d32c19a73cc2e5b9a..0d4ec782269f4b1d4777da7e7dd8045c06ccc1ff 100644 (file)
--- a/extra/project-euler/117/117.factor
+++ b/extra/project-euler/117/117.factor
@@ -31,7 +31,7 @@ IN: project-euler.117
     [ 4 short tail* sum ] keep push ;
 
 : (euler117) ( n -- m )
-    V{ 1 } clone tuck [ next ] curry times peek ;
+    V{ 1 } clone tuck [ next ] curry times last ;
 
 PRIVATE>