diff options
author | sarthfrey <sarth.frey@gmail.com> | 2016-01-25 18:26:23 -0500 |
---|---|---|
committer | sarthfrey <sarth.frey@gmail.com> | 2016-01-25 18:26:23 -0500 |
commit | 279c28ce7dcc3f155f71c7a073e939630e8f05b6 (patch) | |
tree | cd06525da5a4350916143f025b2e5a64a56922aa /common-lisp.html.markdown | |
parent | 299d064ecf7598144e49ef336e0abd00ccc4ae16 (diff) | |
parent | 928edf12092cea82a9eded6848b8d0b0710a977c (diff) |
Merge remote-tracking branch 'adambard/master'
# Conflicts:
# python.html.markdown
Diffstat (limited to 'common-lisp.html.markdown')
-rw-r--r-- | common-lisp.html.markdown | 4 |
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 |