(bind-func vprint "print a packed i64* buffer" (lambda (buf:i64* len ncols) (doloop (i len) (printf "buf[%. 3lld] = %. 6lld " i (pref buf i)) (if (= (% i ncols) (- ncols 1)) (println))) (println)))