Extent of function definition created by FLET/LABELS

[NGALL@G.BBN.COM]

Is the following legal CL:

(funcall (labels ((foo () (print "hello"))
                  (bar () (foo)))
           #'bar))

If not, where is it forbidden?

	-- Nick

P.S. It works in VaxLisp.