OSX Mavericks & Xcode 5: clang wrapper script for GHC 7.6.3

gistfile1.pl

#!/usr/bin/perl

use strict;
use warnings;

my $argv = join ' ', @ARGV;

if (index($argv, '-E')+1 && index($argv, '-undef')+1 && index($argv, '-traditional')+1) {
    $argv =~ s/-x c/-x assembler-with-cpp/g;
    @ARGV = split ' ', $argv;
    unshift @ARGV,  qw(-Wno-invalid-pp-token -Wno-unicode -Wno-trigraphs);
}

system '/usr/bin/clang', @ARGV;