1aef67362f
Otherwise, the NSS troubles may make a test fail. Patch suggested by ludo.
115 lines
3.8 KiB
Nix
115 lines
3.8 KiB
Nix
{ fetchurl, stdenv, libtool, readline, gmp, pkgconfig, boehmgc, libunistring
|
|
, libffi, gawk, makeWrapper, coverageAnalysis ? null, gnu ? null }:
|
|
|
|
# Do either a coverage analysis build or a standard build.
|
|
(if coverageAnalysis != null
|
|
then coverageAnalysis
|
|
else stdenv.mkDerivation)
|
|
|
|
(rec {
|
|
name = "guile-2.0.7";
|
|
|
|
src = fetchurl {
|
|
url = "mirror://gnu/guile/${name}.tar.xz";
|
|
sha256 = "0f53pxkia4v17n0avwqlcjpy0n89hkazm2xsa6p84lv8k6k8y9vg";
|
|
};
|
|
|
|
nativeBuildInputs = [ makeWrapper gawk pkgconfig ];
|
|
buildInputs = [ readline libtool libunistring libffi ];
|
|
propagatedBuildInputs = [ gmp boehmgc ]
|
|
|
|
# XXX: These ones aren't normally needed here, but since
|
|
# `libguile-2.0.la' reads `-lltdl -lunistring', adding them here will add
|
|
# the needed `-L' flags. As for why the `.la' file lacks the `-L' flags,
|
|
# see below.
|
|
++ [ libtool libunistring ];
|
|
|
|
# A native Guile 2.0 is needed to cross-build Guile.
|
|
selfNativeBuildInput = true;
|
|
|
|
enableParallelBuilding = true;
|
|
|
|
patches = [ ./disable-gc-sensitive-tests.patch ./eai_system.patch ] ++
|
|
(stdenv.lib.optional (coverageAnalysis != null) ./gcov-file-name.patch);
|
|
|
|
# Explicitly link against libgcc_s, to work around the infamous
|
|
# "libgcc_s.so.1 must be installed for pthread_cancel to work".
|
|
LDFLAGS = "-lgcc_s";
|
|
|
|
postInstall = ''
|
|
wrapProgram $out/bin/guile-snarf --prefix PATH : "${gawk}/bin"
|
|
|
|
# XXX: See http://thread.gmane.org/gmane.comp.lib.gnulib.bugs/18903 for
|
|
# why `--with-libunistring-prefix' and similar options coming from
|
|
# `AC_LIB_LINKFLAGS_BODY' don't work on NixOS/x86_64.
|
|
sed -i "$out/lib/pkgconfig/guile-2.0.pc" \
|
|
-e 's|-lunistring|-L${libunistring}/lib -lunistring|g ;
|
|
s|^Cflags:\(.*\)$|Cflags: -I${libunistring}/include \1|g ;
|
|
s|-lltdl|-L${libtool}/lib -lltdl|g'
|
|
'';
|
|
|
|
doCheck = true;
|
|
|
|
setupHook = ./setup-hook-2.0.sh;
|
|
|
|
crossAttrs.preConfigure =
|
|
stdenv.lib.optionalString (stdenv.cross.config == "i586-pc-gnu")
|
|
# On GNU, libgc depends on libpthread, but the cross linker doesn't
|
|
# know where to find libpthread, which leads to erroneous test failures
|
|
# in `configure', where `-pthread' and `-lpthread' aren't explicitly
|
|
# passed. So it needs some help (XXX).
|
|
"export LDFLAGS=-Wl,-rpath-link=${gnu.libpthreadCross}/lib";
|
|
|
|
|
|
meta = {
|
|
description = "GNU Guile 2.0, an embeddable Scheme implementation";
|
|
|
|
longDescription = ''
|
|
GNU Guile is an implementation of the Scheme programming language, with
|
|
support for many SRFIs, packaged for use in a wide variety of
|
|
environments. In addition to implementing the R5RS Scheme standard
|
|
and a large subset of R6RS, Guile includes a module system, full access
|
|
to POSIX system calls, networking support, multiple threads, dynamic
|
|
linking, a foreign function call interface, and powerful string
|
|
processing.
|
|
'';
|
|
|
|
homepage = http://www.gnu.org/software/guile/;
|
|
license = "LGPLv3+";
|
|
|
|
maintainers = [ stdenv.lib.maintainers.ludo ];
|
|
|
|
platforms = stdenv.lib.platforms.all;
|
|
};
|
|
}
|
|
|
|
//
|
|
|
|
(stdenv.lib.optionalAttrs stdenv.isSunOS {
|
|
# TODO: Move me above.
|
|
configureFlags =
|
|
[
|
|
# Make sure the right <gmp.h> is found, and not the incompatible
|
|
# /usr/include/mp.h from OpenSolaris. See
|
|
# <https://lists.gnu.org/archive/html/hydra-users/2012-08/msg00000.html>
|
|
# for details.
|
|
"--with-libgmp-prefix=${gmp}"
|
|
|
|
# Same for these (?).
|
|
"--with-libreadline-prefix=${readline}"
|
|
"--with-libunistring-prefix=${libunistring}"
|
|
|
|
# See below.
|
|
"--without-threads"
|
|
];
|
|
})
|
|
|
|
//
|
|
|
|
(if stdenv.isFreeBSD
|
|
then {
|
|
# XXX: Thread support is currently broken on FreeBSD and Solaris (namely
|
|
# the `SCM_I_IS_THREAD' assertion in `scm_spawn_thread' is hit.)
|
|
configureFlags = [ "--without-threads" ];
|
|
}
|
|
else {}))
|