用法
评论
建议
取 消
确 定
(defun vectra:benchmark (expr n / elapse tps start) (setq start (getvar "MILLISECS")) (repeat n (eval expr)) (setq elapse (- (getvar "MILLISECS") start)) (if (equal elapse 0.0 1.0e-06) (strcat "Benchmark loops = " (itoa n) ", in " (rtos elapse 2 4) " ms") (strcat "Benchmark loops = " (itoa n) ", in " (rtos elapse 2 4) " ms, " (rtos (/ n elapse 0.001) 2 0) " invoke / s")))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新
冀公网安备 13050302000400号