From 3f108f08edd3f671e2fb3eb2156b7837ec1aea3e Mon Sep 17 00:00:00 2001
From: steve <steve>
Date: Sun, 20 Nov 2005 15:58:53 +0000
Subject: [PATCH]  Dump IVL_ST_DELAYX statements.

---
 tgt-stub/statement.c | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/tgt-stub/statement.c b/tgt-stub/statement.c
index 201d232d8..96fe6820b 100644
--- a/tgt-stub/statement.c
+++ b/tgt-stub/statement.c
@@ -17,7 +17,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #ifdef HAVE_CVS_IDENT
-#ident "$Id: statement.c,v 1.7 2005/07/11 16:56:51 steve Exp $"
+#ident "$Id: statement.c,v 1.8 2005/11/20 15:58:53 steve Exp $"
 #endif
 
 # include "config.h"
@@ -84,6 +84,13 @@ static void show_stmt_cassign(ivl_statement_t net, unsigned ind)
       show_expression(ivl_stmt_rval(net), ind+4);
 }
 
+static void show_stmt_delayx(ivl_statement_t net, unsigned ind)
+{
+      fprintf(out, "%*s#(X) /* calculated delay */\n", ind, "");
+      show_expression(ivl_stmt_delay_expr(net), ind+4);
+      show_statement(ivl_stmt_sub_stmt(net), ind+2);
+}
+
 static void show_stmt_force(ivl_statement_t net, unsigned ind)
 {
       unsigned idx;
@@ -287,6 +294,10 @@ void show_statement(ivl_statement_t net, unsigned ind)
 	    show_statement(ivl_stmt_sub_stmt(net), ind+2);
 	    break;
 
+	  case IVL_ST_DELAYX:
+	    show_stmt_delayx(net, ind);
+	    break;
+
 	  case IVL_ST_FORCE:
 	    show_stmt_force(net, ind);
 	    break;