Fixes bug 176710: Strange error message for cadr.

This commit is contained in:
Abdulaziz Ghuloum 2007-12-18 11:32:13 -05:00
parent 356a809970
commit 16c52974da
2 changed files with 4 additions and 2 deletions

View File

@ -65,7 +65,9 @@
(begin (begin
(define name* (define name*
(lambda (x) (lambda (x)
((cxr (die 'name* "invalid list structure" x) ops** ...) ((cxr (die 'name*
"argument does not have required pair structure" x)
ops** ...)
x))) x)))
...)])) ...)]))

View File

@ -1 +1 @@
1256 1258