(defparameter x (make-hash-table)) (setf (gethash 1 x) 2) (setf (gethash 2 x) 3) (loop for var being the hash-values in x do (format t "~S~%" var) (when (= var 2) (setf (gethash 3 x) 4)))
Standard input is empty
[EXPRNPSR3] Missing function declaration for defparameter. [EXPRNPSR3] Missing function declaration for setf. [EXPRNPSR3] Missing function declaration for setf. CLIPS (V6.24 06/15/06) CLIPS>