Commit | Line | Data |
---|---|---|
60de5df9 | 1 | /* |
46e9ea25 KB |
2 | * Copyright (c) 1983 Regents of the University of California. |
3 | * All rights reserved. | |
4 | * | |
3dd3a9e5 KB |
5 | * This code is derived from software contributed to Berkeley by |
6 | * Edward Wang at The University of California, Berkeley. | |
7 | * | |
87f529ec | 8 | * %sccs.include.redist.c% |
60de5df9 EW |
9 | */ |
10 | ||
46e9ea25 | 11 | #ifndef lint |
3dd3a9e5 | 12 | static char sccsid[] = "@(#)wwbox.c 3.8 (Berkeley) %G%"; |
46e9ea25 KB |
13 | #endif /* not lint */ |
14 | ||
47787d5b EW |
15 | #include "ww.h" |
16 | #include "tt.h" | |
17 | ||
18 | wwbox(w, r, c, nr, nc) | |
19 | register struct ww *w; | |
20 | register r, c; | |
21 | int nr, nc; | |
22 | { | |
23 | register r1, c1; | |
24 | register i; | |
25 | ||
26 | r1 = r + nr - 1; | |
27 | c1 = c + nc - 1; | |
2357b64e | 28 | wwframec(w, r, c, WWF_D|WWF_R); |
47787d5b | 29 | for (i = c + 1; i < c1; i++) |
2357b64e EW |
30 | wwframec(w, r, i, WWF_L|WWF_R); |
31 | wwframec(w, r, i, WWF_L|WWF_D); | |
47787d5b | 32 | for (i = r + 1; i < r1; i++) |
2357b64e EW |
33 | wwframec(w, i, c1, WWF_U|WWF_D); |
34 | wwframec(w, i, c1, WWF_U|WWF_L); | |
47787d5b | 35 | for (i = c1 - 1; i > c; i--) |
2357b64e EW |
36 | wwframec(w, r1, i, WWF_R|WWF_L); |
37 | wwframec(w, r1, i, WWF_R|WWF_U); | |
47787d5b | 38 | for (i = r1 - 1; i > r; i--) |
2357b64e | 39 | wwframec(w, i, c, WWF_D|WWF_U); |
47787d5b | 40 | } |