(loop :for i :from 0 :to 100 :do (print i) :when (= i 5) :do (print "Goodbye, I reached five.") :when (= i 5) :return i)