2000-06-25 11:04:01 +00:00

19 lines
420 B
Perl
Executable File

#!./perl
# $RCSfile: cpp.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:18 $
BEGIN {
chdir 't' if -d 't';
unshift @INC, '../lib';
}
use Config;
if ( $^O eq 'MSWin32' or
($Config{'cppstdin'} =~ /\bcppstdin\b/) and
( ! -x $Config{'binexp'} . "/cppstdin") ) {
print "1..0 # Skip: \$Config{cppstdin} unavailable\n";
exit; # Cannot test till after install, alas.
}
system "./perl -P comp/cpp.aux"