HP 9000 Series 300 Tutorials Manual page 287

}
} else
}
fclose(fd);
fflush(stdout);
resettermO;
exit(O);
case 'U':
tputs(enter_underline_mode,l,outch) ;
ulmode
=
1;
continue;
case 'N':
tputs(exit_attribute_mode,l,outch);
ulmode
=
0;
continue;
}
putch(c);
putch(c2);
putch(c);
1*
*
This function is like putchar. but it checks for underlining.
*1
putch(c)
{
}
}
int c;
outch(c);
if (ulmode
&&
underline_char) {
}
outch ( '\b') ;
tputs(underline_char,l,outch);
/*
*
Out char is a function version of put char that can be passed to
*
tputs as a routine to call.
*1
outcb(c)
int c;
{
put char (c) ;
Program Operation 3-23