home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #18 / NN_1992_18.iso / spool / comp / lang / lisp / mcl / 1240 < prev    next >
Encoding:
Internet Message Format  |  1992-08-16  |  1.5 KB
  1. Path: sparky!uunet!nntp1.radiomail.net!portal!apple!cambridge.apple.com!poeck@winx03.informatik.uni-wuerzburg.de
  2. From: poeck@informatik.uni-wuerzburg.de (Karsten Poeck)
  3. Newsgroups: comp.lang.lisp.mcl
  4. Subject: record pattern
  5. Message-ID: <9208161619.AA04553@winx03.informatik.uni-wuerzburg.de>
  6. Date: 16 Aug 92 16:19:20 GMT
  7. Sender: info-mcl-request@cambridge.apple.com
  8. Lines: 39
  9. Approved: comp.lang.lisp.mcl@Cambridge.Apple.C0M
  10. Original-To: info-mcl@cambridge.apple.com
  11. Original-Cc: poeck@informatik.uni-wurzburg.de
  12. X-Mailer: ELM [version 2.3 PL0]
  13.  
  14. to info-mcl@cambridge.apple.com
  15. cc poeck@informatik.uni-wurzburg.de
  16.  
  17. I am a little bit confused by the different definitions of the record
  18. type
  19. pattern in records.lisp being
  20.  
  21. (defrecord pattern 
  22.   (variant ((w0 integer)
  23.             (w1 integer)
  24.             (w2 integer)
  25.             (w3 integer))
  26.            ((b0 byte)
  27.             (b1 byte)
  28.             (b2 byte)
  29.             (b3 byte)
  30.             (b4 byte)
  31.             (b5 byte)
  32.             (b6 byte)
  33.             (b7 byte))
  34.            ((bytes (array byte 8)))
  35.            ((array (array :unsigned-byte 8)))))
  36.  
  37. which is fine for use because we have used the b0 , bn variant in our
  38. program
  39. but which is commented
  40. and the version in 
  41.  
  42. interfaces:quickdraw.lisp which is
  43.  
  44. (defrecord (Pattern :handle) (array (array :unsigned-byte 8)))
  45.  
  46. which definition of pattern is the best one? Is it safe to replace the
  47. definition in quickdraw by the one in records
  48.  
  49. Karsten Poeck
  50. Universitaet Wuerzburg
  51.  
  52. poeck@informatik.uni-wurzburg.de 
  53.