Login
7 branches 0 tags
Ben (X13/Arch) [closure-caller] -> [closure/caller] and [closure-parent] -> [closure/parent] 7a59dbf 3 years ago 573 Commits
nujel / benchmark / for / common.lisp
(defun test ()
  (let ((ret 0))
    (dotimes (i 10000000)
      (incf ret i))
    ret))

(compile 'test)
(format T "THE RESULT IS ~a~%" (test))