(use blob-set-int) (define a (string->blob (make-string 32 #\Z))) (define b (string->blob (make-string 32 #\Z))) (blob-set-u32-be! a 0) (blob-set-u32-le! b 0) (equal? a b)