public CharStringLiteralWord(CharString charString, Environment env) : base("s\"", charString.CharAddress, e => { e.DataStack.Push(charString.CharAddress); e.DataStack.Push(charString.Length); }) { Value = env.Memory.FetchCharString(charString); }
public PrintStringLiteralWord(CharString charString, Environment env) : base(".\"", charString.CharAddress, e => Console.Write(e.Memory.FetchCharString(charString))) { Value = env.Memory.FetchCharString(charString); }
public string FetchCharString(CharString charString) { char[] chars = (from b in FetchBytes(charString.CharAddress, charString.Length) select (char)b).ToArray(); return new string(chars); }