enhanced class_enter to check indexed type between a class and a superclass

2025-09-16 23:47:50 +09:00
parent 1c8115dbc9
commit 0da9721c9f
4 changed files with 55 additions and 0 deletions
--- a/lib/hak.c
+++ b/lib/hak.c
@ -1017,3 +1017,15 @@ hak_pfbase_t* hak_findpfbase (hak_t* hak, hak_pfinfo_t* pfinfo, hak_oow_t pfcoun
 	return HAK_NULL;
 }

+const hak_bch_t* hak_obj_type_to_bcstr (hak_obj_type_t type)
+{
+	static const hak_bch_t* names[] = {
+		"oop",
+		"char",
+		"byte",
+		"halfword",
+		"word",
+	};
+
+	return (type < HAK_COUNTOF(names))? names[type]: "";
+}