Worked in 1.2, now trap crashes.

[Todd.Kaufmann@NL.CS.CMU.EDU]

I'm trying to port some code that works under 1.2 to 1.3.2.

The offending function is as follows:

(defun invalidate-area (rect)
  (rlet ((var :rect))
    (copy-record rect :rect var)
    (_InvalRect :ptr var :novalue)))

What's wrong with this, and why should it crash 1.3.2 ?

Question two:
    How can I tell what version my fasl's are?  We have both types on disk, as
well as both versions of lisp.
  (with-open-file (foo "foo.fasl" :direction :input) (read-line foo))
shows no human readable version info.


Thanks,
	-todd