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.