home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / comp / lang / lisp / 3188 < prev    next >
Encoding:
Text File  |  1993-01-06  |  1.4 KB  |  32 lines
  1. Newsgroups: comp.lang.lisp
  2. Path: sparky!uunet!stanford.edu!kronos.arc.nasa.gov!kepler.arc.nasa.gov!philpot
  3. From: philpot@kepler.arc.nasa.gov (Andrew Philpot)
  4. Subject: (SETF VALUES)
  5. Message-ID: <1993Jan6.213139.27999@kronos.arc.nasa.gov>
  6. Keywords: setf-methods, setf-expansions, setf, values
  7. Sender: usenet@kronos.arc.nasa.gov (Will Edgington, wedgingt@ptolemy.arc.nasa.gov)
  8. Nntp-Posting-Host: kepler.arc.nasa.gov
  9. Organization: NASA/ARC Information Sciences Division
  10. Date: Wed, 6 Jan 1993 21:31:39 GMT
  11. Lines: 19
  12.  
  13. Is it possible to implement (SETF VALUES) in a Lisp which doesn't
  14. already do this?
  15.  
  16. This is (will be) part of lisp, e.g., as per section 5.1.2.3 of the
  17. dpans, but my vendor hasn't implemented it yet.
  18.  
  19. I thought it should be possible, and worked on this awhile, but
  20. couldn't seem to get it to work.  VALUES is "just" a function, after
  21. all, not a special form/special operator.  I don't have a lot of
  22. experience with DEFINE-SETF-METHOD (now DEFINE-SETF-EXPANDER); I don't
  23. think the simpler routes will work (will they?).  I imagine that a
  24. home-brewed version would be less efficient than a built-in one, but
  25. perhaps compile-time transformations could result in pretty good code.
  26.  
  27. If anyone has done this in a (stock hardware) Lisp, or knows good
  28. reasons why it can or cannot be done, please let me know or post.
  29.  
  30. Andrew Philpot - "not a rocket scientist"
  31. philpot@ptolemy.arc.nasa.gov
  32.