diff --git a/src/rustint/core.clj b/src/rustint/core.clj index 5df416a..911d136 100644 --- a/src/rustint/core.clj +++ b/src/rustint/core.clj @@ -2582,10 +2582,9 @@ ; 0.5 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defn dividir [arg1 arg2] - ( - cond - (and (float? arg2) (int? arg1)) (/ arg1 arg2) - :else (quot arg1 arg2) + (if (and (int? arg1) (int? arg2)) + (quot arg1 arg2) + (/ arg1 arg2) ) )