ffi.ss
#lang scheme/base

(require scheme/foreign)

(provide (all-defined-out))

(define-cstruct _stat
    ((dev _uint64)
     (ino _uint64)
     (mode _uint32)
     (nlink _uint64)
     (uid _uint32)
     (gid _uint32)
     (rdev _uint64)
     (size _uint64)
     (blksize _uint64)
     (blocks _uint64)
     (atime _uint64)
     (mtime _uint64)
     (ctime _uint64)))