[Chicken-janitors] #1195: ,q in csi gives an error

[Chicken Trac]

#1195: ,q in csi gives an error
---------------------+---------------------
 Reporter:  sjamaan  |      Owner:  sjamaan
     Type:  defect   |     Status:  new
 Priority:  major    |  Milestone:  5.0
Component:  unknown  |    Version:
 Keywords:           |
---------------------+---------------------
 $ csi

 {{{
 CHICKEN
 (c) 2008-2015, The CHICKEN Team
 (c) 2000-2007, Felix L. Winkelmann
 Version 4.9.1 (rev 1ae3dc1)
 linux-unix-gnu-x86-64 [ 64bit manyargs dload ptables ]
 compiled 2015-06-13 on yves.more-magic.net (Linux)

 #;1> (##sys#quit-hook)

 Error: bad argument count - received 0 but expected 1: #<procedure
 (f_10510 result2568)>

         Call history:

         csi.scm:416: ##sys#call-with-values
         csi.scm:416: eval
         <syntax>          (##sys#quit-hook)
         <eval>    (##sys#quit-hook)     <--
 #;1>
 }}}

 This seems to have something to do with the {{{set!}}} call on line 1098:
 it is overriding {{{##sys#quit-hook}}} with a procedure that has an
 incompatible signature.  However, this is not the most important part: the
 important part is that this override is not picked up at the call site.

 Maybe this'll get fixed with #1131

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