Hi,

A fresh update of my local copy of ECL CVS version shows a regression
involving macro expansion, GETHASH, SETF and HASH-SET.  In short, after
expansion, the arguments to HASH-SET seems to be switched.

To reproduce this,  issue the following in a fresh ECL session

   (compile-file "ht-test.lisp")
   (load "ht-test")

The file ht-test.lisp is in attachment to this message.  It is distilled
from attempt to build OpenAxiom with ECL.

I get:

   ;;; Loading #P"/home/gdr/build/ecl-x-oa/ht-test.fas"

   Condition of type: SIMPLE-TYPE-ERROR
   In function HASH-SET, the value of the second argument is
     "and"
   which is not of the expected type HASH-TABLE
   Available restarts:

   1. (RESTART-TOPLEVEL) Go back to Top-Level REPL.

   Broken at SI:BYTECODES. [Evaluation of: (LOAD "ht-test")]
   >>


-- Gaby

(defparameter |KeyTable| (make-hash-table :test #'equal))

(defmacro |tableValue| (ht k)
  `(gethash ,k ,ht))

(setf (|tableValue| |KeyTable| "and") 'and)
------------------------------------------------------------------------------
Ridiculously easy VDI. With Citrix VDI-in-a-Box, you don't need a complex
infrastructure or vast IT resources to deliver seamless, secure access to
virtual desktops. With this all-in-one solution, easily deploy virtual 
desktops for less than the cost of PCs and save 60% on VDI infrastructure 
costs. Try it free! http://p.sf.net/sfu/Citrix-VDIinabox
_______________________________________________
Ecls-list mailing list
Ecls-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/ecls-list

Reply via email to