<?xml version="1.0" encoding="utf-8" standalone="yes"?><rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom"><channel><title>Lisp on Symbolics LISP Engineering</title><link>https://symbolics.lisp.engineer/tag/lisp/</link><description>Recent content in Lisp on Symbolics LISP Engineering</description><generator>Hugo</generator><language>en-US</language><lastBuildDate>Thu, 28 Jul 2016 17:58:34 +0000</lastBuildDate><atom:link href="https://symbolics.lisp.engineer/tag/lisp/index.xml" rel="self" type="application/rss+xml"/><item><title>XL1201 Mini-benchmark</title><link>https://symbolics.lisp.engineer/xl1201-mini-benchmark/</link><pubDate>Sat, 25 Jun 2016 04:09:00 +0000</pubDate><guid>https://symbolics.lisp.engineer/xl1201-mini-benchmark/</guid><description>&lt;p&gt;UPDATED July 28, 2016: More mini-benchmark results added.&lt;/p&gt;&#10;&lt;p&gt;I was asked to do a simple benchmark of the XL1201 by Jerome Ibanes and share the results. Here is his requested code:&lt;/p&gt;&#10;&lt;pre&gt;&lt;code class="language-lisp"&gt;(defun fib(n) &#10; (if (or (= n 0) (= n 1)) &#10; 1 &#10; (+ (fib (- n 1)) (fib (- n 2)))))&#10;(compile 'fib)&#10;(time (fib 30))&#10;&lt;/code&gt;&lt;/pre&gt;&#10;&lt;p&gt;He asked for a few timings with values from 20 to 38.&lt;/p&gt;&#10;&lt;p&gt;For comparison, here is the output from LispWorks Personal 6 on a 2015 MacBook Pro with a 3.1 GHz Core i7:&lt;/p&gt;</description></item></channel></rss>