[cmucl/cmucl][rtoy-unix-core] Add timestruc-t for solaris. Needed by stat and stat64.

[Raymond Toy]

Raymond Toy pushed to branch rtoy-unix-core at cmucl / cmucl


Commits:
72afb878 by Raymond Toy at 2015-05-16T21:33:11Z
Add timestruc-t for solaris.  Needed by stat and stat64.

- - - - -


1 changed file:

- src/code/unix.lisp


Changes:

=====================================
src/code/unix.lisp
=====================================
--- a/src/code/unix.lisp
+++ b/src/code/unix.lisp
@@ -1111,6 +1111,14 @@
     (d-type unsigned-char)
     (d-name (array char 512))))
 
+#+(or linux svr4)
+; High-res time.  Actually posix definition under svr4 name.
+(def-alien-type nil
+  (struct timestruc-t
+    (tv-sec time-t)
+    (tv-nsec long)))
+
+
 ;;; Large file support for Solaris.  Define some of the 64-bit types
 ;;; we need.  Unlike unix-glibc's large file support, Solaris's
 ;;; version is a little simpler because all of the 64-bit versions of



View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/72afb878f276cef6b754ae2d5a0eff931bf457bc
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20150517/70103370/attachment.html>