From 61991e636708404345189b96bccefb4d5c14e4db Mon Sep 17 00:00:00 2001
From: steve <steve>
Date: Sun, 20 May 2001 01:06:16 +0000
Subject: [PATCH]  stub ivl_expr_parms for sfunctions.

---
 ivl_target.h | 7 +++++--
 t-dll-api.cc | 8 +++++++-
 2 files changed, 12 insertions(+), 3 deletions(-)

diff --git a/ivl_target.h b/ivl_target.h
index 28a420d43..3bfa8713a 100644
--- a/ivl_target.h
+++ b/ivl_target.h
@@ -19,7 +19,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #if !defined(WINNT) && !defined(macintosh)
-#ident "$Id: ivl_target.h,v 1.62 2001/05/17 04:37:02 steve Exp $"
+#ident "$Id: ivl_target.h,v 1.63 2001/05/20 01:06:16 steve Exp $"
 #endif
 
 #ifdef __cplusplus
@@ -391,7 +391,7 @@ extern ivl_expr_t  ivl_expr_oper2(ivl_expr_t net);
 extern ivl_expr_t  ivl_expr_oper3(ivl_expr_t net);
   /* IVL_EX_CONCAT IVL_EX_UFUNC */
 extern ivl_expr_t  ivl_expr_parm(ivl_expr_t net, unsigned idx);
-  /* IVL_EX_CONCAT IVL_EX_UFUNC */
+  /* IVL_EX_CONCAT IVL_EX_SFUNC IVL_EX_UFUNC */
 extern unsigned    ivl_expr_parms(ivl_expr_t net);
   /* IVL_EX_CONCAT */
 extern unsigned    ivl_expr_repeat(ivl_expr_t net);
@@ -852,6 +852,9 @@ _END_DECL
 
 /*
  * $Log: ivl_target.h,v $
+ * Revision 1.63  2001/05/20 01:06:16  steve
+ *  stub ivl_expr_parms for sfunctions.
+ *
  * Revision 1.62  2001/05/17 04:37:02  steve
  *  Behavioral ternary operators for vvp.
  *
diff --git a/t-dll-api.cc b/t-dll-api.cc
index 2045f3169..556f711a2 100644
--- a/t-dll-api.cc
+++ b/t-dll-api.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-dll-api.cc,v 1.45 2001/05/17 04:37:02 steve Exp $"
+#ident "$Id: t-dll-api.cc,v 1.46 2001/05/20 01:06:16 steve Exp $"
 #endif
 
 # include  "t-dll.h"
@@ -307,6 +307,9 @@ extern "C" unsigned ivl_expr_parms(ivl_expr_t net)
 	  case IVL_EX_CONCAT:
 	    return net->u_.concat_.parms;
 
+	  case IVL_EX_SFUNC:
+	    return 0; /* XXXX not supported yet. */
+
 	  case IVL_EX_UFUNC:
 	    return net->u_.ufunc_.parms;
 
@@ -1143,6 +1146,9 @@ extern "C" ivl_statement_t ivl_stmt_sub_stmt(ivl_statement_t net)
 
 /*
  * $Log: t-dll-api.cc,v $
+ * Revision 1.46  2001/05/20 01:06:16  steve
+ *  stub ivl_expr_parms for sfunctions.
+ *
  * Revision 1.45  2001/05/17 04:37:02  steve
  *  Behavioral ternary operators for vvp.
  *