packages: graphviz/graphviz.spec, graphviz/gv.i.patch (NEW) - added gv.i.pa...

[sls]

Author: sls                          Date: Mon Oct 26 03:52:31 2009 GMT
Module: packages                      Tag: HEAD
---- Log message:
- added gv.i.patch (fix for compilation tcl bindings from Fedora)

---- Files affected:
packages/graphviz:
   graphviz.spec (1.96 -> 1.97) , gv.i.patch (NONE -> 1.1)  (NEW)

---- Diffs:

================================================================
Index: packages/graphviz/graphviz.spec
diff -u packages/graphviz/graphviz.spec:1.96 packages/graphviz/graphviz.spec:1.97
--- packages/graphviz/graphviz.spec:1.96	Sat Mar 14 13:46:34 2009
+++ packages/graphviz/graphviz.spec	Mon Oct 26 04:52:24 2009
@@ -33,6 +33,7 @@
 Patch4:		%{name}-no_version_magick.patch
 Patch5:		%{name}-lua51.patch
 Patch6:		%{name}-php_modules_dir.patch
+Patch7:		gv.i.patch
 URL:		http://www.graphviz.org/
 BuildRequires:	autoconf >= 2.59-9
 BuildRequires:	automake
@@ -257,6 +258,7 @@
 %patch4 -p0
 %patch5 -p1
 %patch6 -p1
+%patch7 -p1
 
 # not used for anything
 sed -i -e 's/libgnomeui-2.0/libgnomeui-disabled/' configure.ac
@@ -512,6 +514,9 @@
 All persons listed below can be reached at <cvs_login>@pld-linux.org
 
 $Log$
+Revision 1.97  2009/10/26 03:52:24  sls
+- added gv.i.patch (fix for compilation tcl bindings from Fedora)
+
 Revision 1.96  2009/03/14 12:46:34  hawk
 - release 7
 

================================================================
Index: packages/graphviz/gv.i.patch
diff -u /dev/null packages/graphviz/gv.i.patch:1.1
--- /dev/null	Mon Oct 26 04:52:31 2009
+++ packages/graphviz/gv.i.patch	Mon Oct 26 04:52:25 2009
@@ -0,0 +1,45 @@
+--- graphviz-2.20.3/tclpkg/gv/gv.i.orig	2009-02-25 13:44:36.000000000 -0500
++++ graphviz-2.20.3/tclpkg/gv/gv.i	2009-02-25 13:46:29.000000000 -0500
+@@ -15,8 +15,22 @@
+ **********************************************************/
+ 
+ %module gv
+-%{
+ 
++#ifdef SWIGTCL
++// A typemap telling SWIG to ignore an argument for input
++// However, we still need to pass a pointer to the C function
++%typemap(in,numinputs=0) char *outdata (char *temp) {
++     $1 = &temp;
++}
++// A typemap defining how to return an argument by appending it to the result
++%typemap(argout) char *outdata {
++     Tcl_Obj *o = Tcl_NewStringObj($1);
++     Tcl_ListObjAppendElement(interp,$result,o);
++}
++#endif
++
++
++%{
+ /* some language headers (e.g. php.h, ruby.h) leave these defined */
+ #undef PACKAGE_BUGREPORT
+ #undef PACKAGE_STRING
+@@ -371,18 +385,4 @@
+ extern bool write(Agraph_t *g, char *filename);
+ extern bool write(Agraph_t *g, FILE *f);
+ 
+-
+-#ifdef SWIGTCL
+-// A typemap telling SWIG to ignore an argument for input
+-// However, we still need to pass a pointer to the C function
+-%typemap(in,numinputs=0) char *outdata (char *temp) {
+-     $1 = &temp;
+-}
+-// A typemap defining how to return an argument by appending it to the result
+-%typemap(argout) char *outdata {
+-     Tcl_Obj *o = Tcl_NewStringObj($1);
+-     Tcl_ListObjAppendElement(interp,$result,o);
+-}
+-#endif
+-
+ %}
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/cgi-bin/cvsweb.cgi/packages/graphviz/graphviz.spec?r1=1.96&r2=1.97&f=u