diff options
| author | Shagun Agrawal <agrawalshagun07@gmail.com> | 2025-03-13 23:43:02 +0530 |
|---|---|---|
| committer | Shagun Agrawal <agrawalshagun07@gmail.com> | 2025-03-13 23:43:02 +0530 |
| commit | e68884c7cd010cedf354312c3756dbbdc1a56129 (patch) | |
| tree | 3b1ff402b1c8ef21dd66b7fcd3bd109a0dc3b4fe /src/cljcc/util.clj | |
| parent | 24850daacdce70b94b089e80c40a44be0df34881 (diff) | |
Complete tacky generation phase for doubles
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 |