summaryrefslogtreecommitdiffhomepage
path: root/common-lisp.html.markdown
diff options
context:
space:
mode:
authorsarthfrey <sarth.frey@gmail.com>2016-01-25 18:26:23 -0500
committersarthfrey <sarth.frey@gmail.com>2016-01-25 18:26:23 -0500
commit279c28ce7dcc3f155f71c7a073e939630e8f05b6 (patch)
treecd06525da5a4350916143f025b2e5a64a56922aa /common-lisp.html.markdown
parent299d064ecf7598144e49ef336e0abd00ccc4ae16 (diff)
parent928edf12092cea82a9eded6848b8d0b0710a977c (diff)
Merge remote-tracking branch 'adambard/master'
# Conflicts: # python.html.markdown
Diffstat (limited to 'common-lisp.html.markdown')
-rw-r--r--common-lisp.html.markdown4
1 files changed, 2 insertions, 2 deletions
diff --git a/common-lisp.html.markdown b/common-lisp.html.markdown
index 2b1f5de4..9a23bc26 100644
--- a/common-lisp.html.markdown
+++ b/common-lisp.html.markdown
@@ -339,7 +339,7 @@ nil ; for false - and the empty list
;; The () in the above is the list of arguments for the function
(defun hello (name)
- (format nil "Hello, ~a " name))
+ (format nil "Hello, ~a" name))
(hello "Steve") ; => "Hello, Steve"
@@ -430,7 +430,7 @@ nil ; for false - and the empty list
(defun walker (n)
(if (zerop n)
:walked
- (walker (1- n))))
+ (walker (- n 1))))
(walker 5) ; => :walked