[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Chicken-janitors] #885: pty egg: example doesn't work
From: |
Chicken Trac |
Subject: |
[Chicken-janitors] #885: pty egg: example doesn't work |
Date: |
Tue, 10 Jul 2012 19:37:38 -0000 |
#885: pty egg: example doesn't work
------------------------+---------------------------------------------------
Reporter: megane | Owner:
Type: defect | Status: new
Priority: minor | Milestone: 4.8.0
Component: extensions | Version: 4.7.x
Keywords: pty |
------------------------+---------------------------------------------------
The example from the egg wiki doesn't work.
{{{
$ csi -v && cat ptytest.scm && csi -nbq ptytest.scm
CHICKEN
(c)2008-2011 The Chicken Team
(c)2000-2007 Felix L. Winkelmann
Version 4.7.5 (rev 0e44970)
linux-unix-gnu-x86 [ manyargs dload ptables ]
compiled 2012-07-10 on shiro (Linux)
(use pty)
(call-with-pty-process-io "ssh myfirewall"
(lambda (in out pid)
(peek-char in)
(display (gui-get-password) out)
(newline out)
(read-line in)
(display "dhclient 2>/dev/null && echo OK || echo FAIL\n" out)
(unless (equal? "OK" (read-line in))
(error "couldn't launch dhclient"))))
Error: can't read from FD - Resource temporarily unavailable: 4
Call history:
<eval> (call-with-pty-process-io "ssh myfirewall" (lambda (in
out pid) (peek-char in) (display (gui-get-pas......
##sys#substring-index
pty.scm:196: string-split
pty.scm:202: process-fork
pty.scm:231: open-file-io/non-blocking
##sys#make-string
pty.scm:90: make-input-port
pty.scm:134: make-output-port
pty.scm:236: proc
<eval> (peek-char in)
pty.scm:94: file-read/maybe
pty.scm:111: g68
pty.scm:76: ##sys#update-errno
##sys#peek-c-string
pty.scm:77: ##sys#string-append
pty.scm:77: ##sys#signal-hook <--
}}}
--
Ticket URL: <http://bugs.call-cc.org/ticket/885>
Chicken Scheme <http://www.call-with-current-continuation.org/>
Chicken Scheme is a compiler for the Scheme programming language.
- [Chicken-janitors] #885: pty egg: example doesn't work,
Chicken Trac <=