/macosx-10.9.5/CPANInternal-140/Pod-WSDL/t/ |
H A D | 08Param01basic.t | 8 my $a1 = new Pod::WSDL::Param(); 14 my $a1 = new Pod::WSDL::Param('myParam $string blah blah ...'); 20 my $a1 = new Pod::WSDL::Param('_IN myParam string blah blah ...'); 25 my $a1 = new Pod::WSDL::Param('_IN myParam $string blah blah ...'); 27 ok($a1->name eq 'myParam', 'Read name correctly from input'); 28 ok($a1->type eq 'string', 'Read type correctly from input'); 29 ok($a1->paramType eq 'IN', 'Read in type correctly from input'); 30 ok($a1->array == 0, 'Read scalar type correctly from input'); 31 ok($a1->descr eq 'blah blah ...', 'Read descr correctly from input'); 33 $a1 [all...] |
H A D | 07Return01basic.t | 8 my $a1 = new Pod::WSDL::Return(); 14 my $a1 = new Pod::WSDL::Return('$string blah blah ...'); 20 my $a1 = new Pod::WSDL::Return('_RETURN string blah blah ...'); 25 my $a1 = new Pod::WSDL::Return('_RETURN $string blah blah ...'); 27 ok($a1->type eq 'string', 'Read type correctly from input'); 28 ok($a1->array == 0, 'Read scalar type correctly from input'); 29 ok($a1->descr eq 'blah blah ...', 'Read descr correctly from input'); 31 $a1 = new Pod::WSDL::Return(' _RETURN $string blah blah ...'); 32 ok($a1->type eq 'string', 'Handles whitespace before _RETURN correctly.'); 34 $a1 [all...] |
H A D | 04Attr01basic.t | 8 my $a1 = new Pod::WSDL::Attr(); 14 my $a1 = new Pod::WSDL::Attr('myAttr $string _NEEDED blah blah ...'); 20 my $a1 = new Pod::WSDL::Attr('_ATTR myAttr string _NEEDED blah blah ...'); 25 my $a1 = new Pod::WSDL::Attr('_ATTR myAttr $string _NEEDED blah blah ...'); 27 ok($a1->name eq 'myAttr', 'Read name correctly from input'); 28 ok($a1->type eq 'string', 'Read type correctly from input'); 29 ok($a1->array == 0, 'Read scalar type correctly from input'); 30 ok($a1->descr eq 'blah blah ...', 'Read descr correctly from input'); 32 ok($a1->nillable == undef, 'Read _NEEDED correctly from input'); 35 $a1 [all...] |
H A D | 05Doc01basic.t | 8 my $a1 = new Pod::WSDL::Doc(); 14 my $a1 = new Pod::WSDL::Doc('blah blah ...'); 19 my $a1 = new Pod::WSDL::Doc('_DOC blah blah ...'); 21 ok($a1->descr eq 'blah blah ...', 'Read descr correctly from input'); 23 $a1 = new Pod::WSDL::Doc(' _DOC blah blah ...'); 24 ok($a1->descr eq 'blah blah ...', 'Handles whitespace before _DOC correctly.'); 26 $a1 = new Pod::WSDL::Doc('_DOC'); 27 ok($a1->descr eq '', 'No description is handled correctly'); 29 $a1->descr('more blah'); 30 ok($a1 [all...] |
H A D | 06Fault01basic.t | 8 my $a1 = new Pod::WSDL::Fault(); 14 my $a1 = new Pod::WSDL::Fault('blah blah ...'); 20 my $a1 = new Pod::WSDL::Fault('_FAULT My::Fault blah blah ...'); 25 my $a1 = new Pod::WSDL::Fault('_FAULT My::Fault blah blah ...'); 27 ok($a1->wsdlName eq 'MyFault', 'Read wsdl name correctly from input'); 28 ok($a1->type eq 'My::Fault', 'Read type correctly from input'); 29 ok($a1->descr eq 'blah blah ...', 'Read descr correctly from input'); 31 $a1 = new Pod::WSDL::Fault(' _FAULT My::Fault blah blah ...'); 32 ok($a1->wsdlName eq 'MyFault', 'Handles whitespace before _FAULT correctly.'); 34 $a1 [all...] |
H A D | 09Attr01basic.t | 14 my $a1 = new Pod::WSDL::Type(); 19 my $a1 = new Pod::WSDL::Type(name => 'my::foo', array => 1, descr => 'blah ...', pod => 'blah blah ...', pod => $attrData); 21 ok ($a1->name eq 'my::foo', 'Red name argument correctly'); 22 ok ($a1->wsdlName eq 'MyFoo', 'Made wsdl name correctly'); 23 ok ($a1->array == 1, 'Red array argument correctly'); 24 ok ($a1->descr eq 'blah ...', 'Red descr argument correctly'); 25 ok (@{$a1->attrs} == 6, 'Seem to parse pod correctly'); 26 ok (($a1->attrs)->[0]->name eq '_ID', '... yes'); 27 ok (($a1->attrs)->[0]->type eq 'string', '... yes'); 28 ok (($a1 [all...] |
/macosx-10.9.5/CPANInternal-140/Pod-WSDL-0.061/t/ |
H A D | 08Param01basic.t | 8 my $a1 = new Pod::WSDL::Param(); 14 my $a1 = new Pod::WSDL::Param('myParam $string blah blah ...'); 20 my $a1 = new Pod::WSDL::Param('_IN myParam string blah blah ...'); 25 my $a1 = new Pod::WSDL::Param('_IN myParam $string blah blah ...'); 27 ok($a1->name eq 'myParam', 'Read name correctly from input'); 28 ok($a1->type eq 'string', 'Read type correctly from input'); 29 ok($a1->paramType eq 'IN', 'Read in type correctly from input'); 30 ok($a1->array == 0, 'Read scalar type correctly from input'); 31 ok($a1->descr eq 'blah blah ...', 'Read descr correctly from input'); 33 $a1 [all...] |
H A D | 07Return01basic.t | 8 my $a1 = new Pod::WSDL::Return(); 14 my $a1 = new Pod::WSDL::Return('$string blah blah ...'); 20 my $a1 = new Pod::WSDL::Return('_RETURN string blah blah ...'); 25 my $a1 = new Pod::WSDL::Return('_RETURN $string blah blah ...'); 27 ok($a1->type eq 'string', 'Read type correctly from input'); 28 ok($a1->array == 0, 'Read scalar type correctly from input'); 29 ok($a1->descr eq 'blah blah ...', 'Read descr correctly from input'); 31 $a1 = new Pod::WSDL::Return(' _RETURN $string blah blah ...'); 32 ok($a1->type eq 'string', 'Handles whitespace before _RETURN correctly.'); 34 $a1 [all...] |
H A D | 04Attr01basic.t | 8 my $a1 = new Pod::WSDL::Attr(); 14 my $a1 = new Pod::WSDL::Attr('myAttr $string _NEEDED blah blah ...'); 20 my $a1 = new Pod::WSDL::Attr('_ATTR myAttr string _NEEDED blah blah ...'); 25 my $a1 = new Pod::WSDL::Attr('_ATTR myAttr $string _NEEDED blah blah ...'); 27 ok($a1->name eq 'myAttr', 'Read name correctly from input'); 28 ok($a1->type eq 'string', 'Read type correctly from input'); 29 ok($a1->array == 0, 'Read scalar type correctly from input'); 30 ok($a1->descr eq 'blah blah ...', 'Read descr correctly from input'); 32 ok($a1->nillable == undef, 'Read _NEEDED correctly from input'); 35 $a1 [all...] |
H A D | 05Doc01basic.t | 8 my $a1 = new Pod::WSDL::Doc(); 14 my $a1 = new Pod::WSDL::Doc('blah blah ...'); 19 my $a1 = new Pod::WSDL::Doc('_DOC blah blah ...'); 21 ok($a1->descr eq 'blah blah ...', 'Read descr correctly from input'); 23 $a1 = new Pod::WSDL::Doc(' _DOC blah blah ...'); 24 ok($a1->descr eq 'blah blah ...', 'Handles whitespace before _DOC correctly.'); 26 $a1 = new Pod::WSDL::Doc('_DOC'); 27 ok($a1->descr eq '', 'No description is handled correctly'); 29 $a1->descr('more blah'); 30 ok($a1 [all...] |
H A D | 06Fault01basic.t | 8 my $a1 = new Pod::WSDL::Fault(); 14 my $a1 = new Pod::WSDL::Fault('blah blah ...'); 20 my $a1 = new Pod::WSDL::Fault('_FAULT My::Fault blah blah ...'); 25 my $a1 = new Pod::WSDL::Fault('_FAULT My::Fault blah blah ...'); 27 ok($a1->wsdlName eq 'MyFault', 'Read wsdl name correctly from input'); 28 ok($a1->type eq 'My::Fault', 'Read type correctly from input'); 29 ok($a1->descr eq 'blah blah ...', 'Read descr correctly from input'); 31 $a1 = new Pod::WSDL::Fault(' _FAULT My::Fault blah blah ...'); 32 ok($a1->wsdlName eq 'MyFault', 'Handles whitespace before _FAULT correctly.'); 34 $a1 [all...] |
H A D | 09Attr01basic.t | 14 my $a1 = new Pod::WSDL::Type(); 19 my $a1 = new Pod::WSDL::Type(name => 'my::foo', array => 1, descr => 'blah ...', pod => 'blah blah ...', pod => $attrData); 21 ok ($a1->name eq 'my::foo', 'Red name argument correctly'); 22 ok ($a1->wsdlName eq 'MyFoo', 'Made wsdl name correctly'); 23 ok ($a1->array == 1, 'Red array argument correctly'); 24 ok ($a1->descr eq 'blah ...', 'Red descr argument correctly'); 25 ok (@{$a1->attrs} == 6, 'Seem to parse pod correctly'); 26 ok (($a1->attrs)->[0]->name eq '_ID', '... yes'); 27 ok (($a1->attrs)->[0]->type eq 'string', '... yes'); 28 ok (($a1 [all...] |
/macosx-10.9.5/bind9-45.100/bind9/contrib/idn/idnkit-1.0-src/lib/tests/ |
H A D | setenv.h | 51 #define unsetenv(a1) myunsetenv(a1) 55 #define setenv(a1, a2, a3) mysetenv(a1, a2, a3)
|
/macosx-10.9.5/ruby-104/ruby/sample/ |
H A D | pi.rb | 3 k, a, b, a1, b1 = 2, 4, 1, 12, 4 8 a, b, a1, b1 = a1, b1, p*a+q*a1, p*b+q*b1 11 d1 = a1 / b1 15 a, a1 = 10*(a%b), 10*(a1%b1) 16 d, d1 = a/b, a1/b1
|
/macosx-10.9.5/ruby-104/ruby/bootstraptest/ |
H A D | test_finalizer.rb | 2 a1,a2,b1,b2=Array.new(4){""} 6 ObjectSpace.define_finalizer(a2,proc{a1.inspect}) 7 ObjectSpace.define_finalizer(a1,proc{})
|
/macosx-10.9.5/libffi-18.1/tests/testsuite/libffi.call/ |
H A D | cls_pointer_stack.c | 13 long double a1, char b1, 18 return a1 + b1 + a2 + b2 + a3 + b3 + a4 + b4; 21 void* cls_pointer_fn2(void* a1, void* a2) argument 23 long double trample1 = (long)a1 + (long)a2; 24 char trample2 = ((char*)&a1)[0] + ((char*)&a2)[0]; 25 long double trample3 = (long)trample1 + (long)a1; 26 char trample4 = trample2 + ((char*)&a1)[1]; 35 void* result = (void*)((long)a1 + (long)a2); 37 printf("0x%08x 0x%08x: 0x%08x\n", a1, a2, result); 42 void* cls_pointer_fn1(void* a1, voi argument 12 dummy_func( long double a1, char b1, long double a2, char b2, long double a3, char b3, long double a4, char b4) argument 68 void* a1 = *(void**)(args[0]); local [all...] |
H A D | cls_align_longdouble_split.c | 23 cls_struct_align a1, 28 r.a = a1.a + a2.a; 29 r.b = a1.b + a2.b; 30 r.c = a1.c + a2.c; 31 r.d = a1.d + a2.d; 32 r.e = a1.e + a2.e; 33 r.f = a1.f + a2.f; 34 r.g = a1.g + a2.g; 38 a1.a, a1 22 cls_struct_align_fn( cls_struct_align a1, cls_struct_align a2) argument 45 cls_struct_align_fn2( cls_struct_align a1) argument 69 struct cls_struct_align a1, a2; local [all...] |
/macosx-10.9.5/pyobjc-42/2.5/pyobjc/pyobjc-core/libffi-src/tests/testsuite/libffi.call/ |
H A D | cls_pointer_stack.c | 13 long double a1, char b1, 18 return a1 + b1 + a2 + b2 + a3 + b3 + a4 + b4; 21 void* cls_pointer_fn2(void* a1, void* a2) argument 23 long double trample1 = (long)a1 + (long)a2; 24 char trample2 = ((char*)&a1)[0] + ((char*)&a2)[0]; 25 long double trample3 = (long)trample1 + (long)a1; 26 char trample4 = trample2 + ((char*)&a1)[1]; 35 void* result = (void*)((long)a1 + (long)a2); 37 printf("0x%08x 0x%08x: 0x%08x\n", a1, a2, result); 42 void* cls_pointer_fn1(void* a1, voi argument 12 dummy_func( long double a1, char b1, long double a2, char b2, long double a3, char b3, long double a4, char b4) argument 68 void* a1 = *(void**)(args[0]); local [all...] |
H A D | cls_align_longdouble_split.c | 23 cls_struct_align a1, 28 r.a = a1.a + a2.a; 29 r.b = a1.b + a2.b; 30 r.c = a1.c + a2.c; 31 r.d = a1.d + a2.d; 32 r.e = a1.e + a2.e; 33 r.f = a1.f + a2.f; 34 r.g = a1.g + a2.g; 38 a1.a, a1 22 cls_struct_align_fn( cls_struct_align a1, cls_struct_align a2) argument 45 cls_struct_align_fn2( cls_struct_align a1) argument 69 struct cls_struct_align a1, a2; local [all...] |
/macosx-10.9.5/pyobjc-42/pyobjc/pyobjc-core/libffi-src/tests/testsuite/libffi.call/ |
H A D | cls_pointer_stack.c | 13 long double a1, char b1, 18 return a1 + b1 + a2 + b2 + a3 + b3 + a4 + b4; 21 void* cls_pointer_fn2(void* a1, void* a2) argument 23 long double trample1 = (long)a1 + (long)a2; 24 char trample2 = ((char*)&a1)[0] + ((char*)&a2)[0]; 25 long double trample3 = (long)trample1 + (long)a1; 26 char trample4 = trample2 + ((char*)&a1)[1]; 35 void* result = (void*)((long)a1 + (long)a2); 37 printf("0x%08x 0x%08x: 0x%08x\n", a1, a2, result); 42 void* cls_pointer_fn1(void* a1, voi argument 12 dummy_func( long double a1, char b1, long double a2, char b2, long double a3, char b3, long double a4, char b4) argument 68 void* a1 = *(void**)(args[0]); local [all...] |
H A D | cls_align_longdouble_split.c | 23 cls_struct_align a1, 28 r.a = a1.a + a2.a; 29 r.b = a1.b + a2.b; 30 r.c = a1.c + a2.c; 31 r.d = a1.d + a2.d; 32 r.e = a1.e + a2.e; 33 r.f = a1.f + a2.f; 34 r.g = a1.g + a2.g; 38 a1.a, a1 22 cls_struct_align_fn( cls_struct_align a1, cls_struct_align a2) argument 45 cls_struct_align_fn2( cls_struct_align a1) argument 69 struct cls_struct_align a1, a2; local [all...] |
/macosx-10.9.5/dtrace-118.1/test/tst/common/decls/ |
H A D | tst.arrays.d | 38 extern int a1[];
|
/macosx-10.9.5/CPANInternal-140/Readonly/t/ |
H A D | deepa.t | 18 use vars qw/@a1 @a2/; 22 eval {Readonly::Array @a1 => (\$m1, {x => 5, z => [1, 2, 3]})}; 28 eval {$a1[0] = 7;}; 29 is $@ => expected(__LINE__-1), 'Modify a1'; 33 eval {${$a1[0]} = "the";}; 34 is $@ => expected(__LINE__-1), 'Deep-modify a1'; 35 is $m1 => 17, 'a1 unchanged'; 41 eval {$a1[1]{z}[1] = 42;}; 42 is $@ => expected(__LINE__-1), 'Deep-deep modify a1'; 43 is $a1[ [all...] |
/macosx-10.9.5/CPANInternal-140/Readonly-1.03/t/ |
H A D | deepa.t | 18 use vars qw/@a1 @a2/; 22 eval {Readonly::Array @a1 => (\$m1, {x => 5, z => [1, 2, 3]})}; 28 eval {$a1[0] = 7;}; 29 is $@ => expected(__LINE__-1), 'Modify a1'; 33 eval {${$a1[0]} = "the";}; 34 is $@ => expected(__LINE__-1), 'Deep-modify a1'; 35 is $m1 => 17, 'a1 unchanged'; 41 eval {$a1[1]{z}[1] = 42;}; 42 is $@ => expected(__LINE__-1), 'Deep-deep modify a1'; 43 is $a1[ [all...] |
/macosx-10.9.5/JavaScriptCore-7537.78.1/tests/mozilla/js1_5/Array/ |
H A D | regress-157652.js | 125 var a1=Array(0xFFFFFFFF); 126 a1.sort(); 127 a1 = null;
|