diff options
Diffstat (limited to 'tests/extern-scan.pl')
-rwxr-xr-x | tests/extern-scan.pl | 60 |
1 files changed, 0 insertions, 60 deletions
diff --git a/tests/extern-scan.pl b/tests/extern-scan.pl deleted file mode 100755 index 49d0c86b0..000000000 --- a/tests/extern-scan.pl +++ /dev/null @@ -1,60 +0,0 @@ -#!/usr/bin/env perl -#*************************************************************************** -# _ _ ____ _ -# Project ___| | | | _ \| | -# / __| | | | |_) | | -# | (__| |_| | _ <| |___ -# \___|\___/|_| \_\_____| -# -# Copyright (C) 2010-2015, Daniel Stenberg, <daniel@haxx.se>, et al. -# -# This software is licensed as described in the file COPYING, which -# you should have received as part of this distribution. The terms -# are also available at http://curl.haxx.se/docs/copyright.html. -# -# You may opt to use, copy, modify, merge, publish, distribute and/or sell -# copies of the Software, and permit persons to whom the Software is -# furnished to do so, under the terms of the COPYING file. -# -# This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY -# KIND, either express or implied. -# -########################################################################### -# -# - -use strict; -use warnings; - -# we may get the dir root pointed out -my $root=$ARGV[0] || "."; - -my @incs = ( - "$root/include/curl/curl.h", - "$root/include/curl/easy.h", - "$root/include/curl/mprintf.h", - "$root/include/curl/multi.h", - ); - -my $verbose=0; -my $summary=0; -my $misses=0; - -my @syms; -my %doc; -my %rem; - -sub scanheader { - my ($f)=@_; - open H, "<$f" || die; - while(<H>) { - if (/^(CURL_EXTERN.*)/) { - print "$1\n"; - } - } - close H; -} - -foreach my $i (@incs) { - scanheader($i); -} |