From 68c717b14f4bd94a041115f15d192a0c28714b6c Mon Sep 17 00:00:00 2001
From: =?utf8?q?David=20V=C3=A1zquez?= <davazp@gmail.com>
Date: Thu, 25 Apr 2013 23:03:24 +0100
Subject: [PATCH] Add test case for ticket #23

---
 tests/setf.lisp |    5 +++++
 1 file changed, 5 insertions(+)
 create mode 100644 tests/setf.lisp

diff --git a/tests/setf.lisp b/tests/setf.lisp
new file mode 100644
index 0000000..2107115
--- /dev/null
+++ b/tests/setf.lisp
@@ -0,0 +1,5 @@
+
+(test (= 2
+         (let ((x 0))
+           (incf x (setf x 1))
+           x)))
-- 
1.7.10.4