Commit | Line | Data |
---|---|---|
47787d5b | 1 | #ifndef lint |
2357b64e | 2 | static char *sccsid = "@(#)wwbox.c 3.2 83/08/19"; |
47787d5b EW |
3 | #endif |
4 | ||
5 | #include "ww.h" | |
6 | #include "tt.h" | |
7 | ||
8 | wwbox(w, r, c, nr, nc) | |
9 | register struct ww *w; | |
10 | register r, c; | |
11 | int nr, nc; | |
12 | { | |
13 | register r1, c1; | |
14 | register i; | |
15 | ||
16 | r1 = r + nr - 1; | |
17 | c1 = c + nc - 1; | |
2357b64e | 18 | wwframec(w, r, c, WWF_D|WWF_R); |
47787d5b | 19 | for (i = c + 1; i < c1; i++) |
2357b64e EW |
20 | wwframec(w, r, i, WWF_L|WWF_R); |
21 | wwframec(w, r, i, WWF_L|WWF_D); | |
47787d5b | 22 | for (i = r + 1; i < r1; i++) |
2357b64e EW |
23 | wwframec(w, i, c1, WWF_U|WWF_D); |
24 | wwframec(w, i, c1, WWF_U|WWF_L); | |
47787d5b | 25 | for (i = c1 - 1; i > c; i--) |
2357b64e EW |
26 | wwframec(w, r1, i, WWF_R|WWF_L); |
27 | wwframec(w, r1, i, WWF_R|WWF_U); | |
47787d5b | 28 | for (i = r1 - 1; i > r; i--) |
2357b64e | 29 | wwframec(w, i, c, WWF_D|WWF_U); |
47787d5b | 30 | } |