add test

test/rustint/core_test.clj

@@ -109,3 +109,9 @@
     (is (= (compatibles? 'usize 1) true))
   )
 )
+
+(deftest compatibles-test09
+  (testing "Test 09 compatibles?"
+    (is (= (compatibles? 'char \a) true))
+  )
+)