Welcome to mirror list, hosted at ThFree Co, Russian Federation.

cygwin.com/git/newlib-cygwin.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'winsup/ccwrap')
-rwxr-xr-xwinsup/ccwrap55
1 files changed, 0 insertions, 55 deletions
diff --git a/winsup/ccwrap b/winsup/ccwrap
deleted file mode 100755
index 7580e7a3b..000000000
--- a/winsup/ccwrap
+++ /dev/null
@@ -1,55 +0,0 @@
-#!/usr/bin/perl
-use Cwd;
-use strict;
-my $cxx;
-my $ccorcxx;
-if ($ARGV[0] ne '++') {
- $ccorcxx = 'CC';
- $cxx = 0;
-} else {
- shift @ARGV;
- $ccorcxx = 'CXX';
- $cxx = 1;
-}
-die "$0: $ccorcxx environment variable does not exist\n" unless exists $ENV{$ccorcxx};
-my @compiler = split ' ', $ENV{$ccorcxx};
-if ("@ARGV" !~ / -nostdinc/o) {
- my $fd;
- push @compiler, ($cxx ? '-xc++' : '-xc');
- if (!open $fd, '-|') {
- open STDERR, '>&', \*STDOUT;
- exec @compiler, '/dev/null', '-v', '-E', '-o', '/dev/null' or die "*** error execing $compiler[0] - $!\n";
- }
- $compiler[1] =~ s/xc/nostdinc/o;
- push @compiler, '-nostdinc' if $cxx;
- push @compiler, '-I' . $_ for split ' ', $ENV{CCWRAP_HEADERS};
- push @compiler, '-isystem', $_ for split ' ', $ENV{CCWRAP_SYSTEM_HEADERS};
- my $finding_paths = 0;
- my $mingw_compiler = $compiler[0] =~ /mingw/o;
- my @dirafters;
- for my $d (split ' ', $ENV{CCWRAP_DIRAFTER_HEADERS}) {
- push @dirafters, '-isystem', $d if !$mingw_compiler || $d !~ /w32api/o;
- }
- while (<$fd>) {
- if (/^\*\*\*/o) {
- print;
- } elsif ($_ eq "#include <...> search starts here:\n") {
- $finding_paths = 1;
- } elsif (!$finding_paths) {
- next;
- } elsif ($_ eq "End of search list.\n") {
- last;
- } elsif (!@dirafters || !m%w32api|mingw.*/include%o) {
- chomp;
- s/^\s+//;
- push @compiler, '-isystem', Cwd::abs_path($_);
- }
- }
- push @compiler, @dirafters;
- close $fd;
-}
-
-push @compiler, @ARGV;
-
-print join(' ', '+', @compiler), "\n" if $ENV{CCWRAP_VERBOSE};
-exec @compiler or die "$0: $compiler[0] failed to execute\n";