COMPLR bug

[Jeffrey P. Golden <JPG at MIT-MC>]

Oops!  As it may be argued that the example in my last mail does 
exhibit "differing declarations", as the first occurrence of X is 
not declared FLONUM, please replace the example by
	(defun f (x)
	  (declare (flonum x))
	  ((lambda (x)
	     (declare (flonum x))
	     (times x ((lambda (x)
	   		 (declare (flonum x))
	   		 (times x x))
	   	       x)))
	      (sin x)))
This one fails in the same way anyway.