(defmacro! time
  (fn* (exp)
    `(let* [start_FIXME (time-ms)
            ret_FIXME ~exp]
      (do
        (prn (str "Elapsed time: " (- (time-ms) start_FIXME) " msecs"))
        ret_FIXME))))