CODEWITHSUNDEEP
iolispiostreaminterlisp
QianruZhou
QianruZhou

Reputation: 41

Interlisp Medley: LITATOM 'streams' no longer supported

I am trying to print string text to file in interlisp medley. Here is the code:

(OUTPUT)
> T
(SETQ OUT (OPENSTREAM 'output.TEDIT 'OUTPUT))
> <Output stream ...>
(OUTPUT OUT)
> T
(PRIN1 'lalala OUT)
> lalala

but the file 'output.TEDIT' (and its new versions) are still empty. and if I try this:

(PRIN1 'lalala (OPENFILE 'output.TEDIT 'OUT))

it pop up a 'INTERLISP ERROR' window saying "LITATOM 'streams' no longer supported."

How can I print to file in Interlisp Medley?

Upvotes: 0

Views: 40

Answers (0)

Related Questions