diff --git a/stdlib/stdlib.lsp b/stdlib/stdlib.lsp
index d4e5757..538f3af 100644
--- a/stdlib/stdlib.lsp
+++ b/stdlib/stdlib.lsp
@@ -33,9 +33,9 @@
 	(define i 0)
 	(for e lst
         (if (= i 0)
-			(define rslt (display e))
-			(define rslt (+ rslt (display sep) (display e))))
-		(define i (inc i)))
+			(do (define rslt (display e)) (define i 1))
+			(define rslt (+ rslt (display sep) (display e)))
+            ))
 	rslt
 	))