- Code: Select all
(defmacro with-experiment ((experiment file) &body body)
`(let* ((,experiment (read-experiment-file ,file)))
,@body))
This works but I'm a bit worried that "file" is evaluated before "experiment", but is this even a valid concern? with-open-file() and this code doesn't handle a non-symbol argument in this position.
Anybody know of any pitfalls in this regard?
-a