src/rustint/core.clj

@@ -2163,10 +2163,6 @@
 ; user=> (compatibles? 'char ['a])
 ; true
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(defn usize? [arg]
-  (and (> arg 0) (integer? arg))
-)
-
 (defn compatibles? [rtype arg]
   (let [rtypes (
                 hash-map
@@ -2174,8 +2170,6 @@
                 'f64 float?,
                 'String string?,
                 'bool boolean?
-                'usize usize?,
-                'char char?
               ), func (get rtypes rtype)]
       (or (vector? arg) (func arg))
   )

test/rustint/core_test.clj

@@ -109,21 +109,3 @@
     (is (= (compatibles? 'usize 1) true))
   )
 )
-
-(deftest compatibles-test09
-  (testing "Test 09 compatibles?"
-    (is (= (compatibles? 'char \a) true))
-  )
-)
-
-(deftest compatibles-test10
-  (testing "Test 10 compatibles?"
-    (is (= (compatibles? 'char 'a) false))
-  )
-)
-
-(deftest compatibles-test11
-  (testing "Test 11 compatibles?"
-    (is (= (compatibles? 'char ['a]) true))
-  )
-)