Hi,

Tested this and it’s due to the 64t transition. The grovelled data changed:

(sid_armhf-dchroot)pvaneynd@abel:~/sbcl-2.3.7$ diff -u 
./crossbuild-runner/backends/arm/stuff-groveled-from-headers.lisp 
output/stuff-groveled-from-headers.lisp
--- ./crossbuild-runner/backends/arm/stuff-groveled-from-headers.lisp   
2023-07-29 07:59:39.000000000 +0000
+++ output/stuff-groveled-from-headers.lisp     2023-07-29 07:59:39.000000000 
+0000
@@ -30,7 +30,7 @@
 (define-alien-type off-t (signed 64))
 (define-alien-type size-t (unsigned 32))
 (define-alien-type ssize-t (signed 32))
-(define-alien-type time-t (signed 32))
+(define-alien-type time-t (signed 64))
 (define-alien-type suseconds-t (signed 32))
 (define-alien-type uid-t (unsigned 32))
 ;; Types in src/runtime/wrap.h. See that file for explantion.
@@ -141,6 +141,7 @@
 (defconstant clock-process-cputime-id 2) ; #x2
 (defconstant clock-realtime-alarm 8) ; #x8
 (defconstant clock-realtime-coarse 5) ; #x5
+(defconstant clock-tai 11) ; #xb
 (defconstant clock-monotonic-coarse 6) ; #x6
 (defconstant clock-monotonic-raw 4) ; #x4
 (defconstant clock-boottime 7) ; #x7
@@ -149,11 +150,11 @@
 ;;; structures
 (define-alien-type nil
   (struct timeval
-          (tv-sec (signed 32))
-          (tv-usec (signed 32))))
+          (tv-sec (signed 64))
+          (tv-usec (signed 64))))
 (define-alien-type nil
   (struct timespec
-          (tv-sec (signed 32))
+          (tv-sec (signed 64))
           (tv-nsec (signed 32))))

I honestly don’t understand how to use 64-bit values on this arch, so I created 
https://bugs.launchpad.net/sbcl/+bug/2063340


Best regards, Peter

Reply via email to