;;; Returns two values:
;;; - the minutes west of GMT.
;;; - T if daylight savings is in effect, NIL if not.
-(sb!alien:def-alien-routine get-timezone sb!c-call:void
+(sb!alien:define-alien-routine get-timezone sb!c-call:void
(when sb!c-call:long :in)
(minutes-west sb!c-call:int :out)
(daylight-savings-p sb!alien:boolean :out))
(defmacro time (form)
#!+sb-doc
"Execute FORM and print timing information on *TRACE-OUTPUT*."
- `(%time #'(lambda () ,form)))
+ `(%time (lambda () ,form)))
;;; Return all the data that we want TIME to report.
(defun time-get-sys-info ()