diff --git a/generate.l b/generate.l
index df6fe82..dd15d74 100644
--- a/generate.l
+++ b/generate.l
@@ -1,7 +1,8 @@
 (load "ed25519.l")
 
 (setq SK (range 0 63))
-(do 1000
+(for N 1000
+   (println 'N N)
    (setq PK (publickey (head 32 SK)))
    (setq SK  (signature SK (head 32 SK) PK)) )
    (println (L2hex SK))