Home
last modified time | relevance | path

Searched refs:dev_tty (Results 1 – 4 of 4) sorted by relevance

/openbsd-src/gnu/usr.bin/perl/t/op/
H A Dfiletest_t.t13 my($dev_tty, $dev_null) = qw(/dev/tty /dev/null);
14 ($dev_tty, $dev_null) = qw(con nul ) if $^O =~ /^(MSWin32|os2)$/;
15 ($dev_tty, $dev_null) = qw(TT: _NLA0: ) if $^O eq "VMS";
18 open(my $tty, "<", $dev_tty)
19 or skip("Can't open terminal '$dev_tty': $!", 4);
25 ok(-t $tty, "'$dev_tty' is a TTY");
26 ok(-t -e $tty, "'$dev_tty' is a TTY (with -t -e)");
28 ok(-e -t $tty, "'$dev_tty' is a TTY (with -e -t)");
30 ok(-e -t -t $tty, "'$dev_tty' is a TTY (with -e -t -t)");
/openbsd-src/gnu/usr.bin/perl/lib/
H A Dperl5db.t21 my $dev_tty = '/dev/tty';
22 $dev_tty = 'TT:' if ($^O eq 'VMS');
23 if (! -c $dev_tty) {
24 print "1..0 # Skip: no $dev_tty\n";
H A Dperl5db.pl1242 my $dev_tty = (($^O eq 'VMS') ? 'TT:' : '/dev/tty');
1244 $rcfile = ((-e $dev_tty) ? ".perldb" : "perldb.ini");
/openbsd-src/lib/libcurses/base/
H A Dlib_mouse.c695 static char dev_tty[] = "/dev/tty"; in initialize_mousetype() local
702 the_device = dev_tty; in initialize_mousetype()