diff --git a/basis/random/mersenne-twister/mersenne-twister.factor b/basis/random/mersenne-twister/mersenne-twister.factor
index 5544a66a5e..e93a264013 100644
--- a/basis/random/mersenne-twister/mersenne-twister.factor
+++ b/basis/random/mersenne-twister/mersenne-twister.factor
@@ -64,9 +64,7 @@ PRIVATE>
 
 M: mersenne-twister seed-random
     init-mt-seq >>seq
-    [ mt-generate ]
-    [ 0 >>i drop ]
-    [ ] tri ;
+    dup mt-generate ;
 
 M: mersenne-twister random-32*
     [ next-index ]