Terminal control/Positional read: Difference between revisions

→‎{{header|TXR}}: The BOOL enum doesn't work as a Lisp Boolean; we must compare to FALSE to detect falsehood.
(→‎{{header|TXR}}: Add notes.)
(→‎{{header|TXR}}: The BOOL enum doesn't work as a Lisp Boolean; we must compare to FALSE to detect falsehood.)
Line 227:
(read-ok (ReadConsoleOutputCharacter console-handle chars
1 coord nread)))
(unlesswhen (eq getinfo-ok 'FALSE)
(error "GetConsoleScreenBufferInfo failed"))
(prinl cinfo)
(unlesswhen (eq read-ok 'FALSE)
(error "ReadConsoleOutputCharacter failed"))
(unless (plusp [nread 0])
543

edits