| /openbsd-src/gnu/usr.bin/perl/t/op/ |
| H A D | range.t | 14 is(join(':',1..5), '1:2:3:4:5'); 19 is(join(':',@foo[$foo[0]..5]), '2:c:d:e:6'); 22 is(join(':',@bar[1..5]), ':c:d:e:'); 25 is(join(':',$a,@bcd[0..2],$e), 'a:b:c:d:e'); 39 $x = join('','a'..'z'); 56 is(join(",", @y), join(",", @x), "foreach range with rhs 0xFF, utf8=$_"); 60 is(join(",", @x), join(",", map {sprintf "%02d",$_} 9..99)); 67 is(join(",", @y), join(",", @x)); 92 $x =~ s/(\w)-(\w)/join ':', $1 .. $2/e; 110 is(join(":","-4".."0") , "-4:-3:-2:-1:0"); [all …]
|
| H A D | join.t | 12 is( join(':',@x), '1:2:3', 'join an array with character'); 14 is( join('',1,2,3), '123', 'join list with no separator'); 16 is( join(':',split(/ /,"1 2 3")), '1:2:3', 'join implicit array with character'); 19 $f = join ',', 'b', $f, 'e'; 20 is( $f, 'b,a,e', 'join list back to self, middle of list'); 23 $f = join ',', $f, 'b', 'e'; 24 is( $f, 'a,b,e', 'join lis [all...] |
| H A D | cmpchain.t | 97 is join(",", "x", $_->[0] == $_->[1] != $_->[2], "y"), 98 join(",", "x", !!($_->[0] == $_->[1] && $_->[1] != $_->[2]), "y"), 100 is join(",", "x", $_->[0] != $_->[1] == $_->[2], "y"), 101 join(",", "x", !!($_->[0] != $_->[1] && $_->[1] == $_->[2]), "y"), 103 is join(",", "x", $_->[0] < $_->[1] <= $_->[2], "y"), 104 join(",", "x", !!($_->[0] < $_->[1] && $_->[1] <= $_->[2]), "y"), 106 is join(",", "x", $_->[0] > $_->[1] >= $_->[2], "y"), 107 join(",", "x", !!($_->[0] > $_->[1] && $_->[1] >= $_->[2]), "y"), 109 is join(",", "x", $_->[0] < $_->[1] > $_->[2], "y"), 110 join(",", "x", !!($_->[0] < $_->[1] && $_->[1] > $_->[2]), "y"), [all …]
|
| H A D | unshift.t | 16 is(join(' ',@array), '1 2 3', 'unshift null'); 21 is(join(' ',@array), '1 2 3', 'unshift null empty'); 25 is(join(' ',@array), '0 1 2 3', 'unshift singleton list'); 29 is(join(' ',@array), '3 2 1 0 1 2 3', 'unshift list'); 34 is(join(' ',@array), '5 4 3 2 1 0 1 2 3', 'unshift array'); 41 is(join(' ',@array), '7 6 5 4 3 2 1 0 1 2 3', 'unshift arrays'); 51 is(join(' ',@alpha), 'y z', 'void unshift null'); 54 is(join(' ',@alpha), 'y z', 'void unshift null empty'); 57 is(join(' ',@alpha), 'x y z', 'void unshift singleton list'); 60 is(join(' ',@alpha), 'u v w x y z', 'void unshift list'); [all …]
|
| H A D | list.t | 15 $_ = join(':',@foo); 51 cmp_ok(join(':',@foo,@bar),'eq','1:1','list reassign'); 54 cmp_ok(join(':',join('+',@foo),join('-',@bar)),'eq','2+3:2-3','long list reassign'); 58 cmp_ok(join(':',@foo),'eq','6','scalar assign to array'); 120 cmp_ok(join('*',@a),'eq','1*2*3','logical or f'); 123 cmp_ok(join('*',@a),'eq','1','logical or t'); 125 cmp_ok(join('',1,2,(3,4,5)),'eq','12345','list ..(...)'); 126 cmp_ok(join('',(1,2,3,4,5)),'eq','12345','list (.....)'); 127 cmp_ok(join('',(1,2,3,4),5),'eq','12345','list (....).'); 128 cmp_ok(join('',1,(2,3,4),5),'eq','12345','list .(...).'); [all …]
|
| H A D | split.t | 18 is(join(';',$a,$b,$c), 'a;b;c', 'Split a simple string into scalars.'); 22 is(join("$_",@ary), 'aa:b:cc'); 28 is(join(".",@ary), "a.b.c.\n"); 34 is(join(".",@ary), "a.b.c"); 37 $_ = join(':',split(' '," a b\tc \t d ")); 43 $_ = join(':',split(/ */,"foo bar bie\tdoll")); 49 $_ = join(':', 'foo', split(/ /,'a b c'), 'bar'); 56 $_ = join(':', split(' ','1 2 3 4 5 6', 3)); 64 $_ = join(':', split(' ','1 2 3 4 5 6', $x)); 71 $_ = join(' [all...] |
| H A D | repeat.t | 55 is(join('', @x x 4), '3333', '@x x Y'); 56 is(join('', (@x) x 4), '123123123123', '(@x) x Y'); 57 is(join('', (@x,()) x 4), '123123123123', '(@x,()) x Y'); 58 is(join('', (@x,1) x 4), '1231123112311231', '(@x,1) x Y'); 59 is(join(':', () x 4), '', '() x Y'); 60 is(join(':', (9) x 4), '9:9:9:9', '(X) x Y'); 61 is(join(':', (9,9) x 4), '9:9:9:9:9:9:9:9', '(X,X) x Y'); 62 is(join('', (split(//,"123")) x 2), '123123', 'split and x'); 64 is(join('', @x x -12), '', '@x x -12'); 65 is(join('', (@x) x -14), '', '(@x) x -14'); [all …]
|
| H A D | push.t | 28 is( join(':',@x), '1:2:3:1:2:3', 'push array onto array'); 30 is( join(':',@x), '1:2:3:1:2:3:4', 'push integer onto array'); 34 is( join(':',@$undef1), '1:2:3', 'autovivify array'); 54 is( join(':',@$first), '1', "\$first = [ @$first ];"); 55 is( join(':',@$second), '2:3', "\$second = [ @$second ]"); 70 is(join(':',@got), join(':',@get), "got: @got == @get"); 71 is(join(':',@x), join(':',@leave), "left: @x == @leave");
|
| H A D | tiearray.t | 152 is(join(':',@ary), '3:2:1'); 158 is(join(':',@ary), '1:2:3'); 162 is(join(':',@thing), '1:2:3'); 166 is(join(':',@thing), '1:2:3'); 172 is(join(':',@ary), '1:2'); 176 is(join(':',@ary), '1:2:4'); 183 is(join(':',@ary), '1:7:4'); 187 is(join(':',@ary), '7:4'); 192 is(join(':',@ary), '5:6:7:4'); 195 is(join(':',@ary), '1:2:3'); [all …]
|
| H A D | array.t | 16 is(join('',@ary), '12345'); 21 is(join('',@ary), '1234'); 24 $r = join(',', $#foo, @foo); 27 $r = join(',', $#foo, @foo); 30 $r = join(',', $#foo, @foo); 35 $r = join(',', $#bar, @bar); 38 $r = join(',', $#bar, @bar); 41 $r = join(',', $#bar, @bar); 44 $r = join(',', $#bar, @bar); 49 $r = join(',', [all...] |
| /openbsd-src/gnu/llvm/llvm/utils/ |
| H A D | sysroot.py | 24 winsdk = os.path.join(p, 'Windows Kits', '10') 27 os.mkdir(os.path.join(out_dir, 'Windows Kits')) 28 mkjunction(os.path.join(out_dir, 'Windows Kits', '10'), winsdk) 30 vswhere = os.path.join( 37 mkjunction(os.path.join(out_dir, 'VC'), 38 os.path.join(vsinstalldir, 'VC')) 41 mkjunction(os.path.join(out_dir, 'DIA SDK'), 42 os.path.join(vsinstalldir, 'DIA SDK')) 59 os.symlink(sdkpath, os.path.join(out_dir, os.path.basename(sdkpath))) 71 '-DCMAKE_OSX_SYSROOT=' + os.path.join(abs_out_dir, 'MacOSX.sdk'), [all …]
|
| /openbsd-src/gnu/usr.bin/perl/t/uni/ |
| H A D | lex_utf8.t | 39 my $string = join "", map { chr 0 + $_ } @_; 45 return join "", map { sprintf "%d", ord $_ } split "", $string; 50 is((join "", unpack("C*", $A_with_ogonek)), fixup("196", "132"), 'single char above 0x100'); 51 is((join "", unpack("C*", $micro_sign)), fixup("194", "181"), 'single char in 0x80 .. 0xFF'); 54 is((join "", unpack("C*", $hex_first)), fixup("97", "194", "162", "196", "132"), 'a, \x{A2}, char above 0x100'); 55 is((join "", unpack("C*", $hex_last)), fixup("97", "196", "132", "194", "162"), 'a, char above 0x100, \x{A2}'); 57 is((join "", unpack("C*", $name_first)), fixup("98", "194", "181", "198", "129"), 'b, \N{MICRO SIGN}, char above 0x100'); 58 is((join "", unpack("C*", $name_last)), fixup("98", "198", "129", "194", "181"), 'b, char above 0x100, \N{MICRO SIGN}'); 59 is((join "", unpack("C*", $uname_first)), fixup("98", "194", "181", "198", "129"), 'b, \N{U+00B5}, char above 0x100'); 60 is((join "", unpac [all...] |
| /openbsd-src/gnu/usr.bin/perl/cpan/Text-ParseWords/t/ |
| H A D | ParseWords.t | 19 is(join(";", @words), qq(foo;"bar:foo";zoo zoo;)); 24 is(join(";", @words), qq(4; ;3; ;2; ;1; ;0)); 30 my $result = join('|', parse_line('\s+', 1, $string)); 34 $result = join('|', parse_line('\s+', 0, $string)); 39 $result = join('|', parse_line('\s+', 0, $string)); 69 $result = join('|', parse_line(':', 0, 'foo::0:"":::')); 73 $result = join('|', parse_line(':', 0, ':"0":')); 77 $result = join('|', parse_line(':', 0, ':"' . "\001" . '":')); 85 $result = join('|', parse_line('\s+', 0, $string)); 90 is(join(";", @words), qq(4;3;2;1;0)); [all …]
|
| /openbsd-src/gnu/usr.bin/perl/dist/threads/t/ |
| H A D | join.t | 59 my $retval = threads->create(sub { return ("hi") })->join(); 64 my @retval = $thread->join(); 68 my $retval = threads->create(sub { return [1] })->join(); 72 my $retval = threads->create(sub { return { foo => "bar" }})->join(); 80 })->join(); 88 my $retval = threads->create(sub { return $_[0]}, \$test)->join(); 94 my $retval = threads->create(sub { return $_[0]}, \$test)->join(); 107 })->join(); 118 })->join; 149 $t->join(); [all …]
|
| H A D | thread.t | 37 print $t->join(); 47 $t->join(); 56 $ret->join; 61 $t->join(); 70 $t->join(); 85 $t->join->join; 126 ok($thr1->join()); 127 ok($thr2->join()); 128 ok($thr3->join()); 129 ok($thr4->join()); [all …]
|
| H A D | blocks.t | 69 threads->create('foo')->join(); 71 threads->create(\&foo)->join(); 73 threads->create(sub { lock($COUNT); $COUNT++; })->join(); 88 threads->create('foo')->join(); 90 threads->create(\&foo)->join(); 92 threads->create(sub { lock($COUNT); $COUNT++; })->join(); 107 ok($mthr->join() == 42, 'Main join'); 108 ok($bthr->join() == 42, 'BEGIN join');
|
| /openbsd-src/regress/usr.bin/join/ |
| H A D | Makefile | 6 join -t " " -a 1 -a 2 -e '(unknown)' -o 0,1.2,2.2 ${.CURDIR}/phone ${.CURDIR}/fax > ${*}.log 11 join ${.CURDIR}/fa1 ${.CURDIR}/fb1 > ${*}.log 16 join ${.CURDIR}/fa2 ${.CURDIR}/fb2 > ${*}.log 21 join -t, -o0,1.2,1.3,2.2,2.3 -a1 ${.CURDIR}/t4a.in ${.CURDIR}/t4b.in > ${*}.log 26 join -t, -o0,1.2,1.3,2.2,2.3 -a2 ${.CURDIR}/t4a.in ${.CURDIR}/t4b.in > ${*}.log 31 join -t, -o0,1.2,1.3,2.2,2.3 -a1 -a2 ${.CURDIR}/t4a.in ${.CURDIR}/t4b.in > ${*}.log 36 join -j 2 ${.CURDIR}/t7a.in ${.CURDIR}/t7b.in > ${*}.log 41 join -j 2 -e empty ${.CURDIR}/t8a.in ${.CURDIR}/t8b.in > ${*}.log 48 LC_ALL=en_US.UTF-8 join -t‐ ${.CURDIR}/t9a.in ${.CURDIR}/t9b.in > ${*}.log 53 ! LC_ALL=C join -t‐ ${.CURDIR}/t9a.in ${.CURDIR}/t9b.in > ${*}.log 2>&1
|
| /openbsd-src/gnu/llvm/clang/tools/scan-build-py/tests/unit/ |
| H A D | test_intercept.py | 25 parent = os.path.join(os.sep, 'home', 'me') 26 current = os.path.join(parent, 'project') 32 self.assertEqual(os.path.join(current, 'file.c'), test('file.c')) 33 self.assertEqual(os.path.join(current, 'file.c'), test('./file.c')) 34 self.assertEqual(os.path.join(parent, 'file.c'), test('../file.c')) 35 self.assertEqual(os.path.join(current, 'file.c'), 36 test(os.path.join(current, 'file.c'))) 49 handle.write('\n'.join(lines)) 54 filename = os.path.join(dest_dir, 'csrutil') 59 filename = os.path.join(dest_dir, 'sestatus')
|
| /openbsd-src/gnu/llvm/clang/tools/scan-build-py/tests/functional/cases/ |
| H A D | test_from_cdb.py | 18 path = os.path.abspath(os.path.join(this_dir, '..', 'src')) 19 source_dir = os.path.join(path, 'compilation_database') 20 source_file = os.path.join(source_dir, target_file + '.in') 21 target_file = os.path.join(target_dir, 'compile_commands.json') 99 return len(glob.glob(os.path.join(directory, 'report-*.html'))) 103 return len(glob.glob(os.path.join(directory, 'report-*.plist'))) 107 return len(glob.glob(os.path.join(directory, 'result-*.sarif'))) 114 os.path.exists(os.path.join(reportdir, 'index.html'))) 124 os.path.exists(os.path.join(reportdir, 'index.html'))) 134 os.path.exists(os.path.join(reportdir, 'index.html'))) [all …]
|
| /openbsd-src/gnu/llvm/lldb/scripts/ |
| H A D | install_custom_python.py | 31 source_path = os.path.join(source_dir, filename) 32 dest_path = os.path.join(dest_dir, filename) 50 dest_dir = os.path.join(dest_dir, subdir) 51 source_dir = os.path.join(source_dir, subdir) 57 dest_dir = os.path.join(dest_dir, dest_subdir) 62 PCbuild_dir = os.path.join(source_dir, 'PCbuild') 64 PCbuild_dir = os.path.join(PCbuild_dir, source_prefix) 94 tools_dest_dir = os.path.join(dest_dir, 'Tools') 95 tools_source_dir = os.path.join(source_dir, 'Tools') 116 dlls_dir = os.path.join(dest_dir, 'DLLs') [all …]
|
| /openbsd-src/gnu/llvm/llvm/utils/docker/scripts/llvm_checksum/ |
| H A D | project_tree.py | 40 ignored_paths.add(os.path.join(checkout_root, other_project.relpath)) 45 project_root = os.path.join(checkout_root, project.relpath) 50 os.path.join(root, d) not in ignored_paths 53 visitor(os.path.join(root, f)) 80 LLVMProject(p, os.path.join("projects", p)) for p in ORDINARY_PROJECTS 83 LLVMProject(p, os.path.join("tools", p)) for p in TOOLS_PROJECTS 87 os.path.join("tools", "clang", "tools", "extra"))) 93 LLVMProject("clang-tools-extra", os.path.join("clang", "tools",
|
| /openbsd-src/gnu/usr.bin/perl/lib/ |
| H A D | DirHandle.t | 37 ok(+(join("\0", @a) eq join("\0", @b)), 42 cmp_ok(join("\0", @b), 'eq', join("\0", @c), 68 ok(+(join("\0", @a) eq join("\0", @b)), 73 cmp_ok(join("\0", @b), 'eq', join("\0", @c),
|
| /openbsd-src/gnu/llvm/clang/utils/analyzer/ |
| H A D | SATestBuild.py | 176 CHECKERS = ",".join([ 201 cwd = os.path.join(directory, PATCHED_SOURCE_DIR_NAME) 202 script_path = os.path.join(directory, CLEANUP_SCRIPT) 359 return os.path.join(os.path.abspath(os.curdir), self.project.name) 367 return os.path.join(self.get_project_dir(), dirname) 384 os.makedirs(os.path.join(output_dir, LOG_DIR_NAME)) 414 build_script_path = os.path.join(directory, BUILD_SCRIPT) 428 cwd = os.path.join(directory, PATCHED_SOURCE_DIR_NAME) 501 if os.path.exists(os.path.join(directory, BUILD_SCRIPT)): 517 plist_path = os.path.join(directory, output_dir, "date") [all …]
|
| /openbsd-src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/inc/ |
| H A D | mPUSH | 121 is(join(':', &Devel::PPPort::mPUSHs()), "foo:bar:42"); 122 is(join(':', &Devel::PPPort::mPUSHp()), "one:two:three"); 123 is(join(':', &Devel::PPPort::mPUSHn()), "0.5:-0.25:0.125"); 124 is(join(':', &Devel::PPPort::mPUSHi()), "-1:2:-3"); 125 is(join(':', &Devel::PPPort::mPUSHu()), "1:2:3"); 127 is(join(':', &Devel::PPPort::mXPUSHs()), "foo:bar:42"); 128 is(join(':', &Devel::PPPort::mXPUSHp()), "one:two:three"); 129 is(join(':', &Devel::PPPort::mXPUSHn()), "0.5:-0.25:0.125"); 130 is(join(':', &Devel::PPPort::mXPUSHi()), "-1:2:-3"); 131 is(join(':', &Devel::PPPort::mXPUSHu()), "1:2:3");
|
| /openbsd-src/gnu/llvm/libcxx/utils/ |
| H A D | generate_extended_grapheme_cluster_test.py | 205 ", ".join([str(x) for x in line.code_points]), 206 ", ".join([str(x) for x in line.breaks_utf8]), 213 ", ".join([str(x) for x in line.code_points]), 214 ", ".join([str(x) for x in line.breaks_utf16]), 221 ", ".join([str(x) for x in line.code_points]), 222 ", ".join([str(x) for x in line.breaks_utf32]), 247 ",\n".join(map(lineToCppDataLineUtf8, lines)), 248 ",\n".join(map(lineToCppDataLineUtf16, lines)), 249 ",\n".join(map(lineToCppDataLineUtf32, lines)),
|