diff options
Diffstat (limited to 'src/cljcc/util.clj')
| -rw-r--r-- | src/cljcc/util.clj | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/cljcc/util.clj b/src/cljcc/util.clj index 351b11f..4c56ab9 100644 --- a/src/cljcc/util.clj +++ b/src/cljcc/util.clj @@ -149,6 +149,9 @@ {:type :ulong} 10 (exc/analyzer-error "Invalid type passed to get-type-size." {:type t}))) +(defn type-double? [t] + (= {:type :double} t)) + (defn type-signed? [t] (condp = t {:type :int} true |