diff --git a/foreign/c/c-bytevectors.scm b/foreign/c/c-bytevectors.scm
index 04d80c7..14f3646 100644
--- a/foreign/c/c-bytevectors.scm
+++ b/foreign/c/c-bytevectors.scm
@@ -535,18 +535,24 @@
 (define (c-bytevector-uint-ref c-bytevector index endness size)
   (case endness
    ((big)
+    (display "BIG")
+    (newline)
     (do ((i 0 (+ i 1))
          (result 0 (+ (* 256 result)
                       (c-bytevector-u8-ref c-bytevector (+ index i)))))
         ((>= i size)
          result)))
    ((little)
+    (display "LITTLE")
+    (newline)
     (do ((i (- size 1) (- i 1))
          (result 0 (+ (* 256 result)
                       (c-bytevector-u8-ref c-bytevector (+ index i)))))
         ((< i 0)
          result)))
    (else
+    (display "ELSE")
+    (newline)
     (c-bytevector-uint-ref c-bytevector index (native-endianness) size))))
 
 (define (c-bytevector-sint-ref c-bytevector index endness size)