doc/manual/texinfo-macros.texinfo

   1 @c Some plain TeX macrology to wrap text in \hbox{} only if the text
   2 @c contains no hyphens.
   3 @iftex
   4 @tex
   5 \newif\ifdash
   6 \long\def\dashp#1{\expandafter\setnext#1-\dashphelper}
   7 \long\def\setnext#1-{\futurelet\next\dashphelper}
   8 \long\def\dashphelper#1\dashphelper{
   9   \ifx\dashphelper\next\dashfalse\else\dashtrue\fi
  10 }
  11 \def\llw#1{\leavevmode\dashp{#1}\ifdash#1\else\hbox{#1}\fi}
  12 @end tex
  13 @end iftex
  14
  15 @c A Texinfo binding for the plain TeX above.  Analogous to Texinfo's
  16 @c @w, but for Lisp symbols.  AFAICT, the comment characters are
  17 @c necessary to prevent treating the newline as a space.
  18 @iftex
  19 @macro lw{word}
  20 \\llw{\word\}%
  21 @end macro
  22 @end iftex
  23 @ifnottex
  24 @macro lw{word}
  25 \word\
  26 @end macro
  27 @end ifnottex
  28
  29 @c Some index prettification helper macros, for tricking the texindex
  30 @c collation "engine"
  31 @macro earmuffs{name}
  32 *\name\*
  33 @end macro
  34 @macro setf{name}
  35 (setf \name\)
  36 @end macro
  37 @include docstrings/package-macros.texinfo