Home
last modified time | relevance | path

Searched refs:testdir (Results 1 – 6 of 6) sorted by relevance

/mirbsd/src/gnu/usr.bin/perl/t/win32/
Dsystem.t26 my $testdir = "t e s t";
29 rmtree($testdir);
30 mkdir($testdir);
31 die "Could not create '$testdir':$!" unless -d $testdir;
33 open(my $F, ">$testdir/$exename.c")
34 or die "Can't create $testdir/$exename.c: $!";
66 open($F, ">$testdir/$plxname.bat")
67 or die "Can't create $testdir/$plxname.bat: $!";
97 chdir($testdir);
99 chdir($cwd) && rmtree("$cwd/$testdir") if -d "$cwd/$testdir";
[all …]
Dsystem_tests13 my $testdir = "t e s t";
17 my $exe = "$testdir/$exename";
22 my $bat = "$testdir/$plxname";
/mirbsd/src/gnu/usr.bin/perl/t/pod/
Dtestpchk.pl80 my ($testname, $testdir) = ("", "");
91 $testdir ||= $_;
93 $cmpfile = $testdir . $testname . '.xr';
94 $outfile = $testdir . $testname . '.OUT';
Dtestp2pt.pl139 my ($testname, $testdir) = ("", "");
150 $testdir ||= $_;
152 $cmpfile = $testdir . $testname . '.xr';
153 $outfile = $testdir . $testname . '.OUT';
/mirbsd/src/gnu/usr.bin/perl/utils/
Dh2xs.PL2064 my $testdir = "t";
2065 my $testfile = "$testdir/$modpname.t";
2066 unless (-d "$testdir") {
2067 mkdir "$testdir" or die "Cannot mkdir $testdir: $!\n";
/mirbsd/src/sbin/fsdb/
Dfsdb.c558 struct direct testdir; in chnamefunc() local
562 testdir.d_namlen = strlen(idesc->id_name); in chnamefunc()
563 if (DIRSIZ(NEWDIRFMT, &testdir) <= dirp->d_reclen) { in chnamefunc()
564 dirp->d_namlen = testdir.d_namlen; in chnamefunc()