assocs.extras: Move some often-used words to core

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

diff --git a/extra/project-euler/164/164.factor b/extra/project-euler/164/164.factor
index 0a038cf67ae319638d06693faeeefbfd0339ddda..caead44a7ef7000fcbb9ef8d59132ecbd0779d72 100644 (file)
--- a/extra/project-euler/164/164.factor
+++ b/extra/project-euler/164/164.factor
@@ -32,7 +32,7 @@ IN: project-euler.164
 PRIVATE>
 
 : euler164 ( -- answer )
-    init-table 19 [ next-table ] times values sum ;
+    init-table 19 [ next-table ] times sum-values ;
 
 ! [ euler164 ] 100 ave-time
 ! 7 ms ave run time - 1.23 SD (100 trials)