;; 3
;; void (*godot_color_set_r)(godot_color *p_self, const godot_real r);
(bind-func godot_color_set_r
(lambda (in:godot_color* r:godot_real)
(printf "XTL godot_color_set_r -> in:%p r:%f\n" in (ftod r))
(let ((apicall:[void,godot_color*,godot_real]* (cast (aref (tref gdnative_api 5) 3))))
(fptrcall apicall in r))))