It would be great to have fast_linsolve working again

Hi!

I tried Wolfgang Jenkner's instructions on how to use 
"fast_linsolve", which I badly need but I got the following errors:
"
%i21) fast_linsolve([x,y],[x,y]);

; In:
;     LAMBDA (SELF AN-ARRAY &OPTIONAL PARTS-OF-MONOMIAL 
LAST-COLUMN-NUMBER)

;   (SLOOP FOR I BELOW NUMBER-OF-ROWS ...)
; --> COMMON-LISP:LET MACROLET BLOCK TAGBODY SETQ 
; ==>
;   (MAKE-ARRAY :FILL-POINTER 0 :ADJUSTABLE T)
; Warning: Function has an odd number of arguments in the keyword portion.
; ; 

; Warning: This variable is undefined:
;   $POLY_VECTOR
; ; 

; Warning: These functions are undefined:
;   ARRAY-GROW BEST CATCH-ERROR GENERAL-GCD MULTIPLE-VALUE PARTIAL-ROW 
SEND
; 
Maxima encountered a Lisp error:

 Error in KERNEL::UNBOUND-SYMBOL-ERROR-HANDLER:  the variable $POLY_VECTOR 
is unbound.

Automatically continuing.
To reenable the Lisp debugger set *debugger-hook* to nil.
"




When loading the packages I had got the following warning:
"
(%o15) 	        /usr/share/maxima/5.9.1/share/affine/polyd.lisp
(%i16) 			      LOAD(affine/sheafa)

; In: UNLESS (BOUNDP '*XXX*)

;   (LET (#) (SLOOP FOR I FROM 1 ...))
; ==>
;   (COMMON-LISP:LET (#)
;     (SLOOP FOR I FROM 1 ...))
; Note: Variable *NOPOINT defined but never used.
"

Is there anything I can do to use fast_linsolve?

  Regards

   Fabrizio Caruso