Problems with numeric.lisp and GCL



I can not compile Maxima from my fresh sandbox with GCL 2.6.8. These are the
messages I got:

Compiling E:/maxima/cvs_maxima/maxima/src/numeric.lisp.
; (DEFUN |(PCL::FAST-METHOD FLOOR (BIGFLOAT))| ...) is being compiled.
;; Warning: Calls to (PCL::FAST-METHOD FLOOR (BIGFLOAT)) will be VERY SLOW.
Recommend not to proclaim.  
;;The arg caused the problem. .REST-ARG.
End of Pass 1.  
; (DEFUN |(PCL::FAST-METHOD FLOOR (BIGFLOAT))| ...) is being compiled.
;; Warning: 
;; (PCL::FAST-METHOD FLOOR (BIGFLOAT)) Number of proclaimed args was 3. 
;;Its definition had 4.
; (DEFUN |(PCL::FAST-METHOD FLOOR (BIGFLOAT))|) is being compiled.
;; Warning: Trying to return multiple values. 
;But (PCL::FAST-METHOD FLOOR (BIGFLOAT)) was proclaimed to have single value.
;Only first one will assured.
;; Warning: Trying to return multiple values. 
;But (PCL::FAST-METHOD FLOOR (BIGFLOAT)) was proclaimed to have single value.
;Only first one will assured.
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling binary-gcl/numeric.o.
Loading binary-gcl/numeric.o
Error in PCL::LOAD-DEFMETHOD [or a callee]: No class named: FLOAT.

Fast links are on: do (use-fast-links nil) for debugging
Broken at PCL::REAL-ADD-NAMED-METHOD.  Type :H for Help.
 1 (Continue) Retry loading file "binary-gcl/numeric.o".
 2 (Abort) Return to top level.
dbl:BIGFLOAT>>

Dieter Kaiser