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

Fixed bug -- LET -> LET*

This commit is contained in:
shivers 1997-11-10 02:50:48 +00:00
parent 75dbb6c4bb
commit acb29ac3bc
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scsh/meta-arg.scm
View File

@ -93,7 +93,7 @@
(define (read-backslash-sequence port) (define (read-backslash-sequence port)
(let ((c1 (read-char port)) (let* ((c1 (read-char port))
(eof-lose (lambda () (error "Premature EOF within backslash-sequence in meta-arg argument line"))) (eof-lose (lambda () (error "Premature EOF within backslash-sequence in meta-arg argument line")))
(octet->int (lambda (c) (octet->int (lambda (c)
(cond ((eof-object? c) (eof-lose)) (cond ((eof-object? c) (eof-lose))