Forgot to CC this to -devel.
Cyril.
-------- Original Message --------
Return-Path: <tipec...@gmail.com>
Received: from localhost.localdomain
(tal33-3-82-233-82-24.fbx.proxad.net. [82.233.82.24]) by
mx.google.com with ESMTPSA id uq2sm23377356wjc.5.2014.01.31.16.47.22
for <multiple recipients> (version=TLSv1.2
cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Fri, 31 Jan
2014 16:47:23 -0800 (PST)
From: Cyril Roelandt <tipec...@gmail.com>
To: 16...@debbugs.gnu.org
Cc: Cyril Roelandt <tipec...@gmail.com>
Subject: [PATCH] gnu: Enable the 'ctypes' module in Python.
Date: Sat, 1 Feb 2014 01:46:00 +0100
Message-Id: <1391215560-6020-1-git-send-email-tipec...@gmail.com>
X-Mailer: git-send-email 1.8.4.rc3
* gnu/packages/python.scm (python-2): add libffi to the inputs and use it to
build the ctypes module.
---
gnu/packages/python.scm | 7 +++++++
1 file changed, 7 insertions(+)
diff --git a/gnu/packages/python.scm b/gnu/packages/python.scm
index 6d2c940..260bace 100644
--- a/gnu/packages/python.scm
+++ b/gnu/packages/python.scm
@@ -27,9 +27,11 @@
#:use-module (gnu packages compression)
#:use-module (gnu packages gdbm)
#:use-module (gnu packages icu4c)
+ #:use-module (gnu packages libffi)
#:use-module (gnu packages readline)
#:use-module (gnu packages openssl)
#:use-module (gnu packages patchelf)
+ #:use-module (gnu packages pkg-config)
#:use-module (gnu packages sqlite)
#:use-module (guix packages)
#:use-module (guix download)
@@ -98,10 +100,12 @@
#:configure-flags
(let ((bz2 (assoc-ref %build-inputs "bzip2"))
(gdbm (assoc-ref %build-inputs "gdbm"))
+ (libffi (assoc-ref %build-inputs "libffi"))
(openssl (assoc-ref %build-inputs "openssl"))
(readline (assoc-ref %build-inputs "readline"))
(zlib (assoc-ref %build-inputs "zlib")))
(list "--enable-shared" ; allow embedding
+ "--with-system-ffi" ; build ctypes
(string-append "CPPFLAGS="
"-I" bz2 "/include "
"-I" gdbm "/include "
@@ -111,6 +115,7 @@
(string-append "LDFLAGS="
"-L" bz2 "/lib "
"-L" gdbm "/lib "
+ "-L" libffi "/lib "
"-L" openssl "/lib "
"-L" readline "/lib "
"-L" zlib "/lib")))
@@ -137,7 +142,9 @@
(inputs
`(("bzip2" ,bzip2)
("gdbm" ,gdbm)
+ ("libffi" ,libffi) ; for ctypes
("openssl" ,openssl)
+ ("pkg-config" ,pkg-config)
("readline" ,readline)
("zlib" ,zlib)
("patchelf" ,patchelf))) ; for (guix build rpath)
--
1.8.4.rc3
