From 2713694338ce027f459a64c6dfee2b9354f121ca Mon Sep 17 00:00:00 2001
From: steve <steve>
Date: Tue, 11 Feb 2003 05:20:45 +0000
Subject: [PATCH]  Include vpiRealVar objects in vpiVariables scan.

---
 vvp/vpi_scope.cc | 8 ++++++--
 vvp/words.cc     | 7 ++++++-
 2 files changed, 12 insertions(+), 3 deletions(-)

diff --git a/vvp/vpi_scope.cc b/vvp/vpi_scope.cc
index 9da3f11a8..851973075 100644
--- a/vvp/vpi_scope.cc
+++ b/vvp/vpi_scope.cc
@@ -17,7 +17,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #ifdef HAVE_CVS_IDENT
-#ident "$Id: vpi_scope.cc,v 1.23 2003/02/09 23:33:26 steve Exp $"
+#ident "$Id: vpi_scope.cc,v 1.24 2003/02/11 05:20:45 steve Exp $"
 #endif
 
 # include  "compile.h"
@@ -138,7 +138,8 @@ static int compare_types(int code, int type)
 
       if ( code == vpiVariables &&
 	     (type == vpiIntegerVar ||
-	     type == vpiTimeVar))
+	      type == vpiTimeVar    ||
+	      type == vpiRealVar))
       	    return 1;
 
       return 0;
@@ -447,6 +448,9 @@ void vpip_attach_to_current_scope(vpiHandle obj)
 
 /*
  * $Log: vpi_scope.cc,v $
+ * Revision 1.24  2003/02/11 05:20:45  steve
+ *  Include vpiRealVar objects in vpiVariables scan.
+ *
  * Revision 1.23  2003/02/09 23:33:26  steve
  *  Spelling fixes.
  *
diff --git a/vvp/words.cc b/vvp/words.cc
index 7abd151cd..2e0756376 100644
--- a/vvp/words.cc
+++ b/vvp/words.cc
@@ -17,7 +17,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #ifdef HAVE_CVS_IDENT
-#ident "$Id: words.cc,v 1.1 2003/01/25 23:48:06 steve Exp $"
+#ident "$Id: words.cc,v 1.2 2003/02/11 05:20:45 steve Exp $"
 #endif
 
 # include  "compile.h"
@@ -41,10 +41,15 @@ void compile_word(char*label, char*type, char*name)
 
       compile_vpi_symbol(label, obj);
       free(label);
+
+      vpip_attach_to_current_scope(obj);
 }
 
 /*
  * $Log: words.cc,v $
+ * Revision 1.2  2003/02/11 05:20:45  steve
+ *  Include vpiRealVar objects in vpiVariables scan.
+ *
  * Revision 1.1  2003/01/25 23:48:06  steve
  *  Add thread word array, and add the instructions,
  *  %add/wr, %cmp/wr, %load/wr, %mul/wr and %set/wr.