X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Funix.lisp;h=e7cd25e10cf50e03ea739f740f9b9c747e12ce9f;hb=57bf8a7e65a81a8cff946a65e7e33e3f9b948ac6;hp=f8ef69d8c987b5a79915009527cb41709defa455;hpb=9184392783512f76eb971b7e316c875e2a1eb94c;p=sbcl.git diff --git a/src/code/unix.lisp b/src/code/unix.lisp index f8ef69d..e7cd25e 100644 --- a/src/code/unix.lisp +++ b/src/code/unix.lisp @@ -808,7 +808,7 @@ corresponds to NAME, or NIL if there is none." (tm-zone c-string))) ; Timezone abbreviation. (define-alien-routine get-timezone sb!alien:void - (when sb!alien:long :in) + (when time-t :in) (seconds-west sb!alien:int :out) (daylight-savings-p sb!alien:boolean :out))