Share Pastebin
Guest
Public paste!

Untitled

By: a guest | Jun 4th, 2010 | Syntax: Lisp | Size: 0.12 KB | Hits: 230 | Expires: Never
This paste has a previous version, view the difference. Copy text to clipboard
  1. (def xs (iterate inc 1))
  2.  
  3. (loop [xs (take 10000000 xs)]
  4.   (when xs
  5.     (println (str "x is " x))
  6.     (recur (rest xs))))