[Chicken-janitors] #19: define-syntax on imported syntax redefines that syntax in the original module

[Chicken Trac]

#19: define-syntax on imported syntax redefines that syntax in the original
module
-------------------+--------------------------------------------------------
Reporter:  ashinn  |       Owner:  felix   
    Type:  defect  |      Status:  new     
Priority:  major   |   Component:  compiler
 Version:  4.0.1   |    Keywords:          
-------------------+--------------------------------------------------------
 CHICKEN
 (c)2008-2009 The Chicken Team
 (c)2000-2007 Felix L. Winkelmann
 Version 4.0.2 - SVN rev. 14239
 macosx-unix-gnu-x86 [ manyargs dload ptables applyhook ]
 compiled 2009-04-16 on pchelka (Darwin)

 #;1> (module x () (import scheme) (define-syntax import (syntax-rules
 ())))
 ; loading /usr/local/lib/chicken/4/scheme.import.so ...

 Warning: redefinition of imported syntax binding: import
 #;2> (module y () (import scheme) 'ok)

 Error: during expansion of (import ...) - no rule matches form: (import
 scheme)

         Call history:

         <syntax>                (module y () (import scheme) (quote ok))
         <syntax>                (##core#module y () (import scheme) (quote
 ok))
         <syntax>                (import scheme)
         <eval>          (##sys#cdr input10)
         <eval>          (##sys#syntax-error-hook "no rule matches form"
 input10<--
 #;2>

-- 
Ticket URL: <http://www.irp.oist.jp/trac/chicken/ticket/19>
Chicken Scheme <http://www.call-with-current-continuation.org/>
Chicken Scheme is a compiler for the Scheme programming language.