diff options
Diffstat (limited to 't/TEST')
-rwxr-xr-x | t/TEST | 18 |
1 files changed, 12 insertions, 6 deletions
@@ -24,14 +24,20 @@ if ($ARGV[0] eq '') { `echo base/*.t comp/*.t cmd/*.t io/*.t; echo op/*.t lib/*.t`); } -open(CONFIG,"../config.sh"); -while (<CONFIG>) { - if (/sharpbang='(.*)'/) { - $sharpbang = ($1 eq '#!'); - last; +if ($^O eq 'os2' || $^O eq 'qnx') { + $sharpbang = 0; +} +else { + open(CONFIG, "../config.sh"); + while (<CONFIG>) { + if (/sharpbang='(.*)'/) { + $sharpbang = ($1 eq '#!'); + last; + } } + close(CONFIG); } -$sharpbang = 0 if $ENV{OS2_SHELL}; # OS/2 + $bad = 0; $good = 0; $total = @ARGV; |