PSC Code Manual

util/time.lsp [src]

Time- and date-related functions

Functions

Function signature Description
(!avg-time fun num) Prints statistical results after calling !time NUM times
(!time func alert-p) Prints the number of milliseconds it takes to run FUNC
(curdate) Returns the current date formatted as DD/MM/YYYY

(!avg-time fun num)

Prints statistical results after calling !time NUM times

FUN is the first argument to !time. This function passes nil for ALERT-P.

VARS:
(FUN LIST (FUNCTION-P (EVAL (CAR FUN))))
(NUM INT)

(!time func alert-p)

Prints the number of milliseconds it takes to run FUNC

FUNC should be a lisp form to be eval'd. If ALERT-P is nil, prints to the command
line. Otherwise, displays an alert box with the result.

Example: (!time '(repeat 100 (read-xdata (entlast) "")) nil)

VARS:
(FUNC LIST (FUNCTION-P (EVAL (CAR FUNC))))

(curdate)

Returns the current date formatted as DD/MM/YYYY