Hi,
The attached patch fixes install-extension for cases when the second
argument (file list) contains pairs. Example:
(install-extension 'foo '(("orig" "dest")))
Here's a real error:
http://tests.call-cc.org/master/linux/x86/2012/10/15/salmonella-report/install/crunch.html
Thanks to Peter Bex for identifying the cause and indicating a fix.
Best wishes.
Mario
--
http://parenteses.org/mario
>From c9ad092a9b2a7c335ae773c6a9fd6b1c5431a0f3 Mon Sep 17 00:00:00 2001
From: Mario Domenech Goulart <[email protected]>
Date: Mon, 15 Oct 2012 19:56:05 -0300
Subject: [PATCH] install-extension fix for when the second arg contains pairs
(SOURCE DEST)
Cases like
(install-extension 'foo '(("orig" "dest")))
break install-extension. See
http://tests.call-cc.org/master/linux/x86/2012/10/15/salmonella-report/install/crunch.html
for example.
---
setup-api.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/setup-api.scm b/setup-api.scm
index 956e7b2..c0461af 100644
--- a/setup-api.scm
+++ b/setup-api.scm
@@ -442,7 +442,7 @@
(run (,*ranlib-command* ,(shellpath to)) ) ))
(if (deployment-mode)
f
- (or (target-prefix f) to))))
+ (or (target-prefix to) to))))
files) ) )
(write-info id dests (supply-version info #f)) ) ) )
--
1.7.9.5
_______________________________________________
Chicken-hackers mailing list
[email protected]
https://lists.nongnu.org/mailman/listinfo/chicken-hackers
