mirror of
https://github.com/moparisthebest/curl
synced 2024-11-10 03:25:04 -05:00
cc87913294
The new perl script mk580.pl generates a C table in a fresh source file named lib580.c and if that compiles fine we know that the file docs/libcurl/symbols-in-versions at least doesn't include any symbols that are misspelled. An additional feature would be to somehow scan curl/curl.h and compare with symbols-in-versions to see if there are symbols missing.
19 lines
247 B
Perl
19 lines
247 B
Perl
open(S, '<', $ARGV[0]);
|
|
|
|
print <<EOF
|
|
#include "curl/curl.h"
|
|
|
|
int test[] = {
|
|
EOF
|
|
;
|
|
while(<S>) {
|
|
my @a=split(/ +/);
|
|
chomp $a[0];
|
|
chomp $a[3];
|
|
if($a[0] && !$a[3]) {
|
|
printf("%s,\n", $a[0]);
|
|
}
|
|
}
|
|
print "};\n";
|
|
close(S);
|