Terminal control/Positional read: Difference between revisions
→{{header|TXR}}: Reduce oversized char array.
(→{{header|TXR}}: Don't quasiquote struct literal that contains no interpolation.) |
(→{{header|TXR}}: Reduce oversized char array.) |
||
Line 223:
Y ,(+ 5 cinfo.srWindow.Top))
#S(COORD X 0 Y 0)))
(chars (vector
(nread (vector 1))
(read-ok (ReadConsoleOutputCharacter console-handle chars
| |||