Skip to content
Snippets Groups Projects
Commit 9dbfec1d authored by rtoy's avatar rtoy
Browse files

Fix padding for stat64. st-pad2 was the wrong size to pad st-size to

a 64-bit boundary.  Add st-pad3 to make sure st-blocks is on a 64-bit
boundary.

Only a problem when cross-compiling from a different arch.  The native
compile correctly padded the fields.
parent f025b1f0
No related branches found
No related tags found
No related merge requests found
......@@ -5,7 +5,7 @@
;;; Carnegie Mellon University, and has been placed in the public domain.
;;;
(ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/unix.lisp,v 1.130 2010/04/20 17:57:45 rtoy Rel $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/unix.lisp,v 1.131 2010/11/12 16:53:17 rtoy Exp $")
;;;
;;; **********************************************************************
;;;
......@@ -567,19 +567,20 @@
(def-alien-type nil
(struct stat64
(st-dev dev-t)
(st-pad1 (array long 3))
(st-pad1 (array long 3)) ; Pad so ino is 64-bit aligned
(st-ino ino64-t)
(st-mode unsigned-long)
(st-nlink short)
(st-uid uid-t)
(st-gid gid-t)
(st-rdev dev-t)
(st-pad2 (array long 2))
(st-pad2 (array long 3)) ; Pad so size is 64-bit aligned
(st-size off64-t)
(st-atime (struct timestruc-t))
(st-mtime (struct timestruc-t))
(st-ctime (struct timestruc-t))
(st-blksize long)
(st-pad3 (array long 1)) ; Pad so blocks is 64-bit aligned
(st-blocks blkcnt64-t)
(st-fstype (array char 16))
(st-pad4 (array long 8))))
......
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