Mysterious Racket error: define: unbound identifier; also, no #%app syntax transformer is bound in: define

Question

This program produces an error:

define: unbound identifier;
 also, no #%app syntax transformer is bound in: define

When pasted into the RE

Answer 1

I would write the Common Lisp version slightly simpler:

(defun eval-clause (clause state)
  (loop for (var value) in state
        do (set var value))
  (some #'eval clause))

The LOOP form is more descriptive (since we can get rid of CAR and NTH) and EVAL can be directly used in the SOME function.