Anonymous user
Check output device is a terminal: Difference between revisions
added Ol
(add Standard ML) |
(added Ol) |
||
Line 425:
Output doesn't go to tty.
</pre>
=={{header|Ol}}==
<lang scheme>
(define (isatty? fd) (syscall 16 fd 19))
(print (if (isatty? stdout)
"stdout is a tty."
"stdout is not a tty."))
</lang>
=={{header|Perl}}==
| |||