diff --git a/free-programming-books.md b/free-programming-books.md
index 503083fe2..ae692d810 100644
--- a/free-programming-books.md
+++ b/free-programming-books.md
@@ -1045,6 +1045,7 @@ See also [TeX](#tex)
 * [Common Lisp Quick Reference](http://clqr.boundp.org/)
 * [Common Lisp the Language, 2nd Edition](http://www.cs.cmu.edu/Groups/AI/html/cltl/mirrors.html)
 * [Common Lisp: A Gentle Introduction to Symbolic Computation](http://www.cs.cmu.edu/~dst/LispBook/) - David S. Touretzky
+* [Common Lisp: An Interactive Approach](http://www.cse.buffalo.edu/~shapiro/Commonlisp/) - Stuart C. Shapiro
 * [Google's Common Lisp Style Guide](http://google-styleguide.googlecode.com/svn/trunk/lispguide.xml)
 * [Interpreting LISP](http://www.civilized.com/files/lispbook.pdf) - Gary D. Knott
 * [Let Over Lambda - 50 Years of Lisp](http://letoverlambda.com/index.cl/toc)