// (c -- ) { -- s} private int WordAction() { //if (_interpreter.IsCompiling == false) //{ // throw new Exception("WORD outside a new word definition."); //} _interpreter.StackExpect(1); _interpreter.ObjectStackFree(1); //_interpreter.WordBeingDefined.AddWord(new StringLiteralWord(_interpreter, _interpreter.GetTerminatedString((char)_interpreter.Pop(), false, true))); _interpreter.OPush(_interpreter.ParseTerminatedString((char)_interpreter.Pop(), false, true)); return(1); }