Ticket #2095: t.op.spawnw.t.diff
| File t.op.spawnw.t.diff, 481 bytes (added by jkeenan, 11 years ago) |
|---|
-
t/op/spawnw.t
diff --git a/t/op/spawnw.t b/t/op/spawnw.t index bb48be1..82a4d0b 100644
a b 45 45 46 46 # test string version of spawnw 47 47 48 49 my $perl = "perl"; 50 my $perl_exists = `perl -V`; 51 unless ($perl_exists) { 52 if( -e "/usr/bin/env" ) { 53 $perl = system("/usr/bin/env perl"); 54 } 55 } 56 48 my $perl = $^X; 57 49 58 50 pasm_output_is( <<"CODE", <<'OUTPUT', "exit code: 0" ); 59 51 .pcc_sub :main main:
