Package: guix-patches;
Reported by: Ekaitz Zarraga <ekaitz <at> elenq.tech>
Date: Thu, 14 May 2020 15:02:01 UTC
Severity: normal
Tags: patch
Done: Ludovic Courtès <ludo <at> gnu.org>
Bug is archived. No further changes may be made.
View this message in rfc822 format
From: help-debbugs <at> gnu.org (GNU bug Tracking System) To: Ludovic Courtès <ludo <at> gnu.org> Cc: tracker <at> debbugs.gnu.org Subject: bug#41263: closed ([PATCH] gnu: Add openctm) Date: Fri, 15 May 2020 10:13:01 +0000
[Message part 1 (text/plain, inline)]
Your message dated Fri, 15 May 2020 12:12:40 +0200 with message-id <87eerltskn.fsf <at> gnu.org> and subject line Re: [bug#41263] [PATCH] gnu: Add openctm has caused the debbugs.gnu.org bug report #41263, regarding [PATCH] gnu: Add openctm to be marked as done. (If you believe you have received this mail in error, please contact help-debbugs <at> gnu.org.) -- 41263: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=41263 GNU Bug Tracking System Contact help-debbugs <at> gnu.org with problems
[Message part 2 (message/rfc822, inline)]
From: Ekaitz Zarraga <ekaitz <at> elenq.tech> To: "guix-patches <at> gnu.org" <guix-patches <at> gnu.org> Subject: [PATCH] gnu: Add openctm Date: Thu, 14 May 2020 15:01:32 +0000Hi, Adding OpenCTM as discussed here: https://issues.guix.gnu.org/issue/40492 Regards, Ekaitz --- From 8bbac5bccdb0b2fd5ffa8fe1e2dec25a6a359810 Mon Sep 17 00:00:00 2001 From: Ekaitz Zarraga <ekaitz <at> elenq.tech> Date: Thu, 14 May 2020 16:55:32 +0200 Subject: [PATCH] gnu: Add openctm * gnu/packages/engineering.scm (openctm): New Variable. --- gnu/packages/engineering.scm | 59 ++++++++++++++++++++++++++++++++++++ 1 file changed, 59 insertions(+) diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm index 172f8481eb..e3e346b1e9 100644 --- a/gnu/packages/engineering.scm +++ b/gnu/packages/engineering.scm @@ -17,6 +17,7 @@ ;;; Copyright © 2020 Brice Waegeneire <brice <at> waegenei.re> ;;; Copyright © 2020 Vincent Legoll <vincent.legoll <at> gmail.com> ;;; Copyright © 2020 Marius Bakke <mbakke <at> fastmail.com> +;;; Copyright © 2020 Ekaitz Zarraga <ekaitz <at> elenq.tech> ;;; ;;; This file is part of GNU Guix. ;;; @@ -38,6 +39,7 @@ #:use-module (guix download) #:use-module (guix gexp) #:use-module (guix git-download) + #:use-module (guix svn-download) #:use-module (guix monads) #:use-module (guix store) #:use-module (guix utils) @@ -2533,3 +2535,60 @@ without any changes. And programmers that are familiar with the magellan API can continue using it with a free library without the restrictions of the official SDK.") (license license:bsd-3))) + +(define-public openctm + (let ((revision 603)) + ; Previous versions don't compile, they need to link libGL and libGLU. + ; Fixed in this revision. + (package + (name "openctm") + (version (number->string revision)) + (source + (origin + (method svn-fetch) + (uri + (svn-reference + (url "https://svn.code.sf.net/p/openctm/code/trunk") + (revision revision))) + (sha256 + (base32 "01wb70m48xh5gwhv60a5brv4sxl0i0rh038w32cgnlxn5x86s9f1")))) + (build-system gnu-build-system) + (native-inputs + `(("mesa" ,mesa) + ("glu" ,glu) + ("glut" ,freeglut) + ("gtk" ,gtk+-2) + ("pkg-config" ,pkg-config))) + (arguments + `(#:tests? #f + #:phases + (modify-phases + %standard-phases + (replace + 'configure + (lambda* (#:key outputs #:allow-other-keys) + (rename-file "Makefile.linux" "Makefile") ; Use linux Makefile + (let ((out (assoc-ref outputs "out"))) + ; Create output directories + (mkdir-p (string-append out "/lib")) + (mkdir-p (string-append out "/include")) + (mkdir-p (string-append out "/bin")) + ; Fix rpath + (substitute* "tools/Makefile.linux" + (("-rpath,\\.") + (string-append "-rpath," out "/lib/")) + (("\\/usr\\/local") + out)) + ; Set right output + (substitute* "Makefile" + (("\\/usr\\/lib") + (string-append out "/lib")) + (("\\/usr\\/local") + out)))))))) + (synopsis "3D triangle mesh format and related tools and libraries") + (description "OpenCTM is a file format, a software library and a tool set +for compression of 3D triangle meshes. The geometry is compressed to a +fraction of comparable file formats (3DS, STL, COLLADA...), and the format is +accessible through a simple API") + (license license:zlib) + (home-page "http://openctm.sourceforge.net/")))) -- 2.26.1
[Message part 3 (message/rfc822, inline)]
From: Ludovic Courtès <ludo <at> gnu.org> To: Ekaitz Zarraga <ekaitz <at> elenq.tech> Cc: 41263-done <at> debbugs.gnu.org Subject: Re: [bug#41263] [PATCH] gnu: Add openctm Date: Fri, 15 May 2020 12:12:40 +0200[Message part 4 (text/plain, inline)]Hi, Ekaitz Zarraga <ekaitz <at> elenq.tech> skribis: >>From 8bbac5bccdb0b2fd5ffa8fe1e2dec25a6a359810 Mon Sep 17 00:00:00 2001 > From: Ekaitz Zarraga <ekaitz <at> elenq.tech> > Date: Thu, 14 May 2020 16:55:32 +0200 > Subject: [PATCH] gnu: Add openctm > > * gnu/packages/engineering.scm (openctm): New Variable. Applied with the cosmetic changes below, mostly indentation (consider running ./etc/indent-code.el as mentioned in the manual). Thanks! Ludo’.[Message part 5 (text/x-patch, inline)]diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm index e3e346b1e9..190632436b 100644 --- a/gnu/packages/engineering.scm +++ b/gnu/packages/engineering.scm @@ -2538,53 +2538,52 @@ official SDK.") (define-public openctm (let ((revision 603)) - ; Previous versions don't compile, they need to link libGL and libGLU. - ; Fixed in this revision. + ;; Previous versions don't compile, they need to link libGL and libGLU. + ;; Fixed in this revision. (package (name "openctm") - (version (number->string revision)) + (version (string-append "1.0.3." (number->string revision))) (source - (origin - (method svn-fetch) - (uri - (svn-reference - (url "https://svn.code.sf.net/p/openctm/code/trunk") - (revision revision))) - (sha256 - (base32 "01wb70m48xh5gwhv60a5brv4sxl0i0rh038w32cgnlxn5x86s9f1")))) + (origin + (method svn-fetch) + (uri (svn-reference + (url "https://svn.code.sf.net/p/openctm/code/trunk") + (revision revision))) + (file-name (string-append name "-" version "-checkout")) + (sha256 + (base32 "01wb70m48xh5gwhv60a5brv4sxl0i0rh038w32cgnlxn5x86s9f1")))) (build-system gnu-build-system) (native-inputs - `(("mesa" ,mesa) - ("glu" ,glu) - ("glut" ,freeglut) - ("gtk" ,gtk+-2) - ("pkg-config" ,pkg-config))) + `(("mesa" ,mesa) + ("glu" ,glu) + ("glut" ,freeglut) + ("gtk" ,gtk+-2) + ("pkg-config" ,pkg-config))) (arguments - `(#:tests? #f - #:phases - (modify-phases - %standard-phases - (replace - 'configure - (lambda* (#:key outputs #:allow-other-keys) - (rename-file "Makefile.linux" "Makefile") ; Use linux Makefile - (let ((out (assoc-ref outputs "out"))) - ; Create output directories - (mkdir-p (string-append out "/lib")) - (mkdir-p (string-append out "/include")) - (mkdir-p (string-append out "/bin")) - ; Fix rpath - (substitute* "tools/Makefile.linux" - (("-rpath,\\.") - (string-append "-rpath," out "/lib/")) - (("\\/usr\\/local") - out)) - ; Set right output - (substitute* "Makefile" - (("\\/usr\\/lib") - (string-append out "/lib")) - (("\\/usr\\/local") - out)))))))) + `(#:tests? #f ;no tests + #:phases + (modify-phases %standard-phases + (replace 'configure + (lambda* (#:key outputs #:allow-other-keys) + (rename-file "Makefile.linux" "Makefile") + (let ((out (assoc-ref outputs "out"))) + ;; Create output directories. + (mkdir-p (string-append out "/lib")) + (mkdir-p (string-append out "/include")) + (mkdir-p (string-append out "/bin")) + ;; Fix rpath. + (substitute* "tools/Makefile.linux" + (("-rpath,\\.") + (string-append "-rpath," out "/lib/")) + (("/usr/local") + out)) + ;; Set right output. + (substitute* "Makefile" + (("/usr/lib") + (string-append out "/lib")) + (("\\/usr\\/local") + out)) + #t)))))) (synopsis "3D triangle mesh format and related tools and libraries") (description "OpenCTM is a file format, a software library and a tool set for compression of 3D triangle meshes. The geometry is compressed to a
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.