feat: add API for DaedalusInstance user pointers

Author: lmichaelis

include/zenkit-capi/DaedalusScript.h

@@ -158,6 +158,8 @@ ZKC_API ZkDaedalusDataType ZkDaedalusSymbol_getReturnType(ZkDaedalusSymbol const
 
 ZKC_API ZkDaedalusInstanceType ZkDaedalusInstance_getType(ZkDaedalusInstance const* slf);
 ZKC_API uint32_t ZkDaedalusInstance_getIndex(ZkDaedalusInstance const* slf);
+ZKC_API void* ZkDaedalusInstance_getUserPointer(ZkDaedalusInstance const* slf);
+ZKC_API void ZkDaedalusInstance_setUserPointer(ZkDaedalusInstance* slf, void* ptr);
 
 ZKC_API uint32_t ZkDaedalusSymbol_getFileIndex(ZkDaedalusSymbol const* slf);
 ZKC_API uint32_t ZkDaedalusSymbol_getOffsetAsMember(ZkDaedalusSymbol const* slf);

src/DaedalusScript.cc

@@ -214,6 +214,16 @@ uint32_t ZkDaedalusInstance_getIndex(ZkDaedalusInstance const* slf) {
 	return slf->symbol_index();
 }
 
+void* ZkDaedalusInstance_getUserPointer(ZkDaedalusInstance const* slf) {
+	ZKC_CHECK_NULL(slf);
+	return slf->user_ptr;
+}
+
+void ZkDaedalusInstance_setUserPointer(ZkDaedalusInstance* slf, void* ptr) {
+	ZKC_CHECK_NULLV(slf);
+	slf->user_ptr = ptr;
+}
+
 uint32_t ZkDaedalusSymbol_getFileIndex(ZkDaedalusSymbol const* slf) {
 	ZKC_CHECK_NULL(slf);
 	return slf->file_index();