From a3be0838939c08835f8be8d694f64ad91c6b3649 Mon Sep 17 00:00:00 2001
From: Stephen Williams <steve@icarus.com>
Date: Sat, 26 Sep 2009 09:59:06 -0700
Subject: [PATCH] Give constants a driver

This driver gives nets something to hang on to, and leads to
more sensible topology when multiple nets are driven by the
same constant.
---
 tgt-vvp/draw_net_input.c | 21 ++++++++++++++++++---
 1 file changed, 18 insertions(+), 3 deletions(-)

diff --git a/tgt-vvp/draw_net_input.c b/tgt-vvp/draw_net_input.c
index 299382b2c..18402c9bd 100644
--- a/tgt-vvp/draw_net_input.c
+++ b/tgt-vvp/draw_net_input.c
@@ -422,6 +422,15 @@ static char* draw_net_input_drive(ivl_nexus_t nex, ivl_nexus_ptr_t nptr)
 			fprintf(vvp_out, ", v%p_0;\n", sig);
 		  }
 
+		  snprintf(tmp, sizeof tmp, "L_%p", cptr);
+		  result = strdup(tmp);
+
+	    } else {
+		  char tmp[64];
+		  fprintf(vvp_out, "L_%p .functor BUFZ 1, %s, "
+			  "C4<0>, C4<0>, C4<0>;\n", cptr, result);
+		  free(result);
+
 		  snprintf(tmp, sizeof tmp, "L_%p", cptr);
 		  result = strdup(tmp);
 	    }
@@ -682,6 +691,13 @@ char* draw_net_input_x(ivl_nexus_t nex,
       while (ndrivers) {
 	    unsigned int inst;
 	    for (inst = 0; inst < ndrivers; inst += 4) {
+		  char*drive[4];
+		  if (level == 0) {
+			for (idx = inst; idx < ndrivers && idx < inst+4; idx += 1) {
+			      drive[idx-inst] = draw_net_input_drive(nex, drivers[idx]);
+			}
+		  }
+
 		  if (ndrivers > 4)
 			fprintf(vvp_out, "RS_%p/%d/%d .resolv tri",
 				nex, level, inst);
@@ -694,9 +710,8 @@ char* draw_net_input_x(ivl_nexus_t nex,
 			      fprintf(vvp_out, ", RS_%p/%d/%d",
 				      nex, level - 1, idx*4);
 			} else {
-			      char*drive = draw_net_input_drive(nex, drivers[idx]);
-			      fprintf(vvp_out, ", %s", drive);
-			      free(drive);
+			      fprintf(vvp_out, ", %s", drive[idx-inst]);
+			      free(drive[idx-inst]);
 			}
 		  }
 		  for ( ;  idx < inst+4 ;  idx += 1) {