itensor fails to load with sbcl



With the current cvs version I get a failure when loading itensor. The
following is the output:


(%i1) load(itensor);
STYLE-WARNING: redefining $NAME in DEFUN
STYLE-WARNING: redefining DERIV in DEFUN
STYLE-WARNING: redefining SDIFF in DEFUN
STYLE-WARNING: redefining I-$DEPENDENCIES in DEFUN
; in: LAMBDA NIL
;     (MAXIMA::INTERVAL 1 MAXIMA::NCOV)
; 
; caught STYLE-WARNING:
;   The function was called with two arguments, but wants exactly three.

;     (MAXIMA::INTERVAL 1 MAXIMA::NCONTR)
; 
; caught STYLE-WARNING:
;   The function was called with two arguments, but wants exactly three.
STYLE-WARNING: redefining $DECSYM in DEFUN
STYLE-WARNING: redefining $CANFORM in DEFUN
; 
; compilation unit aborted
;   caught 1 fatal ERROR condition
;   caught 2 STYLE-WARNING conditions

Load failed
for /usr/local/share/maxima/5.20post/share/tensor/itensor.lisp
 -- an error. To debug this try: debugmode(true);

Dieter Kaiser