(require racket/system) (void (system "mzc -k all.ss"))