Path: utzoo!attcan!uunet!husc6!psuvax1!rutgers!bellcore!faline!thumper!ulysses!andante!princeton!phoenix!eliot From: eliot@phoenix.Princeton.EDU (Eliot Handelman) Newsgroups: comp.lang.lisp Subject: Setf Method Message-ID: <3677@phoenix.Princeton.EDU> Date: 18 Sep 88 03:34:30 GMT Reply-To: eliot@phoenix.Princeton.EDU (Eliot Handelman) Distribution: na Organization: Princeton University, NJ Lines: 18 I'm sorry, I didn't even state the problem right in my query. (Too much terminal time.) What I meant was this: A => (1 2 3) (setf (last a) '()) and now a => (1 2). In effect I'm trying to pop the last cons. Obviously (rplaca (last a) nil) => (1 2 NIL) and (setq a (reverse (cdr (reverse a)))) or (setq a (butlast a)) only works for symbols. Is there some way to do it using rplaca or rplacd? -- This message will cost the net hundreds if not thousands and perhaps millions billions trillions maybe even zillions of dollars to send everywhere.