chiark
/
gitweb
/
~mdw
/
sod
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
d6bb2cc
)
src/module-output.lisp: Set right margin to 77 characters.
author
Mark Wooding
<mdw@distorted.org.uk>
Tue, 15 Dec 2015 18:32:22 +0000
(18:32 +0000)
committer
Mark Wooding
<mdw@distorted.org.uk>
Sun, 29 May 2016 13:40:41 +0000
(14:40 +0100)
This is my usual target width.
src/module-output.lisp
patch
|
blob
|
blame
|
history
diff --git
a/src/module-output.lisp
b/src/module-output.lisp
index 1bfb34fb92926b65a0c905d224671b08d1d6e0c8..c3c61d6c534fb4786707e1626d6e735b110f796f 100644
(file)
--- a/
src/module-output.lisp
+++ b/
src/module-output.lisp
@@
-87,7
+87,8
@@
(defun output-module (module reason stream)
"Write the MODULE to STREAM, giving the output machinery the REASON.
This is the top-level interface for producing output."
- (let ((*done-one-off-output* nil)
+ (let ((*print-right-margin* 77)
+ (*done-one-off-output* nil)
(sequencer (make-instance 'sequencer))
(stream (if (typep stream 'position-aware-output-stream)
stream