* lpf -- Line printer filter: handles underlines for those printers/
* device drivers that won't
#define output(c) (putchar(c))
extern char _sobuf
[BUFSIZ
];
register int col
, maxcol
, c
;
for (col
=0; col
<LINELN
; col
++) {
for (;;) switch (c
= getchar()) {
for (ep
= &ovbuf
[LINELN
-1]; *ep
== 0; ep
--)
for (lp
=ovbuf
; lp
<= ep
; lp
++)
if (c
< ' ') switch (c
) {