Fixed all /*@i...@*/ tags (except 1).

[splint.git] / src / functionClause.c

diff --git a/src/functionClause.c b/src/functionClause.c
index f63810ce9206a18430392b43e7ddab151820b658..27f862cb423664a3b6a0826054bb48ac2e022ae7 100644 (file)
--- a/src/functionClause.c
+++ b/src/functionClause.c
@@ -28,7 +28,7 @@
 # include "splintMacros.nf"
 # include "basic.h"
 
-static /*@only@*/ /*@notnull@*/ /*@special@*/ functionClause  /*@i32 need special? @*/
+static /*@only@*/ /*@notnull@*/ /*@special@*/ functionClause  
 functionClause_alloc (functionClauseKind kind) /*@defines result->kind@*/
 {
   functionClause res = (functionClause) dmalloc (sizeof (*res));
@@ -57,6 +57,7 @@ extern functionClause functionClause_createState (stateClause node) /*@*/
       (!stateClause_isMetaState (node) ) )
     {
       DPRINTF((message("functionClause_createState:: Returning functionClause_undefined" ) ));
+      stateClause_free (node);
       return functionClause_undefined;
     }
   else