/*
-** LCLint - annotation-assisted static program checker
-** Copyright (C) 1994-2001 University of Virginia,
+** Splint - annotation-assisted static program checker
+** Copyright (C) 1994-2003 University of Virginia,
** Massachusetts Institute of Technology
**
** This program is free software; you can redistribute it and/or modify it
** 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
*/
/*
** sort.c
** Massachusetts Institute of Technology
*/
-# include "lclintMacros.nf"
+# include "splintMacros.nf"
# include "llbasic.h"
# include "llgrammar.h"
# include "lclscan.h"
}
sort
-sort_makePtrN (sort s, int pointers)
+sort_makePtrN (sort s, pointers p)
{
- llassert (pointers >= 0);
-
- if (pointers == 0)
+ if (pointers_isUndefined (p))
{
return s;
}
else
{
return sort_makePtrN (sort_makePtr (ltoken_undefined, s),
- pointers - 1);
+ pointers_getRest (p));
}
}
}
else
{
- llcontbug (message ("Invalid sort in sort_dump: sort %d; sortname: %s. This may result from using .lcs files produced by an old version of LCLint. Remove the .lcs files, and rerun LCLint.",
+ llcontbug (message ("Invalid sort in sort_dump: sort %d; sortname: %s. "
+ "This may result from using .lcs files produced by an old version of Splint. "
+ "Remove the .lcs files, and rerun Splint.",
i, lsymbol_toString (s->name)));
fprintf (f, "sort _error_ ");
}