src/final.lisp (test-parser): Set error location after making the scanner.

[sod] / doc / sod.sty

diff --git a/doc/sod.sty b/doc/sod.sty
index 1f653c940a18f325822a48eb3939bca47a54d5da..d77c038d7a1fc8f10e616aceaa9964359ea301ce 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\macsl{\`\textbackslash\hskip\leftmargin}
 
 %% Put a chunk of text in a box.
 \newenvironment{boxy}[1][\q@]{%
@@ -185,6 +186,7 @@
 \definedescribecategory{be-meth}{before method}
 \definedescribecategory{af-meth}{after method}
 \definedescribecategory{cls}{class}
+\definedescribecategory{rst}{restart}
 \definedescribecategory{ty}{type}
 \definedescribecategory{type}{type}
 \definedescribecategory{mac}{macro}