Hello,

I am trying to make my PDE solver Femlisp work on ECL again.  At the
moment ECL cannot compile the following code (which should make #d(...)
construct a double-float vector):

(eval-when (:compile-toplevel :load-toplevel :execute)
  (set-dispatch-macro-character
   #\# #\d  ; dispatch on #d for double-vec
   #'(lambda (stream char n)
       (declare (ignore char n))
       (let ((list (read stream nil (values) t)))
         `(coerce ',list '(simple-array double-float (*)))))))

(IIRC, the code has worked in some previous version of ECL.)

Nicolas

------------------------------------------------------------------------------
Everyone hates slow websites. So do we.
Make your web apps faster with AppDynamics
Download AppDynamics Lite for free today:
http://p.sf.net/sfu/appdyn_d2d_mar
_______________________________________________
Ecls-list mailing list
Ecls-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/ecls-list

Reply via email to