Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
alexandria
alexandria
Commits
85f82ed8
Commit
85f82ed8
authored
Nov 23, 2016
by
Steve Losh
Committed by
Attila Lendvai
Nov 23, 2016
Browse files
housekeeping
fix typos in docstring and error messages.
parent
7a42065f
Changes
2
Hide whitespace changes
Inline
Side-by-side
control-flow.lisp
View file @
85f82ed8
...
...
@@ -68,7 +68,7 @@ returns the values of DEFAULT if no keys match."
,
(
expand
possibilities
0
random-number
)))))))
(
defmacro
xor
(
&rest
datums
)
"Evaluates its arguments one at a time, from left to right. If more th
e
n one
"Evaluates its arguments one at a time, from left to right. If more th
a
n one
argument evaluates to a true value no further DATUMS are evaluated, and NIL is
returned as both primary and secondary value. If exactly one argument
evaluates to true, its value is returned as the primary value after all the
...
...
io.lisp
View file @
85f82ed8
...
...
@@ -33,7 +33,7 @@ FILE-NAME. ARGS is sent as is to the call to OPEN except EXTERNAL-FORMAT,
which is only sent to WITH-OPEN-FILE when it's not NIL."
(
declare
(
ignore
direction
))
(
when
direction-p
(
error
"Can't specif
i
y :DIRECTION for WITH-INPUT-FROM-FILE."
))
(
error
"Can't specify :DIRECTION for WITH-INPUT-FROM-FILE."
))
`
(
with-open-file*
(
,
stream-name
,
file-name
:direction
:input
,@
args
)
,@
body
))
...
...
@@ -46,7 +46,7 @@ FILE-NAME. ARGS is sent as is to the call to OPEN except EXTERNAL-FORMAT,
which is only sent to WITH-OPEN-FILE when it's not NIL."
(
declare
(
ignore
direction
))
(
when
direction-p
(
error
"Can't specif
i
y :DIRECTION for WITH-OUTPUT-TO-FILE."
))
(
error
"Can't specify :DIRECTION for WITH-OUTPUT-TO-FILE."
))
`
(
with-open-file*
(
,
stream-name
,
file-name
:direction
:output
,@
args
)
,@
body
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment