diff --git a/net_nex_output.cc b/net_nex_output.cc
index 0f8866340..e86f8a25a 100644
--- a/net_nex_output.cc
+++ b/net_nex_output.cc
@@ -17,7 +17,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #ifdef HAVE_CVS_IDENT
-#ident "$Id: net_nex_output.cc,v 1.8 2003/12/20 00:59:31 steve Exp $"
+#ident "$Id: net_nex_output.cc,v 1.9 2004/06/30 15:32:18 steve Exp $"
 #endif
 
 # include "config.h"
@@ -34,6 +34,9 @@ void NetProc::nex_output(NexusSet&out)
       cerr << get_line()
 	   << ": internal error: NetProc::nex_output not implemented"
 	   << endl;
+      cerr << get_line()
+	   << ":               : on object type " << typeid(*this).name()
+	   << endl;
 }
 
 void NetAssignBase::nex_output(NexusSet&out)
@@ -92,6 +95,11 @@ void NetEvWait::nex_output(NexusSet&out)
       statement_->nex_output(out);
 }
 
+void NetPDelay::nex_output(NexusSet&out)
+{
+      if (statement_) statement_->nex_output(out);
+}
+
 void NetWhile::nex_output(NexusSet&out)
 {
       if (proc_ != 0)
@@ -100,6 +108,9 @@ void NetWhile::nex_output(NexusSet&out)
 
 /*
  * $Log: net_nex_output.cc,v $
+ * Revision 1.9  2004/06/30 15:32:18  steve
+ *  nex_output for NetPDelay statements.
+ *
  * Revision 1.8  2003/12/20 00:59:31  steve
  *  Synthesis debug messages.
  *
diff --git a/netlist.h b/netlist.h
index fa5f82c6f..0af87b348 100644
--- a/netlist.h
+++ b/netlist.h
@@ -19,7 +19,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #ifdef HAVE_CVS_IDENT
-#ident "$Id: netlist.h,v 1.314 2004/06/30 02:16:26 steve Exp $"
+#ident "$Id: netlist.h,v 1.315 2004/06/30 15:32:18 steve Exp $"
 #endif
 
 /*
@@ -2058,6 +2058,8 @@ class NetPDelay  : public NetProc {
       const NetExpr*expr() const;
 
       virtual NexusSet* nex_input();
+      virtual void nex_output(NexusSet&);
+
       virtual bool emit_proc(struct target_t*) const;
       virtual void dump(ostream&, unsigned ind) const;
 
@@ -3341,6 +3343,9 @@ extern ostream& operator << (ostream&, NetNet::Type);
 
 /*
  * $Log: netlist.h,v $
+ * Revision 1.315  2004/06/30 15:32:18  steve
+ *  nex_output for NetPDelay statements.
+ *
  * Revision 1.314  2004/06/30 02:16:26  steve
  *  Implement signed divide and signed right shift in nets.
  *