shiftos-archive/ShiftOS_TheReturn
Archived
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Normalise newlines for BFInterpreter I/O

Browse source 
when the stream sends \r, the program will receive \n
when the program sends \n, the stream will receive Environment.NewLine
This commit is contained in:
RogueAI42 2017-06-19 17:43:53 +10:00
parent 40b4c29b96
commit 1c9d527ba0
1 changed files with 9 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
ShiftOS_TheReturn/BFInterpreter.cs
View file

@ -53,7 +53,9 @@ namespace ShiftOS.Engine
private Stream str;
public IBFListener lst = null;
private static byte[] newline = Encoding.UTF8.GetBytes(Environment.NewLine);
public BFInterpreter(Stream io, IBFListener listener = null, string program = "")
{
lck = new object();
@ -91,10 +93,15 @@ namespace ShiftOS.Engine
lst.MemChanged(ptr, mem[ptr]);
break;
case '.':
str.WriteByte(mem[ptr]);
if (mem[ptr] == 10)
str.Write(newline, 0, newline.Length); // normalise newline
else
str.WriteByte(mem[ptr]);
break;
case ',':
mem[ptr] = (byte)str.ReadByte();
if (mem[ptr] == 13)
mem[ptr] = 10; // normalise newline
if (lst != null)
lst.MemChanged(ptr, mem[ptr]);
break;
@ -113,7 +120,6 @@ namespace ShiftOS.Engine
string block = program.Substring(oldc, c - oldc - 1);
while (mem[ptr] != 0)
Execute(block, offset + oldc);
}
break;
case ']':