From a935b8e044c7f01e28d7b75b6aef5ba2cb3e0322 Mon Sep 17 00:00:00 2001
From: David Vazquez <davazp@gmail.com>
Date: Tue, 8 Jan 2013 02:21:14 +0000
Subject: [PATCH] Print returns object itself

---
 ecmalisp.lisp |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ecmalisp.lisp b/ecmalisp.lisp
index f9535ea..215f1b1 100644
--- a/ecmalisp.lisp
+++ b/ecmalisp.lisp
@@ -510,7 +510,8 @@
     x)
 
   (defun print (x)
-    (write-line (print-to-string x))))
+    (write-line (print-to-string x))
+    x))
 
 
 ;;;; Reader
-- 
1.7.10.4