diff --git a/test/rustint/core_test.clj b/test/rustint/core_test.clj
index 661cafb..50dca62 100644
--- a/test/rustint/core_test.clj
+++ b/test/rustint/core_test.clj
@@ -97,3 +97,9 @@
     (is (= (compatibles? 'bool true) true))
   )
 )
+
+(deftest compatibles-test07
+  (testing "Test 07 compatibles?"
+    (is (= (compatibles? 'bool 1) false))
+  )
+)