Fix bug 691

diff --git a/lib/graph/parser.y b/lib/graph/parser.y
index b51169aa4319f45fd0c403989ea11bbe415a6ed7..40d0fdf3c78a42a7c862afae76fa88a28d8e4b46 100644 (file)
--- a/lib/graph/parser.y
+++ b/lib/graph/parser.y
@@ -418,7 +418,7 @@ node_port   :       /* empty */
 node_stmt      :       node_id
                                {Current_class = TAG_NODE; N = (Agnode_t*)($1.obj);}
                        opt_attr_list
-                               {free($1.port);Current_class = TAG_GRAPH; /* reset */}
+                               {agstrfree($1.port);Current_class = TAG_GRAPH; /* reset */}
                ;
 
 edge_stmt      :       node_id
@@ -476,6 +476,9 @@ qsymbol             :       T_qsymbol {$$ = $1; }
 #ifdef UNUSED
 /* grammar allowing port variants */
 /* at present, these are not used, so we remove them from the grammar */
+/* NOTE: If used, these should be rewritten to take into account the */
+/* move away from using ':' in the string and that symbols come from */
+/* agstrdup and need to be freed. */
 node_port      :       /* empty */
                |       port_location 
                |       port_angle                      /* undocumented */