From: Christophe R. <cr...@us...> - 2007-04-30 11:26:14
|
Update of /cvsroot/sbcl/sbcl/doc/manual In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv30874/doc/manual Modified Files: docstrings.lisp gray-streams-examples.texinfo sbcl.texinfo Added Files: texinfo-macros.texinfo Log Message: 1.0.5.13: better wordbreaks in manual Patch from Richard Kreuter, sbcl-devel 2006-12-22 Also fix the Gray input stream example to inherit from an input stream rather than from an output stream. --- NEW FILE: texinfo-macros.texinfo --- @c Some plain TeX macrology to wrap text in \hbox{} only if the text @c contains no hyphens. @iftex @tex \newif\ifdash \long\def\dashp#1{\expandafter\setnext#1-\dashphelper} \long\def\setnext#1-{\futurelet\next\dashphelper} \long\def\dashphelper#1\dashphelper{ \ifx\dashphelper\next\dashfalse\else\dashtrue\fi } \def\lw#1{\leavevmode\dashp{#1}\ifdash#1\else\hbox{#1}\fi} @end tex @end iftex @c A Texinfo binding for the plain TeX above. Analogous to Texinfo's @c @w, but for Lisp symbols. AFAICT, the comment characters are @c necessary to prevent treating the newline as a space. @macro lw{word} @iftex @tex \\lw{\word\}% @end tex @end iftex @ifnottex \word\@c @end ifnottex @end macro Index: docstrings.lisp =================================================================== RCS file: /cvsroot/sbcl/sbcl/doc/manual/docstrings.lisp,v retrieving revision 1.17 retrieving revision 1.18 diff -u -d -r1.17 -r1.18 --- docstrings.lisp 27 Mar 2007 05:58:07 -0000 1.17 +++ docstrings.lisp 30 Apr 2007 11:26:09 -0000 1.18 @@ -702,7 +702,7 @@ (when (member (get-kind doc) '(class structure condition)) (let ((name (get-name doc))) ;; class precedence list - (format *texinfo-output* "Class precedence list: @code{~(~{@w{~A}~^, ~}~)}~%~%" + (format *texinfo-output* "Class precedence list: @code{~(~{@lw{~A}~^, ~}~)}~%~%" (remove-if (lambda (class) (hide-superclass-p name class)) (mapcar #'class-name (ensure-class-precedence-list (find-class name))))) ;; slots Index: gray-streams-examples.texinfo =================================================================== RCS file: /cvsroot/sbcl/sbcl/doc/manual/gray-streams-examples.texinfo,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- gray-streams-examples.texinfo 18 Apr 2007 06:00:02 -0000 1.2 +++ gray-streams-examples.texinfo 30 Apr 2007 11:26:09 -0000 1.3 @@ -48,7 +48,7 @@ @group (defclass wrapped-character-input-stream - (wrapped-stream fundamental-character-output-stream) + (wrapped-stream fundamental-character-input-stream) ()) @end group Index: sbcl.texinfo =================================================================== RCS file: /cvsroot/sbcl/sbcl/doc/manual/sbcl.texinfo,v retrieving revision 1.17 retrieving revision 1.18 diff -u -d -r1.17 -r1.18 --- sbcl.texinfo 16 Dec 2005 15:06:12 -0000 1.17 +++ sbcl.texinfo 30 Apr 2007 11:26:09 -0000 1.18 @@ -4,6 +4,7 @@ @settitle SBCL User Manual @c %**end of header +@include texinfo-macros.texinfo @include variables.texinfo @set EDITION 0.1 @settitle SBCL @value{VERSION} User Manual |