Apparently splint does not correctly handle the case in which a #defined constant...

[splint.git] / src / aliasTable.c

diff --git a/src/aliasTable.c b/src/aliasTable.c
index 1359d922eb0601a86a83216ad4fa124f6ed0be7c..3246c697593e1d4ee7da49f0a9eaa8fea97a6034 100644 (file)
--- a/src/aliasTable.c
+++ b/src/aliasTable.c
@@ -1,6 +1,6 @@
 /*
-** LCLint - annotation-assisted static program checker
-** Copyright (C) 1994-2001 University of Virginia,
+** Splint - annotation-assisted static program checker
+** Copyright (C) 1994-2002 University of Virginia,
 **         Massachusetts Institute of Technology
 **
 ** This program is free software; you can redistribute it and/or modify it
@@ -17,15 +17,15 @@
 ** the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
 ** MA 02111-1307, USA.
 **
-** For information on lclint: lclint-request@cs.virginia.edu
-** To report a bug: lclint-bug@cs.virginia.edu
-** For more information: http://lclint.cs.virginia.edu
+** For information on splint: info@splint.org
+** To report a bug: splint-bug@splint.org
+** For more information: http://www.splint.org
 */
 /*
 ** aliasTable.c
 */
 
-# include "lclintMacros.nf"
+# include "splintMacros.nf"
 # include "basic.h"
 
 /*@constant int ATINVALID; @*/
@@ -278,7 +278,7 @@ static /*@only@*/ sRefSet aliasTable_aliasedByAux (aliasTable s, sRef sr, int li
          llquietbug
            (message ("Alias search limit exceeded, checking %q. "
                      "This either means there is a variable with at least "
-                     "%d indirections, or there is a bug in LCLint.",
+                     "%d indirections, or there is a bug in Splint.",
                      sRef_unparse (sr),
                      ALIASSEARCHLIMIT));
          
@@ -435,7 +435,7 @@ static /*@only@*/ sRefSet
          llquietbug
            (message ("Alias search limit exceeded, checking %q. "
                      "This either means there is a variable with at least "
-                     "%d indirections, or there is a bug in LCLint.",
+                     "%d indirections, or there is a bug in Splint.",
                      sRef_unparse (sr),
                      ALIASSEARCHLIMIT));
          
@@ -824,5 +824,22 @@ aliasTable_checkGlobs (aliasTable t)
     } end_aliasTable_elements;
 }
 
+# ifdef DEBUGSPLINT
 
+/*
+** For debugging only
+*/
+
+void aliasTable_checkValid (aliasTable t)
+{
+  aliasTable_elements (t, key, value)
+    {
+      sRef_checkCompletelyReasonable (key);
 
+      sRefSet_elements (value, sr) 
+       {
+         sRef_checkCompletelyReasonable (sr);
+       } end_sRefSet_elements ;
+    } end_aliasTable_elements ;
+}
+# endif