CS problem ?



>>>>> "Vadim" == Vadim V Zhytnikov <vvzhy@mail.ru> writes:

    Vadim> Second:
    >> 
    Vadim> (%o9) {Array: ixnum #(0 2 1 3 7 6 5 4 8 11 17 9 12 14 13 20 16 10 18
    Vadim> 19 15 0 #
    >> 
    >> How do you create such an array?
    >> 

Thanks.

I can reproduce this.  It's caused by dimension-array-object in
ar.lisp:

(defmfun dimension-array-object (form result &aux (mtype (marray-type form)))
  (cond ($use_fast_arrays (dimension-string  (maknum form) result))
	(t
	 (format t "mtype = ~S~%" mtype)
	 (format t "exploden mtype = ~S~%" (exploden mtype))
	 (dimension-string
	  (nconc (exploden "{Array: ")
		 (cdr (exploden mtype))
                 ...))))))

If we replace the (cdr (exploden mtype)) with just (exploden mtype),
the first character isn't deleted.

I don't know enough about array types to know if this would work for
all array types.  However, it seems like a relatively safe change.  At
worst, there's an extra unwanted character.

Ray