[Chicken-janitors] #1061: Implicit export of identifiers only works for syntax

[Chicken Trac]

#1061: Implicit export of identifiers only works for syntax
----------------------+-----------------------------------------------------
 Reporter:  syn       |       Owner:       
     Type:  defect    |      Status:  new  
 Priority:  major     |   Milestone:  4.9.0
Component:  expander  |     Version:  4.8.x
 Keywords:            |  
----------------------+-----------------------------------------------------
 Given a module which exports some syntax which expands to an identifier
 which isn't explicitly exported and isn't itself a syntax identifier,
 implciit export of that identifier doesn't work:

 {{{
 ;;; foo.scm

 (module foo

 (some-syntax)

 (import scheme)

 (define (some-implicitly-used-procedure x)
   (list x))


 (define-syntax some-syntax
   (syntax-rules ()
     ((_ x)
      (some-implicitly-used-procedure 'x))))

 )
 }}}

 To trigger the error:

 {{{
 $ csc -s -J foo.scm
 $ csi -R foo -p '(some-syntax bar)'

 Error: unbound variable: some-implicitly-used-procedure
 }}}

 As can be witnessed in #1060, it works fine for implicitly exported
 syntax.

-- 
Ticket URL: <http://bugs.call-cc.org/ticket/1061>
Chicken Scheme <http://www.call-with-current-continuation.org/>
Chicken Scheme is a compiler for the Scheme programming language.