6f1c9878ddbe
Fix some docs
| author | Steve Losh <steve@stevelosh.com> |
|---|---|
| date | Thu, 15 Dec 2016 12:36:37 -0500 |
| parents | e9910edd311c |
| children | 0f2460b0b42e |
| branches/tags | (none) |
| files | DOCUMENTATION.markdown losh.lisp |
Changes
--- a/DOCUMENTATION.markdown Wed Dec 14 17:44:19 2016 -0500 +++ b/DOCUMENTATION.markdown Thu Dec 15 12:36:37 2016 -0500 @@ -238,7 +238,7 @@ &BODY BODY) -Perform `body` with `var` to the results of `lookup-expr`, when valid. +Perform `body` with `var` bound to the result of `lookup-expr`, when valid. `lookup-expr` should be an expression that returns two values, the first being the result (which will be bound to `var`) and the second indicating whether @@ -536,17 +536,17 @@ Examples: - (max 1 10 2) => 10 - (max) => invalid number of arguments + (max 1 10 2) ; => 10 + (max) ; => invalid number of arguments - (funcall (nullary #'max)) => nil - (funcall (nullary #'max 0)) => 0 - (funcall (nullary #'max 0) 1 10 2) => 10 + (funcall (nullary #'max)) ; => nil + (funcall (nullary #'max 0)) ; => 0 + (funcall (nullary #'max 0) 1 10 2) ; => 10 - (reduce #'max nil) => invalid number of arguments - (reduce (nullary #'max) nil) => nil - (reduce (nullary #'max :empty) nil) => :empty - (reduce (nullary #'max) '(1 10 2)) => 10 + (reduce #'max nil) ; => invalid number of arguments + (reduce (nullary #'max) nil) ; => nil + (reduce (nullary #'max :empty) nil) ; => :empty + (reduce (nullary #'max) '(1 10 2)) ; => 10
--- a/losh.lisp Wed Dec 14 17:44:19 2016 -0500 +++ b/losh.lisp Thu Dec 15 12:36:37 2016 -0500 @@ -269,17 +269,17 @@ Examples: - (max 1 10 2) => 10 - (max) => invalid number of arguments - - (funcall (nullary #'max)) => nil - (funcall (nullary #'max 0)) => 0 - (funcall (nullary #'max 0) 1 10 2) => 10 - - (reduce #'max nil) => invalid number of arguments - (reduce (nullary #'max) nil) => nil - (reduce (nullary #'max :empty) nil) => :empty - (reduce (nullary #'max) '(1 10 2)) => 10 + (max 1 10 2) ; => 10 + (max) ; => invalid number of arguments + + (funcall (nullary #'max)) ; => nil + (funcall (nullary #'max 0)) ; => 0 + (funcall (nullary #'max 0) 1 10 2) ; => 10 + + (reduce #'max nil) ; => invalid number of arguments + (reduce (nullary #'max) nil) ; => nil + (reduce (nullary #'max :empty) nil) ; => :empty + (reduce (nullary #'max) '(1 10 2)) ; => 10 " (lambda (&rest args) @@ -335,7 +335,7 @@ (recur ,@(mapcar #'extract-val bindings))))) (defmacro when-found (var lookup-expr &body body) - "Perform `body` with `var` to the results of `lookup-expr`, when valid. + "Perform `body` with `var` bound to the result of `lookup-expr`, when valid. `lookup-expr` should be an expression that returns two values, the first being the result (which will be bound to `var`) and the second indicating whether