Case 8000 Series - Page 160

if (newline)
{
if (--newline)
*array++ = '\000'; /* (1) now \r\000 */
else
*array++ = '\n'; /* (0) now \r\000\n */
• return (1);
}
else
{
if ((c = getchar() ) == EOF)
break; /* End of File */
if (c == '\n') /* Needs expanding to (2) */
{ /* now \r */
newline = 2;
*array++ = '\r';
}
else
{
*array++ = c; /* All other characters */
}
}
}
else
{ /* option to convert \r\n to \r000\n */
if (previous == '\n')
{
*array++ = '\n'; /* now \r\000\0 and reset value */
previous = \000';
}
else
{
if ((c = getchar() ) == EOF)
break;
if (c == '\n')
{
if (previous == '\r')
{
previous = '\n';
*array++ = '\000';
}
else
{
previous = '\000';
*array++ = '\n';
• return (1) ;
}
}
else
{
previous = c;
*array++ = c;
}
}
}
}
return (c != EOF); /* more data returns TRUE until EOF found */
}
X870-300351 Issue 1 H-4 Rev.0