Changed library version constant.\a

[splint.git] / src / abstract.c

diff --git a/src/abstract.c b/src/abstract.c
index 978ab86f404e05497464d6e79802157e6e588ba6..301a81f67a33cce9472170ba69da218746ec4093 100644 (file)
--- a/src/abstract.c
+++ b/src/abstract.c
@@ -1674,7 +1674,7 @@ makeLclTypeSpecNodeConj (/*@null@*/ lclTypeSpecNode a, /*@null@*/ lclTypeSpecNod
   lclTypeSpecNode n = (lclTypeSpecNode) dmalloc (sizeof (*n));
 
   n->kind = LTS_CONJ;
-  n->pointers = 0;
+  n->pointers = pointers_undefined;
   n->quals = qualList_new ();
   n->content.conj = (lclconj) dmalloc (sizeof (*n->content.conj));
   n->content.conj->a = a;
@@ -1689,7 +1689,7 @@ makeLclTypeSpecNodeType (/*@null@*/ CTypesNode x)
   lclTypeSpecNode n = (lclTypeSpecNode) dmalloc (sizeof (*n));
 
   n->kind = LTS_TYPE;
-  n->pointers = 0;
+  n->pointers = pointers_undefined;
   n->content.type = x;
   n->quals = qualList_new ();
   return (n);
@@ -1701,7 +1701,7 @@ makeLclTypeSpecNodeSU (/*@null@*/ strOrUnionNode x)
   lclTypeSpecNode n = (lclTypeSpecNode) dmalloc (sizeof (*n));
 
   n->kind = LTS_STRUCTUNION;
-  n->pointers = 0;
+  n->pointers = pointers_undefined;
   n->content.structorunion = x;
   n->quals = qualList_new ();
   return (n);
@@ -1714,7 +1714,7 @@ makeLclTypeSpecNodeEnum (/*@null@*/ enumSpecNode x)
 
   n->quals = qualList_new ();
   n->kind = LTS_ENUM;
-  n->pointers = 0;
+  n->pointers = pointers_undefined;
   n->content.enumspec = x;
   return (n);
 }
@@ -3235,7 +3235,7 @@ paramNode_checkQualifiers (lclTypeSpecNode t, typeExpr d)
 
   llassert (lclTypeSpecNode_isDefined (t));
 
-  if (t->pointers == 0 
+  if (pointers_isUndefined (t->pointers)
       && (d != (typeExpr)0 && d->kind != TEXPR_PTR) && d->kind != TEXPR_ARRAY)
     {
       if (t->kind == LTS_TYPE)
@@ -3413,23 +3413,23 @@ lclTypeSpecNode_unparseAltComments (/*@null@*/ lclTypeSpecNode typespec) /*@*/
                    return (message ("%q%s", s, ltoken_unparse (n->opttagid)));
                  }
 
-               s = message ("%q%s {\n\2\1", s, ltoken_unparse (n->opttagid));
+               s = message ("%q%s {\n\t", s, ltoken_unparse (n->opttagid));
              }
            else
              {
-               s = message ("%q{\n\2\1", s);
+               s = message ("%q{\n\t", s);
              }
 
            decls = n->structdecls;
 
            stDeclNodeList_elements (decls, f)
            {
-             s = message ("%q%q\1%q;\n\1", s, 
+             s = message ("%q%q %q;\n\t", s, 
                           lclTypeSpecNode_unparseAltComments (f->lcltypespec),
                          declaratorNodeList_unparse (f->declarators));
            } end_stDeclNodeList_elements;
 
-           return (message ("%q\3}", s));
+           return (message ("%q }", s));
          }
        case LTS_CONJ:
          {
@@ -3520,23 +3520,23 @@ cstring lclTypeSpecNode_unparseComments (/*@null@*/ lclTypeSpecNode typespec)
                    return (message ("%q%s", s, ltoken_unparse (n->opttagid)));
                  }
 
-               s = message ("%q%s {\n\2\1", s, ltoken_unparse (n->opttagid));
+               s = message ("%q%s {\n\t", s, ltoken_unparse (n->opttagid));
              }
            else
              {
-               s = message ("%q{\n\2\1", s);
+               s = message ("%q{\n\t", s);
              }
 
            decls = n->structdecls;
 
            stDeclNodeList_elements (decls, f)
            {
-             s = message ("%q%q\1%q;\n\1", s, 
+             s = message ("%q%q %q;\n\t", s, 
                           lclTypeSpecNode_unparseComments (f->lcltypespec),
                          declaratorNodeList_unparse (f->declarators));
            } end_stDeclNodeList_elements;
 
-           return (message ("%q\3}", s));
+           return (message ("%q }", s));
          }
        case LTS_CONJ:
          {
@@ -5179,12 +5179,10 @@ lclTypeSpecNode2sort (lclTypeSpecNode type)
          return sort_makePtrN (type->content.type->sort, type->pointers);
        case LTS_STRUCTUNION:
          llassert (type->content.structorunion != NULL);
-         return sort_makePtrN (type->content.structorunion->sort,
-                               type->pointers);
+         return sort_makePtrN (type->content.structorunion->sort, type->pointers);
        case LTS_ENUM:
          llassert (type->content.enumspec != NULL);
-         return sort_makePtrN (type->content.enumspec->sort, 
-                               type->pointers);
+         return sort_makePtrN (type->content.enumspec->sort, type->pointers);
        case LTS_CONJ:
          return (lclTypeSpecNode2sort (type->content.conj->a));
        }