From owner-svn-ports-head@FreeBSD.ORG Tue Jun 4 09:33:05 2013 Return-Path: Delivered-To: svn-ports-head@freebsd.org Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2001:1900:2254:206a::19:1]) by hub.freebsd.org (Postfix) with ESMTP id DF4F03A8; Tue, 4 Jun 2013 09:33:05 +0000 (UTC) (envelope-from gahr@FreeBSD.org) Received: from svn.freebsd.org (svn.freebsd.org [IPv6:2001:1900:2254:2068::e6a:0]) by mx1.freebsd.org (Postfix) with ESMTP id D16531662; Tue, 4 Jun 2013 09:33:05 +0000 (UTC) Received: from svn.freebsd.org ([127.0.1.70]) by svn.freebsd.org (8.14.7/8.14.7) with ESMTP id r549X59G025244; Tue, 4 Jun 2013 09:33:05 GMT (envelope-from gahr@svn.freebsd.org) Received: (from gahr@localhost) by svn.freebsd.org (8.14.7/8.14.5/Submit) id r549X5i0025242; Tue, 4 Jun 2013 09:33:05 GMT (envelope-from gahr@svn.freebsd.org) Message-Id: <201306040933.r549X5i0025242@svn.freebsd.org> From: Pietro Cerutti Date: Tue, 4 Jun 2013 09:33:05 +0000 (UTC) To: ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org Subject: svn commit: r319838 - in head/science/cgnslib: . files X-SVN-Group: ports-head MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-BeenThere: svn-ports-head@freebsd.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: SVN commit messages for the ports tree for head List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Tue, 04 Jun 2013 09:33:06 -0000 Author: gahr Date: Tue Jun 4 09:33:05 2013 New Revision: 319838 URL: http://svnweb.freebsd.org/changeset/ports/319838 Log: - Fix build with Tcl/Tk 8.6 Reported by: miwi (Tcl/Tk 8.6 exp-run late comers) Approved by: maintainer (via private email) Added: head/science/cgnslib/files/patch-tcl86 (contents, props changed) Modified: head/science/cgnslib/Makefile Modified: head/science/cgnslib/Makefile ============================================================================== --- head/science/cgnslib/Makefile Tue Jun 4 09:18:58 2013 (r319837) +++ head/science/cgnslib/Makefile Tue Jun 4 09:33:05 2013 (r319838) @@ -49,7 +49,7 @@ TESTSBIN= cgwrite cgread test_partial .endif .if ${PORT_OPTIONS:MTOOLS} -USE_TK= 85 +USE_TK= yes USE_GL= gl glu USE_XORG= xmu CMAKE_ARGS+= -DBUILD_CGNSTOOLS:BOOL=TRUE \ Added: head/science/cgnslib/files/patch-tcl86 ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/science/cgnslib/files/patch-tcl86 Tue Jun 4 09:33:05 2013 (r319838) @@ -0,0 +1,78 @@ +--- src/cgnstools/tkogl/tkogl.c.orig 2011-02-12 23:43:48.000000000 +0100 ++++ src/cgnstools/tkogl/tkogl.c 2013-06-03 18:10:06.000000000 +0200 +@@ -641,7 +641,7 @@ + ARRANGE_REDRAW(glxwinPtr); + GetAbsXY (glxwinPtr); + +- interp->result = Tk_PathName(glxwinPtr->tkwin); ++ Tcl_SetObjResult(interp, Tcl_NewStringObj(Tk_PathName(glxwinPtr->tkwin), -1)); + return TCL_OK; + } + +@@ -998,7 +998,7 @@ + argv += narg; + } + glEndList(); +- if (result == TCL_OK) sprintf (interp->result, "%d", newlist); ++ if (result == TCL_OK) Tcl_SetObjResult(interp, Tcl_NewIntObj(newlist)); + } + else if ((c == 'e') && (strncmp(argv[1], "eval", length) == 0)) { + /* sends the gl commands directly */ +@@ -1090,7 +1090,13 @@ + viewport, &x, &y, &z); + } + if (retval) { ++#if TCL_MAJOR_VERSION < 8 || (TCL_MAJOR_VERSION == 8 && TCL_MINOR_VERSION < 5) + sprintf (interp->result, "%f %f %f", x, y, z); ++#else ++ Tcl_Obj *obj = Tcl_NewObj (); ++ Tcl_AppendPrintfToObj (obj, "%f %f %f", x, y, z); ++ Tcl_SetObjResult (interp, obj); ++#endif + } + } + else if ((c == 'r') && (strncmp(argv[1], "redraw", length) == 0)) { +--- src/cgnstools/tkogl/nurbs.c.orig 2013-06-03 18:05:02.000000000 +0200 ++++ src/cgnstools/tkogl/nurbs.c 2013-06-03 18:05:31.000000000 +0200 +@@ -280,7 +280,7 @@ + DestroyFloatArray (cPoint); + + if (result == TCL_OK) { +- sprintf (interp->result, "%d", dlist); ++ Tcl_SetObjResult (interp, Tcl_NewIntObj(dlist)); + } + + return result; +--- src/cgnstools/tkogl/quadric.c.orig 2013-06-03 18:06:04.000000000 +0200 ++++ src/cgnstools/tkogl/quadric.c 2013-06-03 18:06:28.000000000 +0200 +@@ -147,7 +147,7 @@ + if (dlist != 0) glEndList(); else return result; + + if (result == TCL_OK) { +- sprintf (interp->result, "%d", dlist); ++ Tcl_SetObjResult (interp, Tcl_NewIntObj (dlist)); + } + else { + glDeleteLists (dlist, 1); +--- src/cgnstools/tkogl/tess.c.orig 2013-06-03 18:06:51.000000000 +0200 ++++ src/cgnstools/tkogl/tess.c 2013-06-03 18:07:20.000000000 +0200 +@@ -122,7 +122,7 @@ + } + + if (dlist != 0) { +- sprintf (interp->result, "%d", dlist); ++ Tcl_SetObjResult (interp, Tcl_NewIntObj (dlist)); + } + return TCL_OK; + } +--- src/cgnstools/tkogl/printstr.c.orig 2013-06-03 18:07:44.000000000 +0200 ++++ src/cgnstools/tkogl/printstr.c 2013-06-03 18:08:14.000000000 +0200 +@@ -131,7 +131,7 @@ + return TCL_ERROR; + } + +- sprintf (interp->result, "%d", fontOffset); ++ Tcl_SetObjResult (interp, Tcl_NewIntObj (fontOffset)); + return TCL_OK; + } +