Searched refs:ok (Results 151 - 175 of 1802) sorted by relevance

1234567891011>>

/macosx-10.9.5/CPANInternal-140/Class-Inspector/t/
H A D02_main.t47 ok( CI->_class( CI ), 'Class validator works for known valid' );
48 ok( CI->_class( BAD ), 'Class validator works for correctly formatted, but not installed' );
49 ok( CI->_class( 'A::B::C::D::E' ), 'Class validator works for long classes' );
50 ok( CI->_class( '::' ), 'Class validator allows main' );
51 ok( CI->_class( '::Blah' ), 'Class validator works for main aliased' );
52 ok( ! CI->_class(), 'Class validator failed for missing class' );
53 ok( ! CI->_class( '4teen' ), 'Class validator fails for number starting class' );
54 ok( ! CI->_class( 'Blah::%f' ), 'Class validator catches bad characters' );
62 ok( CI->loaded( CI ), "->loaded detects loaded" );
63 ok( ! C
[all...]
/macosx-10.9.5/CPANInternal-140/Test-Simple/t/
H A Dis_deeply_fail.t31 sub ok ($;$) {
32 return $TB->ok(@_);
38 my $ok = $TB->is_eq($$this, $that, $name);
42 return $ok;
49 my $ok = $TB->like($$this, $regex, $name);
53 return $ok;
63 ok !is_deeply('foo', 'bar', 'plain strings');
64 is( $out, "not ok 1 - plain strings\n", 'plain strings' );
74 ok !is_deeply({}, [], 'different types');
75 is( $out, "not ok
[all...]
H A Deq_set.t20 ok( eq_set([1, 2, [3]], [[3], 1, 2]) );
21 ok( eq_set([1,2,[3]], [1,[3],2]) );
25 ok( eq_set( [$ref, "$ref", "$ref", $ref],
32 ok( eq_set( [\1, \2, \3], [\2, \3, \1] ) );
H A Dno_plan.t18 ok !eval { $tb->plan(tests => undef) };
22 ok !eval { $tb->plan(tests => 0) };
30 ok $tb->plan(no_plan => 1);
/macosx-10.9.5/Security-55471.14.18/sec/SOSCircle/Regressions/
H A Dsc-40-circle.c38 ok(NULL != circle, "Circle creation");
40 ok(0 == SOSCircleCountPeers(circle), "Zero peers");
51 ok(parameters, "No parameters!");
52 ok(error == NULL, "Error: (%@)", error);
62 ok(SOSCircleRequestAdmission(circle, user_privkey, peer_a_full_info, NULL));
63 ok(SOSCircleRequestAdmission(circle, user_privkey, peer_a_full_info, NULL));
64 ok(SOSCircleRequestAdmission(circle, user_privkey, peer_a_full_info, NULL));
66 ok(SOSCircleAcceptRequest(circle, user_privkey, peer_a_full_info, SOSFullPeerInfoGetPeerInfo(peer_a_full_info), NULL));
68 ok(!SOSCircleRequestAdmission(circle, user_privkey, peer_a_full_info, NULL));
69 ok(SOSCircleRequestAdmissio
[all...]
H A Dsc-41-cloudcircle.c16 static const int kSOSCCTestCount = 6; // # of "ok"s in "tests" below
23 ok(SOSCCSetUserCredentials(CFSTR("foo1"), cfpassword, &error), "Added Creds (%@)", error);
27 ok(SOSCCThisDeviceIsInCircle(&error) == kSOSCCCircleAbsent, "Circle Absent (%@)", error);
29 ok(SOSCCResetToOffering(&error), "SOSCCOfferPotentialCircle (%@)", error);
32 ok(SOSCCThisDeviceIsInCircle(&error) == kSOSCCInCircle, "Circle Absent (%@)", error);
34 ok(SOSCCRemoveThisDeviceFromCircle(&error), "Leaving (%@)", error);
37 ok(SOSCCThisDeviceIsInCircle(&error) == kSOSCCCircleAbsent, "Circle Absent (%@)", error);
/macosx-10.9.5/CPANInternal-140/Log-Log4perl/t/
H A D001Level.t18 ok(1); # If we made it this far, we're ok.
22 ok(Log::Log4perl::Level::to_level($_));
27 ok(Log::Log4perl::Level::to_level($_));
32 ok(Log::Log4perl::Level::to_level($_));
35 # ok, now let's check to make sure the relative order is correct.
37 ok(Log::Log4perl::Level::isGreaterOrEqual($TRACE, $DEBUG));
38 ok(Log::Log4perl::Level::isGreaterOrEqual($DEBUG, $INFO));
39 ok(Log::Log4perl::Level::isGreaterOrEqual($INFO, $WARN));
40 ok(Lo
[all...]
H A D025CustLevels.t19 ok(1); # If we made it this far, we're ok.
28 ok(Log::Log4perl::Logger::create_custom_level("TEST$_", "INFO"), 0);
34 ok(!defined eval { Log::Log4perl::Logger::create_custom_level("TEST15", "INFO") });
60 ok(Log::Log4perl::Logger::create_custom_level("BTREE$_", $level), 0);
89 ok(!defined eval { Log::Log4perl::Logger::create_custom_level("NOTIFY", "WARN"); });
106 ok($data, $result1);
120 ok($data, "$result1$result2");
132 ok($data, "$result1$result2$result3");
144 ok(
[all...]
/macosx-10.9.5/CPANInternal-140/Log-Log4perl-1.40/t/
H A D001Level.t25 ok(1); # If we made it this far, we're ok.
29 ok(Log::Log4perl::Level::to_level($_));
34 ok(Log::Log4perl::Level::to_level($_));
39 ok(Log::Log4perl::Level::to_level($_));
42 # ok, now let's check to make sure the relative order is correct.
44 ok(Log::Log4perl::Level::isGreaterOrEqual($TRACE, $DEBUG));
45 ok(Log::Log4perl::Level::isGreaterOrEqual($DEBUG, $INFO));
46 ok(Log::Log4perl::Level::isGreaterOrEqual($INFO, $WARN));
47 ok(Lo
[all...]
H A D025CustLevels.t26 ok(1); # If we made it this far, we're ok.
35 ok(Log::Log4perl::Logger::create_custom_level("TEST$_", "INFO"), 0);
41 ok(!defined eval { Log::Log4perl::Logger::create_custom_level("TEST15", "INFO") });
67 ok(Log::Log4perl::Logger::create_custom_level("BTREE$_", $level), 0);
96 ok(!defined eval { Log::Log4perl::Logger::create_custom_level("NOTIFY", "WARN"); });
113 ok($data, $result1);
127 ok($data, "$result1$result2");
139 ok($data, "$result1$result2$result3");
151 ok(
[all...]
/macosx-10.9.5/CPANInternal-140/Task-Weaken/t/
H A D02_weaken.t20 ok( defined(&weaken), '->import(weaken) worked' );
21 ok( defined(&isweak), '->import(isweak) worked' );
44 ok( ref($y) and ref($z));
46 ok( ref($y) and ref($z));
48 ok( not (defined($y) and defined($z)) );
50 ok( not (defined($y) and defined($z)) );
55 ok( ref($y) );
57 ok( not defined $y );
64 ok( ref($y) );
66 ok(
[all...]
/macosx-10.9.5/CPANInternal-140/XML-LibXML/t/
H A D19encoding.t35 ok(1);
41 # ok there is the UTF16 test still missing
62 ok( decodeFromUTF8( 'iso-8859-1' ,$elemlat1->toString()),
64 ok( $elemlat1->toString(0,1), "<$tstr_iso_latin1/>");
67 ok( $elemlat2->toString(0,1), "<�l/>");
71 ok( decodeFromUTF8( 'iso-8859-1' ,$elemlat1->string_value()),
73 ok( $elemlat1->string_value(1), $tstr_iso_latin1);
75 ok( $dom_latin1->toString(), $domstrlat1 );
95 ok( decodeFromUTF8( 'EUC-JP' , $elemjp->nodeName()),
97 ok( decodeFromUTF
[all...]
/macosx-10.9.5/CPANInternal-140/DateTime-Format-Builder-0.80/t/
H A Dbasic.t13 ok(( $@ and $@ =~ /takes no param/), "Too many parameters exception" );
16 ok( !$@, "Created object" );
20 ok(( $@ and $@ =~ /No parser/), "No parser exception" );
/macosx-10.9.5/CPANInternal-140/IO-Socket-SSL/t/
H A Dcore.t67 print "not ok\n";
70 &ok("Server Initialization");
73 &ok("Server Fileno Check");
92 &ok("Client non-SSL connection");
107 my ($ok, $ctx_store, $cert, $error) = @_;
108 unless ($ok && $ctx_store && $cert && !$error)
109 { print("not ok #client failure\n") && exit; }
111 &ok("Client Verify-sub Check");
116 $client || (print("not ok #client failure\n") && exit);
117 &ok("Clien
[all...]
H A Dsessions.t50 print "not ok # Server init\n";
53 &ok("Server initialization");
74 print "not ok \# Context init\n";
77 &ok("Context init");
84 &ok("Superficial Cache Addition Test");
89 &ok("Superficial Cache Addition Test 2");
96 &ok("Cache Keys Check 1");
101 &ok("Cache Keys Check 2");
107 &ok("Cache Head Check");
115 &ok("Cach
[all...]
/macosx-10.9.5/CPANInternal-140/Pod-WSDL/t/
H A D01AUTOLOAD01basic.t20 ok($foo->bar eq 'blah', '"_bar" retrievable with "bar".');
22 ok($foo->bar eq 'bloerch', '"_bar" settable with "bar".');
28 ok($@, 'Using method not equivalent to any attribute croaks');
/macosx-10.9.5/CPANInternal-140/Pod-WSDL-0.061/t/
H A D01AUTOLOAD01basic.t20 ok($foo->bar eq 'blah', '"_bar" retrievable with "bar".');
22 ok($foo->bar eq 'bloerch', '"_bar" settable with "bar".');
28 ok($@, 'Using method not equivalent to any attribute croaks');
/macosx-10.9.5/CPANInternal-140/Test-Simple/t/Builder/
H A DBuilder.t18 $Test->ok( 1, 'compiled and new()' );
19 $Test->ok( $default_lvl == 1, 'level()' );
28 print "ok $test_num - current_test() set\n";
30 $Test->ok( 1, 'counter still good' );
H A Doutput.t32 $Test->ok( defined $out );
94 $tb->ok(1, "ok");
95 $tb->ok(1, "ok\n");
96 $tb->ok(1, "ok, like\nok");
102 ok 1 - ok
103 ok
[all...]
/macosx-10.9.5/CPANInternal-140/Test-Simple/t/Tester/
H A Dtbt_05faildiag.t8 test_out("not ok 1 - one");
10 ok(0,"one");
12 test_out("not ok 2 - two");
15 ok(0,"two");
20 test_out("not ok 1 - one");
21 ok(0,"one");
/macosx-10.9.5/CPANInternal-140/Test-Simple/t/subtest/
H A Ddie.t16 $tb->ok(1);
18 $Test->ok( !eval {
26 $Test->ok( !$tb->parent, "the parent object is restored after a die" );
/macosx-10.9.5/ruby-104/ruby/ext/io/console/
H A Dextconf.rb3 ok = true
13 ok = false
18 if ok
/macosx-10.9.5/CPANInternal-140/Perl-Ldap/t/
H A D57url.t13 ok($ldap, "client");
17 ok(!$mesg->code, "bind: " . $mesg->code . ": " . $mesg->error);
19 ok(ldif_populate($ldap, "data/50-in.ldif"), "data/50-in.ldif");
22 ok(!$mesg->code, "search: " . $mesg->code . ": " . $mesg->error);
28 ok($ldap, "$url client");
31 ok(!$mesg->code, "search: " . $mesg->code . ": " . $mesg->error);
/macosx-10.9.5/CPANInternal-140/YAML-Syck/t/
H A DTestYAML.pm14 *::ok = *ok;
15 *::is = *ok;
/macosx-10.9.5/CPANInternal-140/Class-Trigger-0.14/inc/Test/
H A DMore.pm26 our @EXPORT = qw(ok use_ok require_ok
84 sub ok ($;$) { subroutine
88 return $tb->ok( $test, $name );
139 my $ok = $tb->ok( 0, "->can(...)" );
141 return $ok;
145 my $ok = $tb->ok( 0, "$class->can(...)" );
147 return $ok;
158 my $ok
[all...]

Completed in 196 milliseconds

1234567891011>>