sergiotarxz/nuttx-apps
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Recovering from GIT chaos

Browse Source
This commit is contained in:
Gregory Nutt 2014-11-06 13:35:15 -06:00
parent 77871b3d32
commit 95213afeb5
1 changed files with 36 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

59
interpreters/bas/fs.c
View File

@ -285,24 +285,43 @@ static int edit(int chn, int onl)
#else
if ((f->inCapacity + 1) < sizeof(f->inBuf))
{
if (ch != '\n')
{
if (ch >= '\0' && ch < ' ')
{
FS_putChar(chn, '^');
FS_putChar(chn, ch ? (ch + 'a' - 1) : '@');
}
else
{
FS_putChar(chn, ch);
}
}
else if (onl)
{
FS_putChar(chn, '\n');
}
/* Ignore carriage returns that may accompany a CRLF sequence.
* REVISIT: Some environments may have other line termination rules
*/
f->inBuf[f->inCapacity++] = ch;
if (ch != '\r')
{
/* Is this a new line character */
if (ch != '\n')
{
/* No.. escape control characters other than newline and
* carriage return
*/
if (ch >= '\0' && ch < ' ')
{
FS_putChar(chn, '^');
FS_putChar(chn, ch ? (ch + 'a' - 1) : '@');
}
/* Output normal, printable characters */
else
{
FS_putChar(chn, ch);
}
}
/* Echo the newline (or not) */
else if (onl)
{
FS_putChar(chn, '\n');
}
f->inBuf[f->inCapacity++] = ch;
}
}
#endif
}
@ -1669,12 +1688,6 @@ int FS_appendToString(int chn, struct String *s, int onl)
f->inSize = f->inCapacity = 0;
}
if (s->length >= 2 && s->character[s->length - 2] == '\r')
{
s->character[s->length - 2] = '\n';
--s->length;
}
return 0;
}
}