bt/bt_state.cpp

@@ -73,7 +73,7 @@ void BTState::_exit() {
 }
 
 void BTState::_update(double p_delta) {
-	GDVIRTUAL_CALL(_update, p_delta);
+	VCALL_ARGS(_update, p_delta);
 	if (!is_active()) {
 		// Bail out if a transition happened in the meantime.
 		return;

bt/tasks/bt_task.cpp

@@ -129,13 +129,13 @@ String BTTask::get_task_name() {
 		ERR_FAIL_COND_V_MSG(has_generate_method && !task_script->is_tool(), _generate_name(), vformat("BTTask: @tool annotation is required if _generate_name is defined: %s", task_script->get_path()));
 		if (task_script->is_tool() && has_generate_method) {
 			String call_result;
-			GDVIRTUAL_CALL(_generate_name, call_result);
+			VCALL_V(_generate_name, call_result);
 			if (call_result.is_empty() || call_result == "<null>") {
 				// Force reset script instance.
 				set_script(Variant());
 				set_script(task_script);
 				// Retry.
-				GDVIRTUAL_CALL(_generate_name, call_result);
+				VCALL_V(_generate_name, call_result);
 			}
 			ERR_FAIL_COND_V_MSG(call_result.is_empty() || call_result == "<null>", _generate_name(), vformat("BTTask: _generate_name() failed to return a proper name string (%s)", task_script->get_path()));
 			return call_result;
@@ -171,9 +171,7 @@ void BTTask::initialize(Node *p_agent, const Ref<Blackboard> &p_blackboard, Node
 		get_child(i)->initialize(p_agent, p_blackboard, p_scene_root);
 	}
 
-	if (!GDVIRTUAL_CALL(_setup)) {
+	VCALL_OR_NATIVE(_setup);
-		_setup();
-	}
 }
 
 Ref<BTTask> BTTask::clone() const {
@@ -247,21 +245,16 @@ BT::Status BTTask::execute(double p_delta) {
 				data.children.get(i)->abort();
 			}
 		}
-		if (!GDVIRTUAL_CALL(_enter)) {
+
-			_enter();
+		VCALL_OR_NATIVE(_enter);
-		}
 	} else {
 		data.elapsed += p_delta;
 	}
 
-	if (!GDVIRTUAL_CALL(_tick, p_delta, data.status)) {
+	VCALL_OR_NATIVE_ARGS_V(_tick, Status, data.status, p_delta);
-		data.status = _tick(p_delta);
-	}
 
 	if (data.status != RUNNING) {
-		if (!GDVIRTUAL_CALL(_exit)) {
+		VCALL_OR_NATIVE(_exit);
-			_exit();
-		}
 		data.elapsed = 0.0;
 	}
 	return data.status;
@@ -272,9 +265,7 @@ void BTTask::abort() {
 		get_child(i)->abort();
 	}
 	if (data.status == RUNNING) {
-		if (!GDVIRTUAL_CALL(_exit)) {
+		VCALL_OR_NATIVE(_exit);
-			_exit();
-		}
 	}
 	data.status = FRESH;
 	data.elapsed = 0.0;
@@ -365,7 +356,7 @@ PackedStringArray BTTask::get_configuration_warnings() {
 	PackedStringArray warnings;
 	Ref<Script> task_script = get_script();
 	if (task_script.is_valid() && task_script->is_tool()) {
-		GDVIRTUAL_CALL(_get_configuration_warnings, warnings); // Get script warnings.
+		VCALL_V(_get_configuration_warnings, warnings); // Get script warnings.
 	}
 	ret.append_array(warnings);
 	ret.append_array(_get_configuration_warnings());
@@ -448,12 +439,16 @@ void BTTask::_bind_methods() {
 	ADD_PROPERTY(PropertyInfo(Variant::INT, "status", PROPERTY_HINT_NONE, "", PROPERTY_USAGE_NONE), "", "get_status");
 	ADD_PROPERTY(PropertyInfo(Variant::FLOAT, "elapsed_time", PROPERTY_HINT_NONE, "", PROPERTY_USAGE_NONE), "", "get_elapsed_time");
 
+#ifdef LIMBOAI_MODULE
 	GDVIRTUAL_BIND(_setup);
 	GDVIRTUAL_BIND(_enter);
 	GDVIRTUAL_BIND(_exit);
 	GDVIRTUAL_BIND(_tick, "delta");
 	GDVIRTUAL_BIND(_generate_name);
 	GDVIRTUAL_BIND(_get_configuration_warnings);
+#elif LIMBOAI_GDEXTENSION
+	// TODO: Registering virtual functions is not available in godot-cpp...
+#endif
 }
 
 BTTask::BTTask() {

bt/tasks/bt_task.h

@@ -37,7 +37,6 @@
 #ifdef LIMBOAI_GDEXTENSION
 #include <godot_cpp/classes/engine.hpp>
 #include <godot_cpp/classes/resource.hpp>
-#include <godot_cpp/core/gdvirtual.gen.inc>
 #include <godot_cpp/core/object.hpp>
 #include <godot_cpp/templates/vector.hpp>
 using namespace godot;
@@ -104,12 +103,14 @@ protected:
 	virtual void _exit() {}
 	virtual Status _tick(double p_delta) { return FAILURE; }
 
+#ifdef LIMBOAI_MODULE
 	GDVIRTUAL0RC(String, _generate_name);
 	GDVIRTUAL0(_setup);
 	GDVIRTUAL0(_enter);
 	GDVIRTUAL0(_exit);
 	GDVIRTUAL1R(Status, _tick, double);
 	GDVIRTUAL0RC(PackedStringArray, _get_configuration_warnings);
+#endif // LIMBOAI_MODULE
 
 public:
 	// TODO: GDExtension doesn't have this method hmm...

bt/tasks/utility/bt_evaluate_expression.cpp

@@ -79,7 +79,7 @@ PackedStringArray BTEvaluateExpression::get_configuration_warnings() {
 
 void BTEvaluateExpression::_setup() {
 	parse();
-	ERR_FAIL_COND_MSG(is_parsed != Error::OK, "BTEvaluateExpression: Failed to parse expression: " + expression->get_error_text());
+	ERR_FAIL_COND_MSG(is_parsed != Error::OK, "BTEvaluateExpression: Failed to parse expression: " + expression.get_error_text());
 }
 
 Error BTEvaluateExpression::parse() {
@@ -93,7 +93,7 @@ Error BTEvaluateExpression::parse() {
 		processed_input_names_ptr[i + int(input_include_delta)] = input_names[i];
 	}
 
-	is_parsed = expression->parse(expression_string, processed_input_names);
+	is_parsed = expression.parse(expression_string, processed_input_names);
 	return is_parsed;
 }
 
@@ -109,7 +109,7 @@ BT::Status BTEvaluateExpression::_tick(double p_delta) {
 	ERR_FAIL_COND_V_MSG(node_param.is_null(), FAILURE, "BTEvaluateExpression: Node parameter is not set.");
 	Object *obj = node_param->get_value(get_scene_root(), get_blackboard());
 	ERR_FAIL_COND_V_MSG(obj == nullptr, FAILURE, "BTEvaluateExpression: Failed to get object: " + node_param->to_string());
-	ERR_FAIL_COND_V_MSG(is_parsed != Error::OK, FAILURE, "BTEvaluateExpression: Failed to parse expression: " + expression->get_error_text());
+	ERR_FAIL_COND_V_MSG(is_parsed != Error::OK, FAILURE, "BTEvaluateExpression: Failed to parse expression: " + expression.get_error_text());
 
 	if (input_include_delta) {
 		processed_input_values[0] = p_delta;
@@ -119,8 +119,8 @@ BT::Status BTEvaluateExpression::_tick(double p_delta) {
 		processed_input_values[i + int(input_include_delta)] = bb_variant->get_value(get_scene_root(), get_blackboard());
 	}
 
-	Variant result = expression->execute(processed_input_values, obj, false);
+	Variant result = expression.execute(processed_input_values, obj, false);
-	ERR_FAIL_COND_V_MSG(expression->has_execute_failed(), FAILURE, "BTEvaluateExpression: Failed to execute: " + expression->get_error_text());
+	ERR_FAIL_COND_V_MSG(expression.has_execute_failed(), FAILURE, "BTEvaluateExpression: Failed to execute: " + expression.get_error_text());
 
 	if (result_var != StringName()) {
 		get_blackboard()->set_var(result_var, result);
@@ -156,5 +156,4 @@ void BTEvaluateExpression::_bind_methods() {
 }
 
 BTEvaluateExpression::BTEvaluateExpression() {
-	expression.instantiate();
 }

bt/tasks/utility/bt_evaluate_expression.h

@@ -31,7 +31,7 @@ class BTEvaluateExpression : public BTAction {
 	TASK_CATEGORY(Utility);
 
 private:
-	Ref<Expression> expression;
+	Expression expression;
 	Error is_parsed = FAILED;
 	Ref<BBNode> node_param;
 	String expression_string;

gdextension/SConstruct

@@ -40,10 +40,6 @@ sources += Glob("limboai/editor/*.cpp")
 sources += Glob("limboai/hsm/*.cpp")
 sources += Glob("limboai/util/*.cpp")
 
-# Generate documentation header.
-if env["target"] in ["editor", "template_debug"]:
-    doc_data = env.GodotCPPDocData("limboai/gen/doc_data.gen.cpp", source=Glob("limboai/doc_classes/*.xml"))
-    sources.append(doc_data)
 
 if env["platform"] == "macos":
     library = env.SharedLibrary(

hsm/limbo_state.cpp

@@ -62,7 +62,7 @@ LimboState *LimboState::named(const String &p_name) {
 
 void LimboState::_enter() {
 	active = true;
-	GDVIRTUAL_CALL(_enter);
+	VCALL(_enter);
 	emit_signal(LimboStringNames::get_singleton()->entered);
 }
 
@@ -70,18 +70,18 @@ void LimboState::_exit() {
 	if (!active) {
 		return;
 	}
-	GDVIRTUAL_CALL(_exit);
+	VCALL(_exit);
 	emit_signal(LimboStringNames::get_singleton()->exited);
 	active = false;
 }
 
 void LimboState::_update(double p_delta) {
-	GDVIRTUAL_CALL(_update, p_delta);
+	VCALL_ARGS(_update, p_delta);
 	emit_signal(LimboStringNames::get_singleton()->updated, p_delta);
 }
 
 void LimboState::_setup() {
-	GDVIRTUAL_CALL(_setup);
+	VCALL(_setup);
 	emit_signal(LimboStringNames::get_singleton()->setup);
 }
 
@@ -213,10 +213,14 @@ void LimboState::_bind_methods() {
 	ClassDB::bind_method(D_METHOD("set_blackboard_plan", "plan"), &LimboState::set_blackboard_plan);
 	ClassDB::bind_method(D_METHOD("get_blackboard_plan"), &LimboState::get_blackboard_plan);
 
+#ifdef LIMBOAI_MODULE
 	GDVIRTUAL_BIND(_setup);
 	GDVIRTUAL_BIND(_enter);
 	GDVIRTUAL_BIND(_exit);
 	GDVIRTUAL_BIND(_update, "delta");
+#elif LIMBOAI_GDEXTENSION
+	// TODO: Registering virtual functions is not available in godot-cpp...
+#endif
 
 	ADD_PROPERTY(PropertyInfo(Variant::STRING_NAME, "EVENT_FINISHED", PROPERTY_HINT_NONE, "", 0), "", "event_finished");
 	ADD_PROPERTY(PropertyInfo(Variant::OBJECT, "agent", PROPERTY_HINT_RESOURCE_TYPE, "Node", 0), "set_agent", "get_agent");

hsm/limbo_state.h

@@ -23,7 +23,6 @@
 #endif // LIMBOAI_MODULE
 
 #ifdef LIMBOAI_GDEXTENSION
-#include <godot_cpp/core/gdvirtual.gen.inc>
 #include <godot_cpp/templates/hash_map.hpp>
 #endif // LIMBOAI_GDEXTENSION
 
@@ -60,10 +59,12 @@ protected:
 	virtual void _exit();
 	virtual void _update(double p_delta);
 
+#ifdef LIMBOAI_MODULE
 	GDVIRTUAL0(_setup);
 	GDVIRTUAL0(_enter);
 	GDVIRTUAL0(_exit);
 	GDVIRTUAL1(_update, double);
+#endif // LIMBOAI_MODULE
 
 public:
 	void set_blackboard_plan(const Ref<BlackboardPlan> &p_plan);

util/limbo_compat.h

@@ -62,6 +62,33 @@ _FORCE_INLINE_ bool OBJECT_HAS_PROPERTY(Object *p_obj, const StringName &p_prop)
 
 #define VARIANT_EVALUATE(m_op, m_lvalue, m_rvalue, r_ret) r_ret = Variant::evaluate(m_op, m_lvalue, m_rvalue)
 
+// * Virtual calls
+
+#define VCALL(m_name, ...) (GDVIRTUAL_CALL(m_name, __VA_ARGS__))
+#define VCALL_ARGS(m_name, ...) (GDVIRTUAL_CALL(m_name, __VA_ARGS__))
+#define VCALL_V(m_name, r_ret) (GDVIRTUAL_CALL(m_name, r_ret))
+#define VCALL_ARGS_V(m_name, r_ret, ...) (GDVIRTUAL_CALL(m_name, __VA_ARGS__, r_ret))
+
+#define VCALL_OR_NATIVE(m_name)    \
+	if (!GDVIRTUAL_CALL(m_name)) { \
+		m_name();                  \
+	}
+
+#define VCALL_OR_NATIVE_ARGS(m_name, ...)       \
+	if (!GDVIRTUAL_CALL(m_name, __VA_ARGS__)) { \
+		m_name(__VA_ARGS__);                    \
+	}
+
+#define VCALL_OR_NATIVE_V(m_name, m_ret_type, r_ret)       \
+	if (!GDVIRTUAL_CALL(m_name, r_ret)) {                  \
+		r_ret = VariantCaster<m_ret_type>::cast(m_name()); \
+	}
+
+#define VCALL_OR_NATIVE_ARGS_V(m_name, m_ret_type, r_ret, ...)        \
+	if (!GDVIRTUAL_CALL(m_name, __VA_ARGS__, r_ret)) {                \
+		r_ret = VariantCaster<m_ret_type>::cast(m_name(__VA_ARGS__)); \
+	}
+
 // * Enum
 
 #define LW_KEY(key) (Key::key)
@@ -123,6 +150,50 @@ _FORCE_INLINE_ bool OBJECT_HAS_PROPERTY(Object *p_obj, const StringName &p_prop)
 		Variant::evaluate(m_op, m_lvalue, m_rvalue, r_ret, r_valid); \
 	}
 
+// * Virtual calls:
+// * This is a workaround for missing ClassDB::add_virtual_method().
+// ! When using these macros, DON'T BIND the native virtual methods!
+// -----------------------------
+// VCALL*: only calls a script version if present.
+// VCALL_OR_NATIVE*: calls a script version if present; otherwise, calls the native version.
+
+#define VCALL(m_name)                  \
+	if (has_method(LW_NAME(m_name))) { \
+		call(LW_NAME(m_name));         \
+	}
+
+#define VCALL_ARGS(m_name, ...)             \
+	if (has_method(LW_NAME(m_name))) {      \
+		call(LW_NAME(m_name), __VA_ARGS__); \
+	}
+
+#define VCALL_V(m_name, r_ret)         \
+	if (has_method(LW_NAME(m_name))) { \
+		r_ret = call(LW_NAME(m_name)); \
+	}
+
+#define VCALL_ARGS_V(m_name, r_ret, ...)            \
+	if (has_method(LW_NAME(m_name))) {              \
+		r_ret = call(LW_NAME(m_name, __VA_ARGS__)); \
+	}
+
+#define VCALL_OR_NATIVE(m_name)        \
+	if (has_method(LW_NAME(m_name))) { \
+		call(LW_NAME(m_name));         \
+	} else {                           \
+		m_name();                      \
+	}
+
+#define VCALL_OR_NATIVE_ARGS(m_name, ...)   \
+	if (has_method(LW_NAME(m_name))) {      \
+		call(LW_NAME(m_name), __VA_ARGS__); \
+	} else {                                \
+		m_name(__VA_ARGS__);                \
+	}
+
+#define VCALL_OR_NATIVE_V(m_name, m_ret_type, r_ret) r_ret = (has_method(LW_NAME(m_name)) ? VariantCaster<m_ret_type>::cast(call(LW_NAME(m_name))) : VariantCaster<m_ret_type>::cast(m_name()))
+#define VCALL_OR_NATIVE_ARGS_V(m_name, m_ret_type, r_ret, ...) r_ret = (has_method(LW_NAME(m_name)) ? VariantCaster<m_ret_type>::cast(call(LW_NAME(m_name), __VA_ARGS__)) : VariantCaster<m_ret_type>::cast(m_name(__VA_ARGS__)))
+
 // * Enum
 
 #define LW_KEY(key) (Key::KEY_##key)