diff options
| author | Nikola Knezevic <indy@tesla.rcub.bg.ac.yu> | 2002-04-26 17:38:16 +0200 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-26 17:11:30 +0000 |
| commit | 946f19addb8b03454f49bf8bcfb27910b2445065 (patch) | |
| tree | 81f55f3816b563ef75bce359aec02d1c0d0075a9 | |
| parent | 27cc4b77ede2bf280aa5664f629885c111259aa9 (diff) | |
| download | perl-946f19addb8b03454f49bf8bcfb27910b2445065.tar.gz | |
system_tests are relevant only to win32\system.t
Message-ID: <14316006107.20020426153816@tesla.rcub.bg.ac.yu>
p4raw-id: //depot/perl@16193
| -rw-r--r-- | MANIFEST | 2 | ||||
| -rw-r--r-- | t/win32/system.t | 6 | ||||
| -rw-r--r-- | t/win32/system_tests (renamed from t/op/system_tests) | 0 |
3 files changed, 4 insertions, 4 deletions
@@ -2523,7 +2523,6 @@ t/op/subst_amp.t See if $&-related substitution works t/op/subst_wamp.t See if substitution works with $& present t/op/sub_lval.t See if lvalue subroutines work t/op/sysio.t See if sysread and syswrite work -t/op/system_tests Test runner for system.t t/op/taint.t See if tainting works t/op/tie.t See if tie/untie functions work t/op/tiearray.t See if tie for arrays works @@ -2599,6 +2598,7 @@ t/uni/title.t See if Unicode casing works t/uni/upper.t See if Unicode casing works t/win32/longpath.t Test if Win32::GetLongPathName() works t/win32/system.t See if system works in Win* +t/win32/system_tests Test runner for system.t t/x2p/s2p.t See if s2p/psed work taint.c Tainting code thrdvar.h Per-thread variables diff --git a/t/win32/system.t b/t/win32/system.t index 5384d7c279..c08fb13e04 100644 --- a/t/win32/system.t +++ b/t/win32/system.t @@ -96,7 +96,7 @@ chdir($testdir); END { chdir($cwd) && rmtree("$cwd/$testdir") if -d "$cwd/$testdir"; } -if (open(my $EIN, "$cwd/op/${exename}_exe.uu")) { +if (open(my $EIN, "$cwd/win32/${exename}_exe.uu")) { print "# Unpacking $exename.exe\n"; my $e; { @@ -142,8 +142,8 @@ unless (-x "$testdir/$exename.exe") { exit(0); } -open my $T, "$^X -I../lib -w op/system_tests |" - or die "Can't spawn op/system_tests: $!"; +open my $T, "$^X -I../lib -w win32/system_tests |" + or die "Can't spawn win32/system_tests: $!"; my $expect; my $comment = ""; my $test = 0; diff --git a/t/op/system_tests b/t/win32/system_tests index f73745ae8f..f73745ae8f 100644 --- a/t/op/system_tests +++ b/t/win32/system_tests |