doc/: Align backslashes in C-macros by the right-hand margin.

Do this in the source, and in the typeset code.

diff --git a/doc/runtime.tex b/doc/runtime.tex
index 75055e5baee35c6940174ae809e70526b61184bf..d4a82928a311fb6f7f9656a32145e0c63d37f1f4 100644 (file)
--- a/doc/runtime.tex
+++ b/doc/runtime.tex
@@ -203,8 +203,8 @@ list items of the form
 \end{prog}
 with no separation between them.  For example:
 \begin{prog}
 \end{prog}
 with no separation between them.  For example:
 \begin{prog}

-  \#define example_KWSET(_) @\\                                 \\ \ind
-    _(int, x, 0) @\\                                            \\
+  \#define example_KWSET(_)                             \macsl  \\ \ind
+    _(int, x, 0)                                        \macsl  \\

     _(const char *, y, NULL)
 \end{prog}
 
     _(const char *, y, NULL)
 \end{prog}
 


@@ -562,16 +562,16 @@ particular keyword argument.
     else longjmp(kw_test_jmp, 2);                             \-\\
   \}                                                            \\+
 
     else longjmp(kw_test_jmp, 2);                             \-\\
   \}                                                            \\+
 

-  \#define KW_TEST(flag, set, call) do \{ @\\                   \\ \ind
-    kw_unkhookfn *oldunk = kw_unkhook; @\\                      \\
-    kw_unkhook = kw_test_unknown; @\\                           \\
-    switch (setjmp(kw_test_jmp)) \{ @\\                         \\ \ind
-      case 0: call; abort(); @\\                                \\
-      case 1: flag = 1; break; @\\                              \\
-      case 2: flag = 0; break; @\\                              \\
-      default: abort(); @\\                                   \-\\
-    \} @\\                                                      \\
-    kw_unkhook = oldunk; @\\                                  \-\\
+  \#define KW_TEST(flag, set, call) do \{               \macsl  \\ \ind
+    kw_unkhookfn *oldunk = kw_unkhook;                  \macsl  \\
+    kw_unkhook = kw_test_unknown;                       \macsl  \\
+    switch (setjmp(kw_test_jmp)) \{                     \macsl  \\ \ind
+      case 0: call; abort();                            \macsl  \\
+      case 1: flag = 1; break;                          \macsl  \\
+      case 2: flag = 0; break;                          \macsl  \\
+      default: abort();                                 \macsl\-\\
+    \}                                                  \macsl  \\
+    kw_unkhook = oldunk;                                \macsl\-\\

   \} while (0)                                                  \\+
 
   @/* Example of use */                                         \\
   \} while (0)                                                  \\+
 
   @/* Example of use */                                         \\

diff --git a/doc/sod.sty b/doc/sod.sty
index 1f653c940a18f325822a48eb3939bca47a54d5da..f1ba880106204594a690bb295801c39991408cdf 100644 (file)
--- a/doc/sod.sty
+++ b/doc/sod.sty
@@ -152,6 +152,7 @@
 \def\@progcr@ii#1{\csname @progcr@#1\endcsname\ignorespaces}
 \@namedef{@progcr@+}{\prog@@cr[\medskipamount]}
 \@namedef{@progcr@-}{\prog@@cr*[\jot]}
 \def\@progcr@ii#1{\csname @progcr@#1\endcsname\ignorespaces}
 \@namedef{@progcr@+}{\prog@@cr[\medskipamount]}
 \@namedef{@progcr@-}{\prog@@cr*[\jot]}

+\def\macsl{\`\textbackslash\hskip\leftmargin}

 
 %% Put a chunk of text in a box.
 \newenvironment{boxy}[1][\q@]{%
 
 %% Put a chunk of text in a box.
 \newenvironment{boxy}[1][\q@]{%