+ if (newline) {
+ if (write (fd, "\n\r", 2) < 0) {
+ advise (tfile, "write LF/CR");
+ }
+ }
+ if (write (fd, charstring_buffer (scanl), charstring_bytes (scanl)) < 0) {
+ advise (tfile, "write");
+ }
+ charstring_free (scanl);
+ if (bell) {
+ if (write (fd, "\007", 1) < 0) {
+ advise (tfile, "write BEL");
+ }
+ }