~ chicken-core (chicken-5) 34101b5837dc06417a7950a6868f73232f9b3ad4

commit 34101b5837dc06417a7950a6868f73232f9b3ad4
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Fri Oct 20 21:41:32 2017 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Fri Oct 20 21:41:32 2017 +0200

    chicken-install: use proper (module) name instead of source name when compiling import library

diff --git a/egg-compile.scm b/egg-compile.scm
index b10f764c..ac748188 100644
--- a/egg-compile.scm
+++ b/egg-compile.scm
@@ -489,19 +489,18 @@
            (arglist link-options) " " src " -o " out " : "
            src #;(arglist dependencies))))
 
-(define ((compile-import-library name #!key dependencies source mode
+(define ((compile-import-library name #!key dependencies mode
                                  (options '()) (link-options '())
                                  custom)
          srcdir platform)
   (let* ((cmd (or (and custom (prefix-custom-command custom))
                   default-csc))
          (sname (prefix srcdir name))
-         (ssname (and source (prefix srcdir source)))
          (opts (if (null? options) 
                    default-import-library-compilation-options
                    options))
          (out (quotearg (target-file (conc sname ".import.so") mode)))
-         (src (quotearg (or source (conc sname ".import.scm")))))
+         (src (quotearg (conc sname ".import.scm"))))
     (print "\n" (slashify default-builder platform) " " out " " cmd 
            (if keep-generated-files " -k" "")
            " -setup-mode -s"