From e34ef2a2b94b3298f8f7ba049081d7d3111634b1 Mon Sep 17 00:00:00 2001
From: steve <steve>
Date: Tue, 12 Dec 2000 03:30:44 +0000
Subject: [PATCH]  NetEUFuncs are allowed as system task parameters.

---
 t-vvm.cc | 17 ++++++++++++++++-
 1 file changed, 16 insertions(+), 1 deletion(-)

diff --git a/t-vvm.cc b/t-vvm.cc
index 68953639b..1c180fe8b 100644
--- a/t-vvm.cc
+++ b/t-vvm.cc
@@ -17,7 +17,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #if !defined(WINNT) && !defined(macintosh)
-#ident "$Id: t-vvm.cc,v 1.189 2000/12/11 00:31:43 steve Exp $"
+#ident "$Id: t-vvm.cc,v 1.190 2000/12/12 03:30:44 steve Exp $"
 #endif
 
 # include  <iostream>
@@ -375,6 +375,7 @@ class vvm_parm_rval  : public expr_scan_t {
       virtual void expr_scope(const NetEScope*);
       virtual void expr_sfunc(const NetESFunc*);
       virtual void expr_signal(const NetESignal*);
+      virtual void expr_ufunc(const NetEUFunc*);
       virtual void expr_unary(const NetEUnary*);
 
     private:
@@ -825,6 +826,17 @@ void vvm_parm_rval::expr_binary(const NetEBinary*expr)
       result = "&" + tmp + ".base";
 }
 
+void vvm_parm_rval::expr_ufunc(const NetEUFunc*expr)
+{
+      string rval = emit_proc_rval(tgt_, expr);
+
+      string tmp = make_temp();
+      tgt_->defn << "      struct __vpiNumberConst " << tmp << ";" << endl;
+      tgt_->defn << "      vpip_make_number_const(&" << tmp << ", "
+		 << rval << ".bits, " << expr->expr_width() << ");" << endl;
+      result = "&" + tmp + ".base";
+}
+
 void vvm_parm_rval::expr_unary(const NetEUnary*expr)
 {
       string rval = emit_proc_rval(tgt_, expr);
@@ -3390,6 +3402,9 @@ extern const struct target tgt_vvm = {
 };
 /*
  * $Log: t-vvm.cc,v $
+ * Revision 1.190  2000/12/12 03:30:44  steve
+ *  NetEUFuncs are allowed as system task parameters.
+ *
  * Revision 1.189  2000/12/11 00:31:43  steve
  *  Add support for signed reg variables,
  *  simulate in t-vvm signed comparisons.