Re: [Chicken-users] quoted vectors in syntax rules

[Peter Bex]

On Fri, Mar 02, 2012 at 10:23:56AM +0100, Sandra Snan wrote:
> I stumbled upon the following behavior:
> 
> (equal? '#(a b c) (vector 'a 'b 'c))
> (define (f-test)
>  '#(a b c))
> (define-syntax s-test
>  (syntax-rules ()
>    ((test)
>     '#(a b c))))
> 
> (f-test)
> (s-test)
> 
> (equal? (f-test) (s-test))
> 
> What is the explanation for this puzzle?

Which version of Chicken are you using?  I can't reproduce
this with 4.7.0 or the current master, and I know older versions had
some problems with stripping the syntax information off macro-renamed
symbols.

Try printing the result directly instead of comparing it.  In 4.5.0,
I get this:

#;1> (define-syntax s-test (syntax-rules () ((test) '#(a b c))))
#;2> (s-test)
#(a30 b31 c32)

The easiest solution is to upgrade.

Cheers,
Peter
-- 
http://sjamaan.ath.cx
--
"The process of preparing programs for a digital computer
 is especially attractive, not only because it can be economically
 and scientifically rewarding, but also because it can be an aesthetic
 experience much like composing poetry or music."
                                                        -- Donald Knuth