Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Remove special casing of Microsoft Windows in system test.

When pugs wasn't available on Windows machine, it was failing because
test through that on Windows the only Perl 6 implementation is pugs.
  • Loading branch information...
commit b94fb84d27c6acbc7bf954a543629a0d040b91a6 1 parent 5c64ac0
GlitchMr authored
Showing with 1 addition and 5 deletions.
  1. +1 −5 S29-os/system.t
View
6 S29-os/system.t
@@ -11,13 +11,9 @@ if $*OS eq "browser" {
exit;
}
-my $pugs = ($*OS eq any(<MSWin32 mingw msys cygwin>))
- ?? 'pugs.exe'
- !! $*EXECUTABLE_NAME;
-
my $res;
-$res = run($pugs,'-e1');
+$res = run($*EXECUTABLE_NAME,'-e1');
ok($res,"run() to an existing program does not die (and returns something true)");
$res = run("program_that_does_not_exist_ignore_this_error_please.exe");
Please sign in to comment.
Something went wrong with that request. Please try again.