add test

test/rustint/core_test.clj

@@ -121,3 +121,9 @@
     (is (= (compatibles? 'char 'a) false))
   )
 )
+
+(deftest compatibles-test11
+  (testing "Test 11 compatibles?"
+    (is (= (compatibles? 'char ['a]) true))
+  )
+)