struggled with compiling code, compiler in infinite loop on (fn[x] (concat a-single-param)) list)