Skip to content
Snippets Groups Projects
Commit c076d550 authored by Raymond Toy's avatar Raymond Toy
Browse files

Support for netbsd. From Robert Swindells.

parent 42675559
No related branches found
No related tags found
No related merge requests found
......@@ -1226,6 +1226,27 @@
(st-fstype (array char 16))
(st-pad4 (array long 8))))
#+netbsd
(def-alien-type nil
(struct stat
(st-dev dev-t)
(st-mode mode-t)
(st-ino ino-t)
(st-nlink nlink-t)
(st-uid uid-t)
(st-gid gid-t)
(st-rdev dev-t)
(st-atime (struct timespec-t))
(st-mtime (struct timespec-t))
(st-ctime (struct timespec-t))
(st-birthtime (struct timespec-t))
(st-size off-t)
(st-blocks off-t)
(st-blksize long)
(st-flags unsigned-long)
(st-gen unsigned-long)
(st-spare (array unsigned-long 2))))
(defmacro extract-stat-results (buf)
`(values T
(slot ,buf 'st-dev)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment