Odd word problem/TrivialCharacterStreamSupportForJ: Difference between revisions
Content added Content deleted
(use a verb to initialize 'instream' and start with 'outstream' initialized) |
(need to be able to get fresh outstreams also) |
||
Line 14:
clear_outstream=: 3 :0
outstream=: ''
)
outch=: 3 :0
|
Revision as of 11:39, 8 November 2011
J lacks a character stream implementation, so this is a minimal sketch of "get a character" and "put a character" code.
Note that this implementation allows only one input stream and one output stream per locale.
<lang j>begin_instream=: 3 :0 NB.
instream=: y last=: _1
)
getch=: 3 :0 last=: last+1 last{instream )
clear_outstream=: 3 :0
outstream=:
)
outch=: 3 :0 outstream=: outstream, y )</lang>