- return 0;
-}
-
-struct ww *
-doopen(id, nrow, ncol, row, col)
-int id, nrow, ncol, row, col;
-{
- register struct ww *w;
-
- if (id < 0 && (id = findid()) < 0)
- return 0;
- if ((w = wwopen(WW_PTY, id, nrow, ncol, row, col)) == 0)
- return 0;
- reframe();
- if (selwin == 0)
- setselwin(w);
- else
- wwsetcurwin(cmdwin);
- wwflush();
- switch (wwfork(w)) {
- case -1:
- doclose(w);
- return 0;
- case 0:
- execl("/bin/csh", "csh", 0);
- perror("exec(csh)");
- exit(1);
- }
- return w;
-}
-
-reframe()
-{
- register struct ww *w;
-
- for (w = wwhead; w; w = w->ww_next) {
- if (w == cmdwin)
- continue;
- wwunframe(w);
- wwframe(w);
- labelwin(w);
- }