   )
 (defmacro or= [arg values]
   `(or ~@(map #(= arg %1) values)))
-
-(defn chunk-fn [& args]
-  (println "chunk-fn:" args)
+(defn post-process-blocks [& args]
+  (println "post-process-blocks" args)
   (let [set-var-pred #(= 'set! (safe-some-> %1 first))
         all-vars (set (map second
                            (select (walker set-var-pred) args)))

                                    global-var-init-statements)) 
        let-statements (into init-statements let-statements)
        expr `(let-mutable ~let-statements ~return-value)]
    (println "chunk-fn2:" global-var-init-statements)
    expr
    ))

(defn block-fn [& args]
  (println "block-fn args:" args)

            [luaclj.library :refer :all]
            [com.rpl.specter :refer [select 
                                     ALL
                                     LAST
                                     STAY
                                     select-first
                                     pred
                                     if-path
                                     cond-path
                                     subselect 
                                     transform 
                                     walker]]
