verify: new macro 'assume'
[gnulib.git] / check-module
index 3b7129d..c5e5e1c 100755 (executable)
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 # Check a gnulib module.
 
-# Copyright (C) 2005-2007, 2009-2012 Free Software Foundation, Inc.
+# Copyright (C) 2005-2007, 2009-2013 Free Software Foundation, Inc.
 
 # This file is free software: you can redistribute it and/or modify it
 # under the terms of the GNU General Public License as published by
@@ -18,7 +18,7 @@
 
 
 # Read a module description file and derive the set of files
-# included directly by any .c or .h file listed in the `Files:' section.
+# included directly by any .c or .h file listed in the 'Files:' section.
 # Take the union of all such sets for any dependent modules.
 # Then, compare that set with the set derived from the names
 # listed in the various Files: sections.
@@ -31,7 +31,7 @@
 # FIXME:
 # for each .m4 file listed in the Files: section(s)
 # parse it for AC_LIBSOURCES directives, and accumulate the set
-# of files `required' via all AC_LIBSOURCES.
+# of files "required" via all AC_LIBSOURCES.
 # If this set is not empty, ensure that it contains
 # the same (.c and .h only?) files as are listed in the Files: sections.
 
@@ -60,7 +60,7 @@ sub parse_module_file ($)
   my ($module_file) = @_;
 
   open FH, '<', $module_file
-    or die "$ME: can't open `$module_file' for reading: $!\n";
+    or die "$ME: can't open '$module_file' for reading: $!\n";
 
   my %file_set;
   my %dep_set;
@@ -130,7 +130,7 @@ sub usage ($)
   my $STREAM = ($exit_code == 0 ? *STDOUT : *STDERR);
   if ($exit_code != 0)
     {
-      print $STREAM "Try `$ME --help' for more information.\n";
+      print $STREAM "Try '$ME --help' for more information.\n";
     }
   else
     {
@@ -138,7 +138,7 @@ sub usage ($)
 Usage: $ME [OPTIONS] FILE...
 
 Read a module description file and derive the set of files
-included directly by any .c or .h file listed in the `Files:' section.
+included directly by any .c or .h file listed in the 'Files:' section.
 Take the union of all such sets for any dependent modules.
 Then, compare that set with the set derived from the names
 listed in the various Files: sections.
@@ -172,7 +172,7 @@ sub find_included_lib_files ($)
 
   my %inc;
   open FH, '<', $file
-    or die "$ME: can't open `$file' for reading: $!\n";
+    or die "$ME: can't open '$file' for reading: $!\n";
 
   while (defined (my $line = <FH>))
     {
@@ -198,7 +198,7 @@ sub find_included_lib_files ($)
 
 my %exempt_header =
   (
-   # Exempt headers like unlocked-io.h that are `#include'd
+   # Exempt headers like unlocked-io.h that are '#include'd
    # but not necessarily used.
    'unlocked-io.h' => 1,
 
@@ -272,7 +272,7 @@ sub check_module ($)
            || exists $exempt_header{$i}
              and next;
          !exists $module_all_files{$lib_file} && -f "../lib/$i"
-           and warn "$f: $i is `#include'd, but not "
+           and warn "$f: $i is '#include'd, but not "
              . "listed in module's Files: section\n";
        }
       #my @t = sort keys %$inc;