summaryrefslogtreecommitdiff
path: root/ref.tmac
blob: 4b1b40ded42aac17b477c2ae845eb80cfe1b296c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
.\" configurable options
.\" --------------------
.ds Sf C \" font
.nr Sp 8p \" point size
.nr Sv 11p \" vertical spacing (leading)
.nr St 8n \" tab width
.nr Tl 2i \" line length for text portions
.nr Td 0.7v \" distance between text portions
.
.\" setup
.\" -----
.nr _L \n(LL \" save original line length
.
.\" macro definitions
.\" -----------------
.eo
.\" Sr -- source code begin
.de Sr
. br
. mk c \" vertical position where text ends
. if (\nb > \nc) .sp (\nbu - \ncu)
. if (\nb > 0) .if ((\nc + 1p) > \nb) .sp \n(Tdu
. if !(\nz = 1) .if (\np > 0) .if (\n% > \np) .sp -(\nbu - \ncu - 1.5v)
. nf
. ft \*(Sf
. ps \n(Spu
. vs \n(Svu
. ta \n(Stu +\n(Stu +\n(Stu +\n(Stu +\n(Stu +\n(Stu
. in (\n(Tlu + 0.2i)
. mk a \" vertical position where source code begins
. nr p \n% \" current page number
..
.\" Se -- source code end
.de Se
. mk b \" vertical position where source code ends
. rt \nau
. nr LL \n(Tl
. nr z 0
. if (\n% > \np) \{
.  rt \n(HMu \" return to top of new page
.  nr z 1 \" signal page break
. \}
. ns \" ignore space before text (like that added by LP/PP)
. LP
..
.\" Rr -- reset document settings
.de Rr
.nr LL \n(_L
..
.ec