#1697: R7RS cond-expand library form is broken

[Chicken Trac]

#1697: R7RS cond-expand library form is broken
--------------------------------+---------------------
            Reporter:  zaifir   |       Type:  defect
              Status:  new      |   Priority:  major
           Milestone:  someday  |  Component:  unknown
             Version:  5.2.0    |   Keywords:
Estimated difficulty:           |
--------------------------------+---------------------
 The `r7rs` egg's support for the `(library ...)` form in `cond-expand` is
 broken. Running the following example

 {{{
 (import (r7rs))
 (define spiffy-installed?
   (cond-expand
     ((library (spiffy)) #t)
     (else #f)))
 }}}

 gives this error:

 {{{
 Error: during expansion of (cond-expand ...) - unbound variable: ##sys
 #core-library-modules
 }}}

-- 
Ticket URL: <https://bugs.call-cc.org/ticket/1697>
CHICKEN Scheme <https://www.call-cc.org/>
CHICKEN Scheme is a compiler for the Scheme programming language.