public CharString ToCharString(CountedString countedString)
{
return new CharString(1 + countedString.CounterAddress, FetchByte(countedString.CounterAddress));
}
public CountedStringLiteralWord(CountedString countedString, Environment env)
: base("c\"", countedString.CounterAddress,
e => e.DataStack.Push(countedString.CounterAddress))
{
Value = env.Memory.FetchCountedString(countedString);
}
public string FetchCountedString(CountedString countedString)
{
return FetchCharString(ToCharString(countedString));
}