Support missing symbols

This commit is contained in:
Stefan `Sec` Zehl 2011-08-03 16:44:46 +02:00
parent ce87f3b8f5
commit 540a76faf8
1 changed files with 6 additions and 1 deletions

View File

@ -82,7 +82,10 @@ my %defs;
for my $idx (0..$#symb){ for my $idx (0..$#symb){
$_=$symb[$idx]; $_=$symb[$idx];
if(!$types{$_}){ if(!$types{$_}){
warn "Couldn't find $symb[$idx]"; warn "Couldn't find $symb[$idx] - ignoring it.";
print C "NULL,";
print I "#define $_ (NULL)";
next;
}; };
if(!$defs{$files{$_}}){ if(!$defs{$files{$_}}){
print H qq!#include "$files{$_}"!; print H qq!#include "$files{$_}"!;
@ -103,3 +106,5 @@ close(I);
close(H); close(H);
close(C); close(C);
print "done.";