aboutsummaryrefslogtreecommitdiff
path: root/tests/libtest/mk580.pl
diff options
context:
space:
mode:
authorDaniel Stenberg <daniel@haxx.se>2010-11-02 22:27:33 +0100
committerDaniel Stenberg <daniel@haxx.se>2010-11-02 22:27:33 +0100
commitcc8791329435e3e992dff7488e5649e655f2fd54 (patch)
tree1b923c324e765623d4cecf232c57d1432d3fbf10 /tests/libtest/mk580.pl
parentca9f9cb8754b5b5010b76ec77b950eadbe42dc9b (diff)
test: added test 580 - verifies symbols-in-versions
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.
Diffstat (limited to 'tests/libtest/mk580.pl')
-rw-r--r--tests/libtest/mk580.pl18
1 files changed, 18 insertions, 0 deletions
diff --git a/tests/libtest/mk580.pl b/tests/libtest/mk580.pl
new file mode 100644
index 000000000..8dc6d57b8
--- /dev/null
+++ b/tests/libtest/mk580.pl
@@ -0,0 +1,18 @@
+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);