Ticket #936: 0001-install-extension-fix-for-when-the-second-arg-contai.patch

File 0001-install-extension-fix-for-when-the-second-arg-contai.patch, 1023 bytes (added by Mario Domenech Goulart, 12 years ago)

  • setup-api.scm 

    From dc31f862e6e94a52eb2cd9b6e6cfb65e756978ab Mon Sep 17 00:00:00 2001
From: Mario Domenech Goulart <mario.goulart@gmail.com>
Date: Mon, 15 Oct 2012 19:56:05 -0300
Subject: [PATCH] install-extension fix for when the second arg contains pairs (SOURCE DEST) and chicken-install is called with -prefix

Cases like

  (install-extension 'foo '(("orig" "dest")))

break install-extension when -prefix is given to chicken-install.  See
http://tests.call-cc.org/master/linux/x86/2012/10/15/salmonella-report/install/crunch.html
for example.
---
 setup-api.scm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/setup-api.scm b/setup-api.scm
index 956e7b2..c0461af 100644
    a b  
    442442                               (run (,*ranlib-command* ,(shellpath to)) ) ))
    443443                           (if (deployment-mode)
    444444                               f
    445                                (or (target-prefix f) to))))
     445                               (or (target-prefix to) to))))
    446446                       files) ) )
    447447      (write-info id dests (supply-version info #f)) ) ) )
    448448