[Ecls-list] C compiler errors during compile-file

[Juan Jose Garcia-Ripoll]

The piece of code below failed to be compiled by ECL because of a
missing C declaration in the output file. Fixed in CVS.

Juanjo

(defvar *ls* nil)

(let ((*ls* '(1 2 3 4 5 6 7)))
 (let ((the-list (cons nil *ls*)))
   (let ((prev the-list))
     (flet ((cut () (let (kill)
              (setf kill (cdr prev)
                    (cdr prev) (cdr kill)
                    prev (cons nil prev)))))
       (cut)
     (format t "~S" the-list)))))

-- 
Facultad de Fisicas, Universidad Complutense,
Ciudad Universitaria s/n Madrid 28040 (Spain)
http://juanjose.garciaripoll.googlepages.com