gensym and the compiler

[Mike Caplinger <mike@rice.ARPA>]

How does one get code like the following:

; construct an identity transformation matrix.
(defun tm-new ()
    (let ((name (gensym)))
	(*array name 'flonum-block 4 4)
	(do i 0 (1+ i) (= i 4) (store (name i i) 1.0))
	name)
)

to work under the compiler?  Compiled, this refuses to believe
in the existence of name.

Do I need to declare it as a lambda?  Is there a way to declare arrays?

	- Mike