((/parallel/with-waterfall-parallelism.lisp::with-waterfall-parallelism-fn (nil nil nil (let) nil nil nil) (((curr-waterfall-parallelism-val (f-get-global (quote waterfall-parallelism) state))) nil (`) nil nil nil nil) (nil nil nil nil (progn) nil nil) (nil nil (local ,@ local) nil nil nil nil) ((events) nil nil nil (make-event make-event) nil nil) ((:check-expansion t :check-expansion t) nil nil (er-progn er-progn) nil nil nil) (nil nil (set-waterfall-parallelism value set-waterfall-parallelism value) nil nil nil nil)))