home *** CD-ROM | disk | FTP | other *** search
- There is a mistake in the open coding of (vseti vector index expression).
- When the generated code is executed it returns the value of the index expression
- and not the value of expression. The problem is in d_vset in liszt/vector.l.
- The code in d_vset that generates the assembler code to compute the
- return value assumes that code has been generated to put the value of
- expression in index-reg. This assumption is false.
-
- I don't know the 68000 well enough to suggest a solution for it, but the
- following should work for the VAX. Change the lines
-
- (if g-loc
- then (if (eq type 'byte)
-
- (occuring about 3/4 of the way through d_vset) to
-
- (if g-loc
- then
- #+for-vax
- (progn
- (setq temp (cadr (assq type '((byte cvtbl)
- (word cvtwl)
- (long movl)))))
- (e-write3 temp vect-val index-reg)
- )
-
- #+for-68k
- (comment Do the same thing for the 68k)
-
- (if (eq type 'byte)
-
- Also, what is the current Berkeley distribution policy. I tried ftp'ing
- from ucbvax, but the pub/lisp directory there is empty. I'd like to get my
- hands on a distribution that has the flavors package in it.
-
- Mark Bromley
- bromley@cornell
-
-
-
-
-