~ chicken-core (chicken-5) 3b5d5039ad54f959bd8b88d96d90eff18107d0b0


commit 3b5d5039ad54f959bd8b88d96d90eff18107d0b0
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Oct 7 12:26:59 2021 +0200
Commit:     Mario Domenech Goulart <mario@parenteses.org>
CommitDate: Thu Oct 7 21:38:55 2021 +0200

    Treat core unit requirements for "chicken.foreign" as builtin to avoid appearance in .link files
    
    Signed-off-by: Mario Domenech Goulart <mario@parenteses.org>

diff --git a/eval.scm b/eval.scm
index ce388eb1..30c651cd 100644
--- a/eval.scm
+++ b/eval.scm
@@ -1252,7 +1252,7 @@
   (let ((mod (or (eq? lib mod) mod)))
     (cond
       ((assq lib core-unit-requirements) => 
-        (lambda (a) (values (cdr a) #f)))
+        (lambda (a) (values (cdr a) #t)))
       ((memq lib builtin-features) 
         (values '(##core#undefined) #t))
       ((memq lib core-units)
Trap