From bdf66bb1e1096690be66eda90b35c6cfdc8a5cf0 Mon Sep 17 00:00:00 2001
From: gingerBill <bill@gingerbill.org>
Date: Fri, 31 Dec 2021 22:54:12 +0000
Subject: Correct `abs` type behaviour for quaternions

---
 src/types.cpp | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'src/types.cpp')

diff --git a/src/types.cpp b/src/types.cpp
index 2b7ea93dc..f621d4346 100644
--- a/src/types.cpp
+++ b/src/types.cpp
@@ -1253,6 +1253,13 @@ bool is_type_quaternion(Type *t) {
 	}
 	return false;
 }
+bool is_type_complex_or_quaternion(Type *t) {
+	t = core_type(t);
+	if (t->kind == Type_Basic) {
+		return (t->Basic.flags & (BasicFlag_Complex|BasicFlag_Quaternion)) != 0;
+	}
+	return false;
+}
 bool is_type_f16(Type *t) {
 	t = core_type(t);
 	if (t->kind == Type_Basic) {
-- 
cgit v1.2.3