From aeddacb8d88f41ba7bdf37d39de17d8cf3b6a258 Mon Sep 17 00:00:00 2001 From: Henrique Alves Date: Mon, 29 Apr 2024 10:23:52 +0300 Subject: Creating small evaluation prompt --- sources/text.h | 20 -------------------- 1 file changed, 20 deletions(-) delete mode 100644 sources/text.h (limited to 'sources/text.h') diff --git a/sources/text.h b/sources/text.h deleted file mode 100644 index 0759d2f..0000000 --- a/sources/text.h +++ /dev/null @@ -1,20 +0,0 @@ -#include "raylib.h" -#include "s7.h" -#include -#include - -static s7_pointer rl_draw_text(s7_scheme *s7, s7_pointer args) { - Color *c = (Color *)s7_c_object_value(s7_car(s7_cddddr(args))); - - DrawText(s7_string(s7_car(args)), - s7_integer(s7_cadr(args)), - s7_integer(s7_caddr(args)), - s7_integer(s7_cadddr(args)), - *c); - - return(NULL); -} - -static void rl_text_define_methods(s7_scheme *s7) { - s7_define_function(s7, "rl-draw-text", rl_draw_text, 5, 0, false, "test"); -} -- cgit v1.2.3