Path: utzoo!attcan!uunet!husc6!cmcl2!rutgers!bellcore!faline!thumper!ulysses!andante!princeton!phoenix!eliot
From: eliot@phoenix.Princeton.EDU (Eliot Handelman)
Newsgroups: comp.lang.lisp
Subject: Setf Method for LAST
Message-ID: <3673@phoenix.Princeton.EDU>
Date: 17 Sep 88 23:22:20 GMT
Reply-To: eliot@phoenix.Princeton.EDU (Eliot Handelman)
Distribution: na
Organization: Princeton University, NJ
Lines: 14

I need a setf method for LAST which should destructively modify the
last cons of a list. For some reason the old beano isn't coming up with
a ready answer. Here's what it should do:

(setq a '(1 2 3))

(setf (last a) '(4)) and now a => (1 2 4)

Using (rplaca (last a) nil) obviously won't do it. Any suggestions?

Thanks!
-- 
This message will cost the net hundreds if not thousands and perhaps millions
billions trillions maybe even zillions of dollars to send everywhere.