Fixes bug 176710: Strange error message for cadr.
This commit is contained in:
parent
356a809970
commit
16c52974da
|
@ -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)))
|
||||||
...)]))
|
...)]))
|
||||||
|
|
||||||
|
|
|
@ -1 +1 @@
|
||||||
1256
|
1258
|
||||||
|
|
Loading…
Reference in New Issue