Home
last modified time | relevance | path

Searched refs:exists (Results 1 – 25 of 492) sorted by relevance

12345678910>>...20

/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/
H A DMemoize.t19 sub exists { my ($key, $dir) = @_; return -f File::Spec->catfile($dir, $key) } subroutine
23 tie my %hash, 'Tie::Memoize', \&slurp, $directory, \&exists,
27 ok(not exists $hash{'strict.pm'});
28 ok(exists $hash{known_to_exist});
31 ok(exists $hash{known_to_exist});
32 ok(not exists $hash{'strict.pm'});
35 ok(not exists $hash{known_to_exist});
36 ok(not exists $hash{'strict.pm'});
41 ok(not exists $hash{'strict.pm'});
42 ok(exists $hash{'blib.pm'});
[all …]
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/op/
H A Dexists_sub.t22 print "not " unless exists &t1 && not defined &t1;
24 print "not " unless exists &t2 && not defined &t2;
26 print "not " unless exists &t3 && not defined &t3;
28 print "not " unless exists &t4 && not defined &t4;
30 print "not " unless exists &t5 && defined &t5;
33 print "not " unless not exists &P2::tmc && not defined &P2::tmc;
37 print "not " unless exists &{$ref->{A}[0]} && not defined &{$ref->{A}[0]};
40 print "not " unless exists &P1::tmc && not defined &P1::tmc;
H A Dinccode.t49 ok( exists $INC{'Foo.pm'}, ' %INC sees Foo.pm' );
56 ok( exists $INC{'Foo1.pm'}, ' %INC sees Foo1.pm' );
63 ok( exists $INC{'Foo2.pl'}, ' %INC sees Foo2.pl' );
92 ok( exists $INC{'Bar.pm'}, ' %INC sees Bar.pm' );
97 ok( exists $INC{'Bar1.pm'}, ' %INC sees Bar1.pm' );
102 ok( exists $INC{'Bar2.pl'}, ' %INC sees Bar2.pl' );
124 ok( exists $INC{'Quux.pm'}, ' %INC sees Quux.pm' );
137 ok( exists $INC{'Quux1.pm'}, ' %INC sees Quux1.pm' );
150 ok( exists $INC{'Quux2.pm'}, ' %INC sees Quux2.pm' );
171 ok( exists $INC{'Toto.pm'}, ' %INC sees Toto.pm' );
H A Ddelete.t16 unless (exists $foo{2}) {print "ok 2\n";} else {print "not ok 2 $foo{2}\n";}
27 unless (exists $foo{4}) {print "ok 10\n";} else {print "not ok 10 $foo{4}\n";}
28 unless (exists $foo{5}) {print "ok 11\n";} else {print "not ok 11 $foo{5}\n";}
75 unless (exists $foo[2]) {print "ok 19\n";} else {print "not ok 19 $foo[2]\n";}
86 unless (exists $foo[4]) {print "ok 27\n";} else {print "not ok 27 $foo[4]\n";}
87 unless (exists $foo[5]) {print "ok 28\n";} else {print "not ok 28 $foo[5]\n";}
H A Dlocal.t245 print "not " if exists $x{b};
248 print "not " if exists $x{c};
256 print "not " if exists $h{'y'}; print "ok 72\n";
257 print "not " if exists $h{'z'}; print "ok 73\n";
258 print "not " if exists $ENV{_A_}; print "ok 74\n";
259 print "not " if exists $ENV{_B_}; print "ok 75\n";
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/
H A DConfig.t31 ok( exists $Config{cc}, "has cc");
33 ok( exists $Config{ccflags}, "has ccflags");
35 ok(!exists $Config{python}, "has no python");
37 ok( exists $Config{d_fork}, "has d_fork");
39 ok(!exists $Config{d_bork}, "has no d_bork");
51 ok(exists $Config{ccflags_nolargefiles}, "has ccflags_nolargefiles");
91 ok(!exists $Config{d_bork}, "still no d_bork");
97 ok( exists $Config{d_fork}, "still d_fork");
103 ok( exists $Config{d_fork}, "still d_fork");
H A DSymbol.t72 ok( exists $::{'Transient::'}, 'transient stash exists' );
75 ok( !exists $Transient::{variable}, 'transient variable no longer in stash' );
77 ok( !exists $::{'Transient::'}, 'no transient stash' );
/onnv-gate/usr/src/tools/onbld/Scm/
H A DBackup.py150 if os.path.exists(bfile):
171 if os.path.exists(self.bu.backupfile('nodes')):
197 if os.path.exists(self.bu.backupfile(fname)):
302 if not os.path.exists(diff):
330 if not os.path.exists(self.bu.backupfile('renames')):
359 if os.path.exists(diff):
380 if os.path.exists(self.bu.backupfile('renames')):
400 if os.path.exists(self.bu.backupfile(fname)):
429 if os.path.exists(fpath):
456 if os.path.exists(bfile):
[all …]
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/comp/
H A Dhints.t13 print "not " if exists $^H{foo};
41 print "not " if exists $^H{foo};
46 print "not " if exists $^H{foo};
59 print "not " if exists $^H{foo};
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Getopt/Long/t/
H A Dgol-linkage.t24 print (!(exists $lnk{baR}) ? "" : "not ", "ok 8\n");
37 print (!(exists $lnk{foo}) ? "" : "not ", "ok 16\n");
38 print (!(exists $lnk{baR}) ? "" : "not ", "ok 17\n");
39 print (!(exists $lnk{bar}) ? "" : "not ", "ok 18\n");
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/IO/t/
H A Dio_sel.t90 $sel->exists(\*STDIN) and print "not ";
93 ($sel->exists(0) || $sel->exists([\*STDERR])) and print "not ";
96 $fd = $sel->exists(\*STDOUT);
103 $fd = $sel->exists([1, 'foo']);
/onnv-gate/usr/src/uts/i86pc/os/
H A Dlgrpplat.c218 int exists; member
260 int exists; member
270 int exists; member
576 !lgrp_plat_memnode_info[node].exists || in plat_build_mem_nodes()
589 if (lgrp_plat_memnode_info[node].exists && in plat_build_mem_nodes()
631 if (lgrp_plat_memnode_info[node].exists == 0) in plat_mnode_xcheck()
712 if (!lgrp_plat_memnode_info[node].exists) in plat_pfn_to_mem_node()
806 ASSERT(!lgrp_plat_cpu_node[cp->cpu_id].exists); in lgrp_plat_config()
807 if (lgrp_plat_cpu_node[cp->cpu_id].exists) { in lgrp_plat_config()
855 lgrp_plat_cpu_node[cp->cpu_id].exists = 1; in lgrp_plat_config()
[all …]
/onnv-gate/usr/src/cmd/print/printmgr/com/sun/admin/pm/server/
H A DDoPrinterDelete.java120 boolean exists; in delete()
121 exists = DoPrinterUtil.exists(printername, "system"); in delete()
123 if (exists) { in delete()
133 if ((nameservice.equals("nis")) && exists) { in delete()
/onnv-gate/usr/src/cmd/cron/
H A Dpermit.c41 #define exists(file) (stat(file, &globstat) == 0) macro
75 if (exists(allow)) {
81 } else if (exists(deny)) {
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Text/
H A DAbbrev.t19 print "not " if exists $x{'l'} ||
20 exists $x{'li'} ||
21 exists $x{'lis'};
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/Time/HiRes/
H A DMakefile.PL236 if (exists $self->{LIBS}) {
246 if (exists $Config{d_gettimeod}) {
271 if (exists $Config{d_setitimer}) {
286 if (exists $Config{'d_getitimer'}) {
307 if (exists $Config{d_ualarm}) {
326 if (exists $Config{d_usleep}) {
349 if (exists $Config{d_nanosleep}) {
/onnv-gate/usr/src/ucbcmd/install.d/
H A Dinstall.c130 int exists = 0; in main() local
136 exists = errno == EEXIST; in main()
137 if (!exists) { in main()
153 if (!exists) in main()
159 if (!exists) in main()
165 if (!exists) in main()
/onnv-gate/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/Object/
H A DMakefile.PL57 if (exists($ENV{CODEMGR_WS}) && exists($ENV{ENVCPPFLAGS1})) {
87 if (! exists($ENV{RELEASE_BUILD}));
/onnv-gate/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/Catalog/
H A DMakefile.PL57 if (exists($ENV{CODEMGR_WS}) && exists($ENV{ENVCPPFLAGS1})) {
87 if (! exists($ENV{RELEASE_BUILD}));
/onnv-gate/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/File/
H A DMakefile.PL57 if (exists($ENV{CODEMGR_WS}) && exists($ENV{ENVCPPFLAGS1})) {
87 if (! exists($ENV{RELEASE_BUILD}));
/onnv-gate/usr/src/cmd/perl/contrib/Sun/Solaris/Pg/
H A DMakefile.PL32 my @defines = ( DEFINE => exists($ENV{RELEASE_BUILD}) ? '-DNDEBUG' : '' );
41 if (! exists($ENV{CODEMGR_WS})) {
/onnv-gate/usr/src/uts/sun4/os/
H A Dmemnode.c86 if (cas32((uint32_t *)&mem_node_config[mnode].exists, 0, 1)) { in mem_node_add_slice()
130 ASSERT(mem_node_config[mnode].exists == 1); in mem_node_del_slice()
163 mem_node_config[mnode].exists = 0; in mem_node_del_slice()
223 if (cas32((uint32_t *)&mem_node_config[mnode].exists, in mem_node_alloc()
307 if (mem_node_config[mnode].exists == 0) in mem_node_max_range()
/onnv-gate/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/
H A DMakefile.PL94 if (exists($ENV{CODEMGR_WS}) && exists($ENV{ENVCPPFLAGS1})) {
124 if (! exists($ENV{RELEASE_BUILD}));
/onnv-gate/usr/src/lib/libshell/misc/
H A DERRATA.txt50 #define _lib_vfork 1 /* vfork exists and it works */
52 -#define _lib_posix_spawn 2 /* posix_spawn exists and it works and its worth using */
53 +#define _lib_posix_spawn 1 /* posix_spawn exists and it works and its worth using */
63 #define _lib_vfork 1 /* vfork exists and it works */
65 -#define _lib_posix_spawn 2 /* posix_spawn exists and it works and its worth using */
66 +#define _lib_posix_spawn 1 /* posix_spawn exists and it works and its worth using */
76 #define _lib_vfork 1 /* vfork exists and it works */
78 -#define _lib_posix_spawn 2 /* posix_spawn exists and it works and its worth using */
79 +#define _lib_posix_spawn 1 /* posix_spawn exists and it works and its worth using */
89 #define _lib_vfork 1 /* vfork exists and it works */
[all …]
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/io/
H A Dlayers.t19 $ENV{PERLIO} = 'stdio' if exists $ENV{PERLIO} && $ENV{PERLIO} eq '';
20 if (exists $ENV{PERLIO} && $ENV{PERLIO} !~ /^(stdio|perlio|mmap)$/) {
25 $PERLIO = exists $ENV{PERLIO} ? $ENV{PERLIO} : "(undef)";
32 my $NONSTDIO = exists $ENV{PERLIO} && $ENV{PERLIO} ne 'stdio' ? 1 : 0;

12345678910>>...20