Corrected an issue from the last commit, which is that the default

ground node name (which is static) gets put on the node list and
is improperly deallocated.  Corrected by simply allocating the
string for the default substrate node instead of using the static
string.

VERSION

@@ -1 +1 @@
-8.3.379
+8.3.380

calma/CalmaRdcl.c

@@ -359,7 +359,7 @@ calmaParseStructure(filename)
     int mfactor;
     int locPolygonCount;
     OFFTYPE filepos;
-    bool was_called;
+    bool was_called = FALSE;
     bool was_initialized;
     bool predefined;
     bool do_flatten;

ext2spice/ext2hier.c

@@ -2132,7 +2132,7 @@ esHierVisit(hc, cdata)
 	    /* Find the substrate node */
 	    EFHierVisitNodes(hcf, spcsubHierVisit, (ClientData)&resstr);
 	    if (resstr == NULL)
-		resstr = esSpiceDefaultGnd;
+		resstr = StrDup((char **)NULL, esSpiceDefaultGnd);
 
 	    /* Output lumped capacitance and resistance to substrate */
 	    esSpiceCapNode = resstr;

ext2spice/ext2spice.c

@@ -1124,7 +1124,7 @@ runexttospice:
 	/* Visit nodes to find the substrate node */
 	EFVisitNodes(spcsubVisit, (ClientData)&substr);
 	if (substr == NULL)
-	    substr = esSpiceDefaultGnd;
+	    substr = StrDup((char **)NULL, esSpiceDefaultGnd);
 
 	esSpiceCapNode = substr;
 	EFVisitNodes(spcnodeVisit, (ClientData) NULL);
@@ -1296,7 +1296,7 @@ main(argc, argv)
 
     EFVisitResists(spcresistVisit, (ClientData) NULL);
     EFVisitSubcircuits(subcktVisit, (ClientData) NULL);
-    esSpiceCapNode = esSpiceDefaultGnd;
+    esSpiceCapNode = StrDup((char **)NULL, esSpiceDefaultGnd);
     EFVisitNodes(spcnodeVisit, (ClientData) NULL);
 
     if ((esDoSubckt == TRUE) || (locDoSubckt == TRUE))