From: Stanislav Brabec <utx@penguin.cz>
Date: Tue, 2 Dec 2008 21:06:36 +0000 (+0000)
Subject: guile: Created cross-compilation capable guile-config.
X-Git-Tag: Release-2010-05/1~4972^2~2
X-Git-Url: http://git.openpandora.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b9b0f4343e79ac1358082cb1fb4de48f3ac06d8d;p=openembedded.git

guile: Created cross-compilation capable guile-config.
---

diff --git a/packages/guile/guile_1.8.5.bb b/packages/guile/guile_1.8.5.bb
index fe5ebbc154..0524bbdb83 100644
--- a/packages/guile/guile_1.8.5.bb
+++ b/packages/guile/guile_1.8.5.bb
@@ -5,12 +5,12 @@ SECTION = "devel/scheme"
 DEPENDS = "guile-native gmp libtool"
 LICENSE = "GPL"
 
-PR = "r3"
+PR = "r4"
 
 SRC_URI = "http://ftp.gnu.org/pub/gnu/guile/guile-${PV}.tar.gz \
            file://configure-fix.patch;patch=1 "
 
-inherit autotools binconfig
+inherit autotools
 
 acpaths = "-I ${S}/guile-config"
 
@@ -33,5 +33,11 @@ do_compile() {
 
 do_stage() {
 	autotools_stage_all
+	# Create guile-config returning target values instead of native values
+	install -d ${STAGING_BINDIR_CROSS}
+	echo '#!'`which guile`$' \\\n-e main -s\n!#\n(define %guile-build-info '\'\( >guile-config.cross
+	sed -n $'s:-isystem[^ ]* ::;s:-Wl,-rpath-link,[^ ]* ::;s:^[ \t]*{[ \t]*":  (:;s:",[ \t]*": . ":;s:" *}, *\\\\:"):;/^  (/p' <libguile/libpath.h >>guile-config.cross
+	echo '))' >>guile-config.cross
+	cat guile-config/guile-config >>guile-config.cross
+	install guile-config.cross ${STAGING_BINDIR_CROSS}/guile-config
 }
-