#!/usr/bin/perl

my $CC = $ARGV[1];
my $gcc = `echo '#include <stddef.h>' | $CC -E - `;

$gcc =~ m=\"(/[^"]+/)stddef\.h"=;
my $gcc_path = $1;

if ($ARGV[0]=~/-l/) {
print <<EOF
char *l_include_path[] = {
    "/usr/include/",
    "$gcc_path",
    0
};
EOF
} else {
	print "$gcc_path\n";
}