diff --git a/foreign/c/primitives/kawa.scm b/foreign/c/primitives/kawa.scm
index 3e742e9..da44ff1 100644
--- a/foreign/c/primitives/kawa.scm
+++ b/foreign/c/primitives/kawa.scm
@@ -5,30 +5,24 @@
 
 (define value->object
   (lambda (value type)
+    (display "VALUE HERE: ")
+    (write value)
+    (newline)
+    (write type)
+    (newline)
+    (write (invoke (invoke value 'getClass) 'getName))
+    (newline)
     (cond ((equal? type 'byte)
            (java.lang.Byte value))
           ((equal? type 'uint8)
-  (display "VALUE HERE: ")
-  (display (invoke (java.lang.Integer value) 'toBinaryString value))
-  (newline)
            (java.lang.Int value))
           ((equal? type 'short)
            (java.lang.Short value))
           ((equal? type 'unsigned-short)
            (java.lang.Short value))
           ((equal? type 'int)
-           (display "VALUE HERE: ")
-           (display (invoke (java.lang.Integer value) 'toBinaryString value))
-           (newline)
            (java.lang.Integer value))
           ((equal? type 'unsigned-int)
-  (display "VALUE HERE: ")
-  (display (invoke (java.lang.Integer value) 'toBinaryString value))
-  (newline)
-           (invoke (java.lang.Integer 1)
-                   'parseInt
-                   (invoke (java.lang.Integer value) 'toBinaryString value)
-                   2)
            (java.lang.Integer value))
           ((equal? type 'long)
            (java.lang.Long value))