Changeset 40024 for trunk

Timestamp:

May 8, 2017, 5:48:49 AM (9 years ago)

Author:

eugene

Message:

major rework on code.sty to allow use of new-style font mod commands (e.g., \textbf{})

File:

• trunk/doc/release.2015/inputs/code.sty (modified) (3 diffs)

trunk/doc/release.2015/inputs/code.sty

@@ +1 @@
+
+% the stuff below is used to define commands which disable LaTeX interpretation 
+% of special characters.
+
+% first thing to know: there is a special internal definition in the latex kernel:
+% \def\dospecials{\do\ \do\\\do\{\do\}\do\$\do\&\do\#\do\^\do\_\do\%\do\~}
+
+% this command (uncatcodespecials) re-defines the \do command used above to 
+% pass its arguments to \catcode`[arg]=12.  thus calling the command
+% uncatcodespecials essentially iteratively sets the catcode for all of those
+% special characters to be catcode 12 (which just prints the character)
 \def\uncatcodespecials{\def\do##1{\catcode`##1=12}\dospecials}%
-{\catcode`\`=\active\gdef`{\relax\lq}}% this line inhibits Spanish 
-                                      % ligatures ?` and !` of \tt font
+
+% this line inhibits Spanish ligatures ?` and !` of \tt font
+{\catcode`\`=\active\gdef`{\relax\lq}}
+
 \def\setupc@de % see TeX Book, p. 381
-    {\tt %
-     \spaceskip=0pt \xspaceskip=0pt % just in case...
+    {\spaceskip=0pt \xspaceskip=0pt
      \catcode`\`=\active
      \uncatcodespecials \obeyspaces
@@ -10 +22 @@
     }%
 \def\SETUPC@DE % see TeX Book, p. 381
-    {\tt %
-     \spaceskip=0pt \xspaceskip=0pt % just in case...
+    {
+     \spaceskip=0pt \xspaceskip=0pt
      \catcode`\`=\active
      \uncatcodespecials \obeyspaces
     }%
 
-\def\d@code#1{#1\endgroup}%
-\def\D@CODE#1{\def\next##1#1{##1\endgroup}\next}%
+\def\d@code#1{\texttt{#1}\endgroup}%
+\def\D@CODE#1{\def\next##1\texttt{#1}{##1\endgroup}\next}%
 
 \def\code{\begingroup\setupc@de\d@code}%
@@ -23 +35 @@
 \def\nocode#1{#1}
 
-\def\setupIPPstage %
-  {\sc %
-    \spaceskip=0pt \xspaceskip=0pt %
-    \catcode`\`=\active
-    \uncatcodespecials \obeyspaces
-    \catcode`\{=1\catcode`\}=2
-  }%
+\def\IPPstageEND#1{\textsc{#1}\endgroup}%
+\def\IPPstage{\begingroup\setupc@de\IPPstageEND}%
 
-\def\IPPstage{\begingroup\setupIPPstage\d@code}%
+\def\IPPdbtableEND#1{\textit{#1}\endgroup}%
+\def\IPPdbtable{\begingroup\setupc@de\IPPdbtableEND}%
 
-\def\setupIPPdbtable %
- {\it %
-   \spaceskip=0pt \xspaceskip=0pt %
-   \catcode`\`=\active
-   \uncatcodespecials \obeyspaces
-   \catcode`\{=1\catcode`\}=2
- }%
+\def\IPPdbcolumnEND#1{\textbf{#1}\endgroup}%
+\def\IPPdbcolumn{\begingroup\setupc@de\IPPdbcolumnEND}
 
-\def\IPPdbtable{\begingroup\setupIPPdbtable\d@code}%
+\def\IPPprogEND#1{\textit{\textbf{#1}}\endgroup}%
+\def\IPPprog{\begingroup\setupc@de\IPPprogEND}
 
-\def\setupIPPdbcolumn %
-  {\bf %
-    \spaceskip=0pt \xspaceskip=0pt %
-    \catcode`\`=\active
-    \uncatcodespecials \obeyspaces
-    \catcode`\{=1\catcode`\}=2
-  }%
-
-\def\IPPdbcolumn{\begingroup\setupIPPdbcolumn\d@code}
-
-\def\setupIPPmisc %
-  {\tt %
-    \spaceskip=0pt \xspaceskip=0pt %
-    \catcode`\`=\active
-    \uncatcodespecials \obeyspaces
-    \catcode`\{=1\catcode`\}=2
-  }%
-
-\def\IPPmisc{\begingroup\setupIPPmisc\d@code}
+\def\IPPmiscEND#1{\textsf{#1}\endgroup}%
+\def\IPPmisc{\begingroup\setupc@de\IPPmiscEND}
 
 %
+
+% stage -> small-caps
+% program -> tt
+% dbtable -> it
+% dbcolumn -> bf
+% misc -> san-serif
+
+% text font options:
+
+% \textrm - roman
+% \textsf - sans serif
+% \texttt - typewriter
+
+% \textmd - medium
+% \textbf - boldface
+% \textup - upright
+
+% \textit - italic
+% \textsl - slated
+% \textsc - small caps
+