Commit | Line | Data |
---|---|---|
f20a17c5 JF |
1 | .""""""" |
2 | ." macros for the Franz Lisp Manual | |
3 | ." | |
4 | ." first we set these global me variables | |
5 | ."""""""" | |
6 | .nr ss 4v \" space 4v between sections | |
7 | .nr si 3n \" section indent | |
8 | .""""""""""""""" | |
9 | ." A chapter is begun by | |
10 | ." .Lc chaptertitle number | |
11 | ." | |
12 | ." a function is introduced by a | |
13 | ." .Lf functionname arglist | |
14 | ." where the arglist must be one string, use "'s if necessary. | |
15 | ." then there are these macros to begin text describing what the function | |
16 | ." does: | |
17 | ." .Wh | |
18 | ." <text> says "WHERE" allowing you to give more | |
19 | ." details on a function. | |
20 | ." .Re | |
21 | ." <text> tells what value the function returns | |
22 | ." | |
23 | ." .No | |
24 | ." <text> begins a note, giving more detail on the fcn | |
25 | ." | |
26 | ." .Se | |
27 | ." <text> describes a size effect of a function. | |
28 | ." | |
29 | ." .Im | |
30 | ." <text> note to implementor. this will only be | |
31 | ." printed out in the implementors version of | |
32 | ." the manual. | |
33 | ." .Rm prints a message about this function being | |
34 | ." likely to disappear | |
35 | ." | |
36 | ." useful macros | |
37 | ." .Fr rest prints out Franz Lisp and appends rest | |
38 | ." to it. | |
39 | ." | |
40 | ." used in creating the index and table of contents | |
41 | ." .\".ch n says we are beginning chapter n page 1 | |
42 | ." .\".pg says that the manual begins a new page here | |
43 | ." the location of this mark may have to change | |
44 | ." after each printing but before the index | |
45 | ." is printed. | |
46 | ." .Ib begin index | |
47 | ." .In ch# pg# fcn-name fcn-args this isnt inserted by hand, but | |
48 | ." is generated by the index program. it indicates | |
49 | ." where a function begins. | |
50 | ."""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" | |
51 | .de Lc | |
52 | ." .in 0 | |
53 | .++ RC '\\$1''\\\\\\\\\\\\\\\\n(ch-%' | |
54 | .nr % 2 | |
55 | .nr ch \\$2-1 | |
56 | .+c \\$1 | |
57 | .fo ''\s+2Draft\s-2'\fR\s-2Printed:\ \*(td\s0\fP' | |
58 | .. | |
59 | .de Lf | |
60 | .sp 2v | |
61 | .ne 11 | |
62 | .in 0 | |
63 | (\\fB\\$1\\fP \\$2) | |
64 | .br | |
65 | .nr $i 5n | |
66 | .tm .In \\n(ch \\n% \\$1 "\\$2" | |
67 | .. | |
68 | .de Re | |
69 | .ip \s-2RETURNS\s0: 9 | |
70 | .. | |
71 | .de No | |
72 | .ip \s-2NOTE\s0: 6 | |
73 | .. | |
74 | .de Eq | |
75 | .ip \s-2EQUIVALENT\ TO\s0: 15 | |
76 | .. | |
77 | .de Im | |
78 | .ip \s-2IMPLEMENTATION\s0: 20 | |
79 | .. | |
80 | .de Se | |
81 | .ip \s-2SIDE\ EFFECT\s0: 13 | |
82 | .. | |
83 | .de Wh | |
84 | .ip \s-2WHERE\s0: 9 | |
85 | .. | |
86 | .de Rm | |
87 | .No | |
88 | this function will most likely disappear in future releases. | |
89 | .. | |
90 | .de Fr | |
91 | F\s-2RANZ\s0 L\s-2ISP\s0\\$1 | |
92 | .. | |
93 | .de Ib \" beginning of index | |
94 | .++ RA '''\\\\A-%' | |
95 | .+c "Index to F\s-2RANZ\s0 L\s-2ISP\s0 Functions" | |
96 | .ta 6i \" set tab stop for location column | |
97 | .tc . \" generate dots to line up page numbers | |
98 | .fo ''\s+2Draft\s-2'\fR\s-2Printed:\ \*(td\s0\fP' | |
99 | .nf | |
100 | .. | |
101 | .de In | |
102 | (\\fB\\$3\\fR\ \\$4)\t\\$1-\\$2 | |
103 | .. |