[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Of growing code and diminishing hacks...
(define (overloaded-cdr val)
(if (null? val) nil (cdr val)))
(overloaded-cdr (assq key a-list))
In other words, if you want a cdr that horribly overloads nil, then
write one. As for me, I think of a cons cell as an object with car and
cdr fields in it, just as a point is an object with x and y fields in
it. How about:
(define (overloaded-x point)
(if (null? point) nil (x point)))