diff options
author | Henrique Alves <henrique.alves@itsjungle.xyz> | 2024-04-29 10:23:52 +0300 |
---|---|---|
committer | Henrique Alves <henrique.alves@itsjungle.xyz> | 2024-04-29 10:23:52 +0300 |
commit | aeddacb8d88f41ba7bdf37d39de17d8cf3b6a258 (patch) | |
tree | 2daee509556bb1e7a9b74dc610b2ef4831392fdb /sources/shapes.h | |
parent | 94e1881676e39bd8b8e6a8ee98e541102b380549 (diff) | |
download | gamejam-slgj-2024-aeddacb8d88f41ba7bdf37d39de17d8cf3b6a258.tar.gz gamejam-slgj-2024-aeddacb8d88f41ba7bdf37d39de17d8cf3b6a258.tar.bz2 gamejam-slgj-2024-aeddacb8d88f41ba7bdf37d39de17d8cf3b6a258.zip |
Creating small evaluation prompt
Diffstat (limited to 'sources/shapes.h')
-rw-r--r-- | sources/shapes.h | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/sources/shapes.h b/sources/shapes.h deleted file mode 100644 index dc73011..0000000 --- a/sources/shapes.h +++ /dev/null @@ -1,20 +0,0 @@ -#include "raylib.h" -#include "s7.h" -#include <stdio.h> -#include <stdlib.h> - -static s7_pointer rl_draw_rectangle(s7_scheme *s7, s7_pointer args) { - Color *c = (Color *)s7_c_object_value(s7_car(s7_cdr(s7_cdr(s7_cdr(s7_cdr(args)))))); - - DrawRectangle(s7_integer(s7_car(args)), - s7_integer(s7_car(s7_cdr(args))), - s7_integer(s7_car(s7_cdr(s7_cdr(args)))), - s7_integer(s7_car(s7_cdr(s7_cdr(s7_cdr(args))))), - *c); - - return(NULL); -} - -static void rl_shapes_define_methods(s7_scheme *s7) { - s7_define_function(s7, "rl-draw-rectangle", rl_draw_rectangle, 5, 0, false, "test"); -} |