Login

Ben / Nujel

Overview Code Talk CI Settings
7 branches 0 tags
Ben (Xeon/FreeBSD) C-Asset-Packer now procues string literals 81140db 3 years ago 933 Commits
nujel / benchmark / for / common.lisp
Raw
application/octet-stream • 151 B • 9 lines 
(defun test ()
  (let ((ret 0))
    (dotimes (i 10000000)
      (incf ret i))
    ret))

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