fix code

src/rustint/core.clj

@@ -2164,7 +2164,13 @@
 ; true
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (defn compatibles? [rtype arg]
-  (let [rtypes (hash-map 'i64 integer?, 'f64 float?, 'String string?), func (get rtypes rtype)]
+  (let [rtypes (
+                hash-map
+                'i64 integer?,
+                'f64 float?,
+                'String string?,
+                'bool boolean?
+              ), func (get rtypes rtype)]
       (or (vector? arg) (func arg))
   )
 )