#include "substdio.h"
#include "subfd.h"
#include "exit.h"

void main()
{
  register int n;
  register char *x;
  char ch;
  register int flagcr = 0;

  for (;;) {
    n = substdio_feed(subfdin);
    if (n < 0) _exit(111);
    if (!n) {
      if (flagcr) substdio_BPUTC(subfdout,"\r"[0]);
      _exit(0);
    }
    x = substdio_PEEK(subfdin);
    substdio_SEEK(subfdin,n);

    while (n > 0) {
      ch = *x++; --n;
      if (!flagcr) {
        if (ch == '\r') { flagcr = 1; continue; }
	substdio_BPUTC(subfdout,ch);
	continue;
      }
      if (ch != '\n') {
        substdio_BPUTC(subfdout,"\r"[0]);
        if (ch == '\r') continue;
      }
      flagcr = 0;
      substdio_BPUTC(subfdout,ch);
    }
  }
}