From a281675348ca87a1901081640282cd065f3f22c3 Mon Sep 17 00:00:00 2001
From: steve <steve>
Date: Sat, 15 Mar 2003 05:42:39 +0000
Subject: [PATCH]  free argument iterators.

---
 libveriuser/getlongp.c | 7 ++++++-
 libveriuser/getp.c     | 7 ++++++-
 libveriuser/putlongp.c | 7 ++++++-
 libveriuser/putp.c     | 7 ++++++-
 4 files changed, 24 insertions(+), 4 deletions(-)

diff --git a/libveriuser/getlongp.c b/libveriuser/getlongp.c
index 6343cc4ca..db6c764a5 100644
--- a/libveriuser/getlongp.c
+++ b/libveriuser/getlongp.c
@@ -17,7 +17,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #ifdef HAVE_CVS_IDENT
-#ident "$Id: getlongp.c,v 1.2 2002/08/12 01:35:02 steve Exp $"
+#ident "$Id: getlongp.c,v 1.3 2003/03/15 05:42:39 steve Exp $"
 #endif
 
 #include  <stdlib.h>
@@ -67,11 +67,16 @@ int tf_getlongp(int *highvalue, int n)
 	    rtn = (int) strtoul(value.value.str, end, 16);
       }
 
+      vpi_free_object(sys_i);
+
       return rtn;
 }
 
 /*
  * $Log: getlongp.c,v $
+ * Revision 1.3  2003/03/15 05:42:39  steve
+ *  free argument iterators.
+ *
  * Revision 1.2  2002/08/12 01:35:02  steve
  *  conditional ident string using autoconfig.
  *
diff --git a/libveriuser/getp.c b/libveriuser/getp.c
index 74cbe0248..6fd83c7d7 100644
--- a/libveriuser/getp.c
+++ b/libveriuser/getp.c
@@ -17,7 +17,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #ifdef HAVE_CVS_IDENT
-#ident "$Id: getp.c,v 1.2 2002/08/12 01:35:02 steve Exp $"
+#ident "$Id: getp.c,v 1.3 2003/03/15 05:42:39 steve Exp $"
 #endif
 
 #include  <assert.h>
@@ -58,11 +58,16 @@ int tf_getp(int n)
 	    rtn = value.value.integer;
       }
 
+      vpi_free_object(sys_i);
+
       return rtn;
 }
 
 /*
  * $Log: getp.c,v $
+ * Revision 1.3  2003/03/15 05:42:39  steve
+ *  free argument iterators.
+ *
  * Revision 1.2  2002/08/12 01:35:02  steve
  *  conditional ident string using autoconfig.
  *
diff --git a/libveriuser/putlongp.c b/libveriuser/putlongp.c
index b415d4c00..26feb746f 100644
--- a/libveriuser/putlongp.c
+++ b/libveriuser/putlongp.c
@@ -17,7 +17,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #ifdef HAVE_CVS_IDENT
-#ident "$Id: putlongp.c,v 1.2 2002/08/12 01:35:02 steve Exp $"
+#ident "$Id: putlongp.c,v 1.3 2003/03/15 05:42:39 steve Exp $"
 #endif
 
 #include  <stdio.h>
@@ -59,10 +59,15 @@ void tf_putlongp(int n, int lowvalue, int highvalue)
       val.format = vpiHexStrVal;
       val.value.str = str;
       (void)vpi_put_value(arg_h, &val, 0, vpiNoDelay);
+
+      vpi_free_object(sys_i);
 }
 
 /*
  * $Log: putlongp.c,v $
+ * Revision 1.3  2003/03/15 05:42:39  steve
+ *  free argument iterators.
+ *
  * Revision 1.2  2002/08/12 01:35:02  steve
  *  conditional ident string using autoconfig.
  *
diff --git a/libveriuser/putp.c b/libveriuser/putp.c
index 2396d36d3..c64d980ef 100644
--- a/libveriuser/putp.c
+++ b/libveriuser/putp.c
@@ -17,7 +17,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #ifdef HAVE_CVS_IDENT
-#ident "$Id: putp.c,v 1.2 2002/08/12 01:35:02 steve Exp $"
+#ident "$Id: putp.c,v 1.3 2003/03/15 05:42:39 steve Exp $"
 #endif
 
 #include  <assert.h>
@@ -55,10 +55,15 @@ void tf_putp(int n, int value)
       val.format = vpiIntVal;
       val.value.integer = value;
       (void)vpi_put_value(arg_h, &val, 0, vpiNoDelay);
+
+      vpi_free_object(sys_i);
 }
 
 /*
  * $Log: putp.c,v $
+ * Revision 1.3  2003/03/15 05:42:39  steve
+ *  free argument iterators.
+ *
  * Revision 1.2  2002/08/12 01:35:02  steve
  *  conditional ident string using autoconfig.
  *