scsh-conservatory
/
scsh-0.5
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed bug in stdio->stdports -- it was using fdes->inport to make the 

output ports.
This commit is contained in:
shivers 1997-02-26 22:21:48 +00:00
parent 0229b80a6c
commit b980922f0d
2 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Error-log
View File

@ -122,3 +122,13 @@ reported by Michael Sperber 2 Dec 96. fix by bdc
signals1.c missing on most ports signals1.c missing on most ports
reported by Mike Gunter 10 Dec 96. fix by ?????????? reported by Mike Gunter 10 Dec 96. fix by ??????????
scsh.scm
stdio->stdports was using fdes->inport to make the current-output-port
and the current-error-port. The manual also had this bug.
The manual also used (exit (run ...)) in section 9.1.7, which should
be (exit (status:exit-val (run ...))).
Reported by euler@lavielle.COM (Lutz Euler) 2/24/97.
Fixed by Shivers 2/24/97.

4
scsh/scsh.scm
View File

@ -554,8 +554,8 @@
(define (stdio->stdports) (define (stdio->stdports)
(set-current-input-port! (fdes->inport 0)) (set-current-input-port! (fdes->inport 0))
(set-current-output-port! (fdes->inport 1)) (set-current-output-port! (fdes->outport 1))
(set-error-output-port! (fdes->inport 2))) (set-error-output-port! (fdes->outport 2)))
(define (with-stdio-ports* thunk) (define (with-stdio-ports* thunk)
(with-current-input-port (fdes->inport 0) (with-current-input-port (fdes->inport 0)