From 4d138b64caebdc2662450d253d77e8182a18692c Mon Sep 17 00:00:00 2001
From: Tim Edwards <tim@opencircuitdesign.com>
Date: Wed, 24 Jul 2019 11:13:25 -0400
Subject: [PATCH] Corrected a missing "#ifdef TCL_NETGEN" around a Tcl
 subroutine call, in objlist.c.

---
 base/objlist.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/base/objlist.c b/base/objlist.c
index 14df071..e864a17 100644
--- a/base/objlist.c
+++ b/base/objlist.c
@@ -598,7 +598,11 @@ static int PrintCellHashTableElement(struct hashlist *p)
     if (Debug == 1)  Printf("Cell: %s (instanced %d times); Primitive\n",
 		       ptr->name, ptr->number);
     else if (Debug == 3) {	/* list */
+#ifdef TCL_NETGEN
        Tcl_AppendElement(netgeninterp, ptr->name);
+#else
+       Printf("%s ", ptr->name);
+#endif
     }
   }
   else if ((Debug == 2) || (Debug == 3)) {	/* list only */