add agwrite binding - bug#1206

	patch from:  Tobias Gruetzmacher <tobias@portfolio16.de>

diff --git a/tclpkg/gv/gv.cpp b/tclpkg/gv/gv.cpp
index 98d51b3b71e3890d043c6376057d0ff5a71805b9..b5042da32a905f24d580ca2f9a80b0c5a29fe4f6 100644 (file)
--- a/tclpkg/gv/gv.cpp
+++ b/tclpkg/gv/gv.cpp
@@ -871,3 +871,22 @@ void render(Agraph_t *g, char *format, void **data)
 //
 //    err = gvRenderData(gvc, g, format, data);
 }
+
+void write(Agraph_t *g, FILE *f)
+{
+    int err;
+
+    err = agwrite(g, f);
+}
+
+void write(Agraph_t *g, char *filename)
+{
+    FILE *f;
+    int err;
+
+    f = fopen(filename, "w");
+    if (!f)
+       return;
+    err = agwrite(g, f);
+    fclose(f);
+}

diff --git a/tclpkg/gv/gv.i b/tclpkg/gv/gv.i
index aa7516b71e9b805f0ea2da88efd543f27fbf11d3..d5e76a9562fee1723b41a3177ff44d3fc6536234 100644 (file)
--- a/tclpkg/gv/gv.i
+++ b/tclpkg/gv/gv.i
@@ -191,4 +191,9 @@ extern void render(Agraph_t *g, char *format);
 extern void render(Agraph_t *g, char *format, char *filename);
 extern void render(Agraph_t *g, char *format, FILE *f);
 extern void render(Agraph_t *g, char *format, void **data);
+
+/*** Writing graph back to file */
+void write(Agraph_t *g, FILE *f);
+void write(Agraph_t *g, char *filename);
+
 %}