parseAndEvalString*

[Grégory Vanuxem]

Hello Waldek,

I use since this morning (something that sticks in my head)
'parseAndEvalToStringEqNum' in server.boot. You suggested to me to
use, my bad question/response as usual, sorry to all,
'parseAndEvalToString' but my problem was that the index of the
expression used in a "personal" pseudo terminal was returning


parseAndEvalToString str ==
$collectOutput:local := true
$outputLines: local := nil
$IOindex: local := nil
v := CATCH('SPAD_READER, CATCH('top_level, parseAndEvalStr str))
v = 'restart => ['"error"]
NREVERSE $outputLines

parseAndEvalToStringEqNum str ==
$collectOutput:local := true
$outputLines: local := nil
v := CATCH('SPAD_READER, CATCH('top_level, parseAndEvalStr str))
v = 'restart => ['"error"]
NREVERSE $outputLines

[Grégory Vanuxem]

Forget the previous mail please.