[Chicken-janitors] #1227: parameterize bug

[Chicken Trac]

#1227: parameterize bug
----------------------------+---------------------
 Reporter:  mario           |      Owner:
     Type:  defect          |     Status:  new
 Priority:  major           |  Milestone:  someday
Component:  core libraries  |    Version:  4.10.x
 Keywords:                  |
----------------------------+---------------------
 The following message was sent by Joo ChurlSoo by e-mail:

 {{{
 The followin seems to be a bug.

 CHICKEN
 (c) 2008-2015, The CHICKEN Team
 (c) 2000-2007, Felix L. Winkelmann
 Version 4.10.0 (rev b259631)
 windows-mingw32-x86 [ manyargs dload ptables ]
 compiled 2015-08-04 on yves.more-magic.net (Linux)
 #;1>
 (define a (make-parameter 1 number->string))
 (define b (make-parameter 2 number->string))
 (list (a) (b))

 #;2> #;3> ("1" "2")
 #;4> (parameterize ((a 10) (b 20) (a 30)) (list (a) (b)))
 ("30" "20")
 #;5> (list (a) (b))
 ("10" "2")
 #;6> (a 1)
 "1"
 #;7> (list (a) (b))
 ("1" "2")
 #;8> (parameterize ((a 10) (b 20) (a 'abc)) (list (a) (b)))

 Error: (number->string) bad argument type: abc
 #;8> (list (a) (b))
 ("10" "20")
 #;9> (a 1) (b 2)
 "1"
 #;10> "2"
 #;11> (parameterize ((a 10) (b 20) (a 30) (a 40) (b 30)) (list (a) (b)))
 ("40" "30")
 #;12> (list (a) (b))
 ("30" "20")
 }}}

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