doc/sod.sty: Make `@->' typeset a dereferencing arrow.

diff --git a/doc/sod.sty b/doc/sod.sty
index 7a52605..2894feb 100644 (file)
--- a/doc/sod.sty
+++ b/doc/sod.sty
@@ -103,6 +103,7 @@
 \atdef !{\m@maybe|\@scripts}
 \def\returns{\m@maybe\longrightarrow\m@maybe@end\hspace{0.5em}\ignorespaces}
 \atdef >{\leavevmode\unskip\hspace{0.5em}\returns}
+\atdef -#1{\if>#1{\ensuremath\rightarrow}\fi}
 
 %% Comment setting.
 \atdef ;#1\\{\normalfont\itshape;#1\\}