Merge branch 'master' of git://factorcode.org/git/factor

diff --cc extra/project-euler/common/common.factor
index 49eb730632ba868c5ec75dd7c742864a2b478d74,ac8986b3ffbef338a200a0ba625f2f34dce20184..18ab752a0e35652a6bf6fffebd5790a4efa061cf
--- 1/extra/project-euler/common/common.factor
--- 2/extra/project-euler/common/common.factor
+++ b/extra/project-euler/common/common.factor
@@@ -72,11 -72,8 +72,11 @@@ PRIVATE
      ] if ;
  
  : number>digits ( n -- seq )
-     [ dup 0 = not ] [ 10 /mod ] [ ] produce reverse nip ;
+     [ dup 0 = not ] [ 10 /mod ] produce reverse nip ;
  
 +: number-length ( n -- m )
 +    log10 floor 1+ >integer ;
 +
  : nth-triangle ( n -- n )
      dup 1+ * 2 / ;