fork download
  1. (defparameter x (make-hash-table))
  2.  
  3. (setf (gethash 1 x) 2)
  4. (setf (gethash 2 x) 3)
  5.  
  6. (loop for var being the hash-values in x do
  7. (format t "~S~%" var)
  8. (when (= var 2)
  9. (setf (gethash 3 x) 4)))
Time limit exceeded #stdin #stdout 5s 3912KB
stdin
Standard input is empty
stdout
[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>