#1771: Except specificier in imports

[Chicken Trac]

#1771: Except specificier in imports
---------------------------------------+---------------------
            Reporter:  Idiomdrottning  |       Type:  defect
              Status:  new             |   Priority:  major
           Milestone:  someday         |  Component:  unknown
             Version:                  |   Keywords:
Estimated difficulty:                  |
---------------------------------------+---------------------
 Note: this is with the patch for #1757 applied, for the future 5.3.0.

 Here is the issue. If this is an egg,

 cakes.scm:

 (module cakes ()
 (import scheme (chicken module) match-generics)
 (reexport
  (rename scheme (define define-og))
  (rename match-generics (define-dx define))))

 cakes.egg

  ((synopsis "A min via for import except")
   (components (extension cakes)))

 And here is a file that uses that egg:

  (import (except cakes define))
  (define (lamp x) 19)
  (define (lamp x y) 21)
  (+ (lamp 13 41)
     (lamp 12))

 The expected behavior is for this to bork or crash.

 Instead it evals to 40, as if we had imported

  (import (except cakes define))

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