Newsgroups: comp.lang.lisp.mcl
Path: cantaloupe.srv.cs.cmu.edu!das-news2.harvard.edu!news2.near.net!satisfied.elf.com!news.mathworks.com!uunet!harlequin.com!epcot!norvig
From: norvig@harlequin.com (Peter Norvig)
Subject: Variable ignored warning in defsetf?
Message-ID: <D32z67.9JC@harlequin.com>
Sender: usenet@harlequin.com (Usenet Maintainer)
Nntp-Posting-Host: lantra
Organization: Harlequin, Inc., Cambridge, MA
Distribution: na
Date: Fri, 27 Jan 1995 20:20:31 GMT
Lines: 19

A user of my code complains that the following generates the error

	Variable CONTAINED? not ignored, in an anonymous lambda form

under MCL.  Other Lisps don't complain.  Is there some work-around, or
some way to tell MCL not to promote such warnings into an error that
stops the compilation process?

(defsetf grid-contents (env loc &optional contained?) (val)
  (declare (ignore contained?))
  `(setf (aref (grid-environment-grid ,env)
	       (floor (xy-x ,loc)) (floor (xy-y ,loc)))
	 ,val))

-- 

=================================================================
Peter Norvig                          
Harlequin Inc.                        Email: norvig@harlequin.com
