cocoa and float-format

Hi, 

It seems to me that on my machine (OSX), the cocoa
libraries do not load correctly if the
default-float-format has been set to double format.

ie:
(setf *read-default-float-format* 'double-float)
(require 'cocoa)

does not correctly launch the cocoa listener, but gets
stuck in some half-launched state.  I guess this is
due to some float literals in the cocoa code?  I'm a
lisp newby, so I'm not sure how this could be fixed.

Thanks, 
Robbie

btw I'm using version 0.13.4

__________________________________________________
Do you Yahoo!?
Yahoo! Mail Plus - Powerful. Affordable. Sign up now.
http://mailplus.yahoo.com