[Chicken-janitors] Re: #158: Incorrect mapping of ncurses C string-retrieval functions to Scheme procedures

[Chicken Trac]

#158: Incorrect mapping of ncurses C string-retrieval functions to Scheme
procedures
------------------------+---------------------------------------------------
 Reporter:  nsantos     |       Owner:  felix
     Type:  defect      |      Status:  new  
 Priority:  major       |   Milestone:  4.4.0
Component:  extensions  |     Version:  4.3.x
 Keywords:  ncurses     |  
------------------------+---------------------------------------------------

Comment(by nsantos):

 Replying to [comment:4 zbigniew]:
 > nsantos: Works for me.  Are you contending the interface does not work
 (it does) or that it's not particularly Scheme-like (a valid point)?

 Yes on the latter, although it's mostly a nice-to-have at this point.
 This is the ncurses error I'm getting, preceded by code I'm trying to get
 to work.

 {{{
 (define (input-loop entry-window mailbox)
   (make-thread
    (lambda ()
      (let loop ((input ""))
        (mvwgetstr entry-window 0 0 input)
        (mailbox-send! mailbox input)
        (loop "")))))
 }}}

 The error being,

 {{{
 Warning (#<thread: thread929>): : curses error
 Call history:

   <eval>          [input-loop] ((##core#letrec ((loop (##core#loop-lambda
 (input) (mvwgetstr entry-window 0 0 input) (mailbox-send!......
   <eval>          [input-loop] (mvwgetstr entry-window 0 0 input) <--
 Warning (#<thread: thread927>): : <condition> (uncaught-exception)

 Error: uncaught exception: #<condition: (uncaught-exception)>
 }}}

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