Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...

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

diff --git a/extra/project-euler/092/092.factor b/extra/project-euler/092/092.factor
index 4901eae3428af4eb4f058a563b862d90a2d4a1b5..9f22460b3cb69cf34eb392e53490f9e2a033ece9 100644 (file)
--- a/extra/project-euler/092/092.factor
+++ b/extra/project-euler/092/092.factor
@@ -38,7 +38,7 @@ IN: project-euler.092
     567 [1,b] [ chain-ending ] map ;
 
 : fast-chain-ending ( seq n -- m )
-    dup 567 > [ next-link ] when 1- swap nth ;
+    dup 567 > [ next-link ] when 1 - swap nth ;
 
 PRIVATE>