Commit | Line | Data |
---|---|---|
47787d5b EW |
1 | #ifndef lint |
2 | static char *sccsid = "@(#)wwbox.c 3.1 83/08/18"; | |
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; | |
18 | wwframec(w, r, c, WWF_D|WWF_R, 0); | |
19 | for (i = c + 1; i < c1; i++) | |
20 | wwframec(w, r, i, WWF_L|WWF_R, 0); | |
21 | wwframec(w, r, i, WWF_L|WWF_D, 0); | |
22 | for (i = r + 1; i < r1; i++) | |
23 | wwframec(w, i, c1, WWF_U|WWF_D, 0); | |
24 | wwframec(w, i, c1, WWF_U|WWF_L, 0); | |
25 | for (i = c1 - 1; i > c; i--) | |
26 | wwframec(w, r1, i, WWF_R|WWF_L, 0); | |
27 | wwframec(w, r1, i, WWF_R|WWF_U, 0); | |
28 | for (i = r1 - 1; i > r; i--) | |
29 | wwframec(w, i, c, WWF_D|WWF_U, 0); | |
30 | } | |
31 | ||
32 | wwunbox(w) | |
33 | struct ww *w; | |
34 | { | |
35 | wwunframe1(w, 0); | |
36 | } |